]> gerrit.simantics Code Review - simantics/platform.git/blob - Index.scl
5addc188eca7c7038daceaa944c4da0ccf0c54a7
[simantics/platform.git] / Index.scl
1 import "Prelude"
2
3 f :: Integer -> Maybe Integer
4 f = index [(1,2),(2,4),(3,6),(4,8)]
5
6 main = f 3
7 --
8 6