Determine if a string is numeric: Difference between revisions

Content deleted Content added
Line 496: Line 496:
1 1 0</lang>
1 1 0</lang>
Works with more recent versions of <B>Dyalog APL</B>
Works with more recent versions of <B>Dyalog APL</B>
<lang apl> ⊃⎕VFI {'¯' @ ('-'∘=) ⊣⍵} '152 -3.1415926 Foo123' ⍝ Fast: replacement of - with APL high-minus required for ⎕VFI
<lang apl> ⊃⎕VFI {'¯' @ ('-'∘=) } '152 -3.1415926 Foo123' ⍝ Fast: replacement of - with APL high-minus required for ⎕VFI
1 1 0
1 1 0
⊃⎕VFI '-' ⎕R '¯' ⊣ '152 -3.1415926 Foo123' ⍝ Simple: (ditto)
⊃⎕VFI '-' ⎕R '¯' ⊣ '152 -3.1415926 Foo123' ⍝ Simple: (ditto)