diff options
Diffstat (limited to 'impl.bqn')
| -rw-r--r-- | impl.bqn | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -1,6 +1,6 @@ βΆ β {π¨((π¨π½π©)βπ){π½}π©} # LIMITED to number left operand result β β {π¨((1{π½}π¨)-0)βΆπ½βΏπΎ π©} -#β’ β {π©} # Prevents dyadic negative β +β’ β {π©} β£ β {π©}β{π¨} Λ β {π©π½π¨β£π©} β β {π½π¨πΎπ©} @@ -394,11 +394,11 @@ ProgressiveIndexOf β {π¨ββ(βΛβOccurrenceCountπ¨βΈβ)π©} _repeat_β{ nβπ¨πΎπ© - fβ0βπ¨β¨π½β©ββ¨π¨π½β’β©π© lβuβ0 {!Intπ©βlβ©lβπ©βuβ©uβπ©}β0 n aβπ©β_pβ{π½ββ£`(1+π©)β₯<a} - posβF _p u β negβFβΌ_p-l + posβ(π¨π½ β’)_p u + negβ(π¨π½βΌβ’)_p-l (|β<β0βposβΏnegΛ)β0 n } β β© _repeat_ |