adam@1610: fun main () : transaction page = adam@1610: s <- source True; adam@1610: t <- source 1; adam@1610: return adam@1610: {[s]} {[t]}}/> adam@1610: