Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
10
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Open sidebar
clean-and-itasks
gast
Commits
bfbe79bc
Commit
bfbe79bc
authored
Jan 14, 2019
by
Mart Lubbers
Browse files
Options
Browse Files
Download
Plain Diff
Merge branch 'realConsts' into 'master'
use NaN/Infininty constants from StdReal See merge request
!25
parents
5a02237f
aa80d4b0
Pipeline
#17705
passed with stage
in 46 seconds
Changes
1
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
1 addition
and
2 deletions
+1
-2
Libraries/Gast/Gen.icl
Libraries/Gast/Gen.icl
+1
-2
No files found.
Libraries/Gast/Gen.icl
View file @
bfbe79bc
...
...
@@ -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
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment