Processing as TTImp
Written TTC
Yaffle> (Main.S (Main.S (Main.S Main.Z)))
Yaffle> ((((Main.Cons [k = (Main.S (Main.S Main.Z))]) [a = Integer]) 1) ((((Main.Cons [k = (Main.S Main.Z)]) [a = Integer]) 2) ((((Main.Cons [k = Main.Z]) [a = Integer]) 3) (Main.Nil [a = Integer]))))
Yaffle> (Main.S (Main.S (Main.S Main.Z)))
Yaffle> Bye for now!
Processing as TTC
Read TTC
Yaffle> (Main.S (Main.S (Main.S Main.Z)))
Yaffle> ((((Main.Cons [k = (Main.S (Main.S Main.Z))]) [a = Integer]) 1) ((((Main.Cons [k = (Main.S Main.Z)]) [a = Integer]) 2) ((((Main.Cons [k = Main.Z]) [a = Integer]) 3) (Main.Nil [a = Integer]))))
Yaffle> (Main.S (Main.S (Main.S Main.Z)))
Yaffle> Bye for now!