Fun.idr

module Main

console.log : Show a => a -> IO ()
console.log = printLn

createComponent : Show a => String -> a -> String
createComponent tag content = "<" ++ tag ++ ">" ++ show content ++ "</" ++ tag ++ ">"

syntax [arr] ".map" [f] = map f arr
syntax [arr] ".forEach" [f] = traverse f arr
syntax {arg} "=>" [body] = \arg => body
term syntax "<div>{" [content] "}</div>" = createComponent "div" content

main : IO ()
main = do
  let arr = [1,2,3]
  let double = x => x * 2;

  ((arr
    .map(double))
    .map(double))
    .forEach(x => console.log(<div>{x}</div>))

  pure ()