Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
G
gast
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Issues
4
Issues
4
List
Boards
Labels
Service Desk
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Operations
Operations
Incidents
Environments
Analytics
Analytics
CI / CD
Repository
Value Stream
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
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