Determine if a string is numeric: Difference between revisions
Content added Content deleted
(Added GNU APL (APL2) version) |
|||
Line 916: | Line 916: | ||
⊃⎕VFI '-' ⎕R '¯' ⊣ '152 -3.1415926 Foo123' ⍝ Simple: (ditto) |
⊃⎕VFI '-' ⎕R '¯' ⊣ '152 -3.1415926 Foo123' ⍝ Simple: (ditto) |
||
1 1 0</lang> |
1 1 0</lang> |
||
{{works with|GNU APL}} |
|||
<lang apl> |
|||
{∧/⍵∊(⊃,¨'0123456789¯.+')}¨'152' '¯3.1415926' 'Foo123' |
|||
1 1 0 |
|||
</lang> |
|||
=={{header|AppleScript}}== |
=={{header|AppleScript}}== |