aboutsummaryrefslogtreecommitdiff
path: root/spec
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2020-07-01 21:57:44 -0400
committerMarshall Lochbaum <mwlochbaum@gmail.com>2020-07-01 22:04:00 -0400
commit30602c5a85a62fe983a9684d67ed0eecd9b405ae (patch)
tree4d0420d9bf8a29dcb647ad9b73e3d077adef0152 /spec
parent35b312299a40ac6fc1725901e99b62239be2e5c9 (diff)
Add dzaima+reference version of the compiler
Diffstat (limited to 'spec')
-rwxr-xr-xspec/dzref4
1 files changed, 2 insertions, 2 deletions
diff --git a/spec/dzref b/spec/dzref
index db98ef89..5eb258ec 100755
--- a/spec/dzref
+++ b/spec/dzref
@@ -283,13 +283,13 @@ Cmp ← ∨○IsArray◶{ ⍝ No arrays
_grade←{
! 1≤≠≢𝕩
- i⊐˜+´˘(𝔽⎉∞‿¯1⎉¯1‿∞˜𝕩)(⌈⟜0+=⟜0⊸×)>⌜˜i←↕≠𝕩
+ i⊐˜+´˘((2⥊≠𝕩)⥊𝔽⎉∞‿¯1⎉¯1‿∞˜𝕩)(⌈⟜0+=⟜0⊸×)>⌜˜i←↕≠𝕩
}
_bins←{
r←1-˜≠≢𝕨
! 0≤r
LE←0≤𝔽⎉r
- ! ∧´LE´˘2↕<˘𝕩
+ ! (0<≠)◶⟨1,∧´·LE´˘2↕<˘⟩𝕩
+´𝕨LE⎉¯1‿∞𝕩
}