module HeadCons where


main x = head (box x)


box x = [x]