]> gerrit.simantics Code Review - simantics/platform.git/blob - bundles/org.simantics.scl.compiler/tests/org/simantics/scl/compiler/tests/scl/Guards2.scl
List the unsatisfied dependencies in CanvasContext
[simantics/platform.git] / bundles / org.simantics.scl.compiler / tests / org / simantics / scl / compiler / tests / scl / Guards2.scl
1 import "Prelude"\r
2 \r
3 fib :: Integer -> Integer\r
4 fib x = match x with\r
5   v | v <= 2 -> 1\r
6     | True   -> fib (v-1) + fib (v-2)\r
7 \r
8 main = fib 13\r
9 --\r
10 233