[Info-vax] LIB$ equivalent of DCL f$type() ?

Roger Ivie rivie at ridgenet.net
Mon Dec 21 11:08:26 EST 2009


On 2009-12-21, DTL <didier.morandi at gmail.com> wrote:
>
> I need to know within a Fortran program if a given ascii field
> contains a number or not.

You could try something like:

	read( string, '(i)', err=10 ) booger
c	string had a number if you get here

10	print *,'Not a number'

I'm sure it'll take some fiddling to get it just so.
-- 
roger ivie
rivie at ridgenet.net



More information about the Info-vax mailing list