Things that amuse me

Things that amuse me: "main = do
test
l <- varc [1, 2, 3]
print ('first and last:',)
print (first_elt(l),)
print (last_elt(l))"