blob: 2ce1f5f022c5069f73d10aaf6e137931a54eac4c (
plain)
1
2
3
4
5
6
7
8
|
val x = List.rev (List.Cons (1, List.Cons (0, List.Nil)))
val y = List.mp (plus 2) x
fun main () : transaction page = return <xml><body>
{[x]}<br/>
{[y]}<br/>
{[Aux.hello]}
</body></xml>
|