Substrate

#haskell #strange-loop