児玉靖司 東京理科大学理工学部情報科学科
type elem=int type intlist={head:elem,tail:intlist} function append(a:intlist,b:intlist):intlist= if a=nil then b else intlist(head=a.head,tail=append(a.tail,b))