1module Main where 2 3import Prelude 4import Effect.Console (log) 5 6subtractOne :: Int -> Int 7subtractOne = (_ - 1) 8 9addOne :: Int -> Int 10addOne = (1 + _) 11 12named :: Int -> Int 13named = (_ `sub` 1) 14 15main = log "Done" 16