annotate tests/num.ur @ 495:98f85c1bc867

Fix type calculation for applying-a-case optimization
author Adam Chlipala <adamc@hcoop.net>
date Tue, 11 Nov 2008 20:24:55 -0500
parents fe8f75f7e130
children
rev   line source
adamc@389 1 fun main () : transaction page = return <xml><body>
adamc@391 2 {[ -1 ]}, {[ 1 + 1 ]}, {[ 9 - 3 ]}, {[ 9 * 3 ]}, {[ 9 / 3 ]}, {[ 9 % 3 ]}<br/>
adamc@391 3 {[ -1.1 ]}, {[ 1.0 + 1.1 ]}, {[ 9.1 - 3.0 ]}, {[ 9.1 * 3.0 ]},
adamc@391 4 {[ 9.1 / 3.0 ]}, {[ 9.1 % 3.0 ]}<br/>
adamc@389 5 </body></xml>