(let ((type linkedList (record (data int) (next linkedList)))) ())