i1 : X = new Type of List o1 = X o1 : Type |
i2 : y = 4 o2 = 4 |
i3 : mark() |
i4 : x = new X from {1,2,3} o4 = {1, 2, 3} o4 : X |
i5 : serialize (symbol x, symbol y) o5 = -- -*- mode: M2; coding: utf-8 -*- s0:=X -- Type : X s1:=1 -- ZZ : 1 s2:=2 -- ZZ : 2 s3:=3 -- ZZ : 3 s4:=newClass(s0,{s1,s2,s3}) -- X : X{1, 2, 3} s5:=global x -- Symbol : x s6:=global y -- Symbol : y s7:=(s5,s6) -- Sequence : (x,y) s5<-s4 s7 |