adamc@1046: fun main () : transaction page = return adamc@1046: adamc@1046:
adamc@1046: adamc@1046: adamc@1046: adamc@1046:
adamc@1046: adamc@1046: and submit r = return