Example usage:

import Miso

data IntAction = Add | Subtract

intView :: Int -> View IntAction
intView n
 = div_
 [ class_ "main"
 ]
 [ btn_
   [ onClick Add
   ]
   [ text_ "+"
   ]
 , text_ $ pack (show n)
 , btn_
   [ onClick Subtract
   ]
   [ text_ "-"
   ]
 ]

More information on how to use miso is available on GitHub

http://github.com/dmjio/miso