diff options
Diffstat (limited to 'research/experiments/045-proof-compiler/units/arith.aup')
| -rw-r--r-- | research/experiments/045-proof-compiler/units/arith.aup | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/research/experiments/045-proof-compiler/units/arith.aup b/research/experiments/045-proof-compiler/units/arith.aup new file mode 100644 index 0000000..76f48dc --- /dev/null +++ b/research/experiments/045-proof-compiler/units/arith.aup @@ -0,0 +1,7 @@ +state t = 0 +input go = message { n: u32 } +on go { + let s = 0 + for i in 0 .. go.n { s = s + i * 2 } + t = s +} |