Merge branch 'realConsts' into 'master'

use NaN/Infininty constants from StdReal

See merge request !25

Libraries/Gast/Gen.icl

@@ -118,8 +118,7 @@ ggen{|Real|} s
 		= takeWhile (\r -> abs r <= toReal (s.maxDepth - s.depth)) l
 		= l
 where
-	//       -nan    nan        inf     -inf
-	l = [0.0,0.0/0.0,~(0.0/0.0),1.0/0.0,-1.0/0.0
+	l = [NaN, ~NaN, Infinity, ~Infinity
 		:interleave
 			[r \\ x <- diag [1:prims] [1:prims] (\n d.toReal n/toReal d), r <- [x,~ x]]
 		(interleave