[Info-vax] LIB$ equivalent of DCL f$type() ?
FrankS
sapienza at noesys.com
Mon Dec 21 12:23:28 EST 2009
On Dec 21, 10:59 am, DTL <didier.mora... at gmail.com> wrote:
> What is the RTL equivalent for the DCL f$type() lexical function
> please ? I need to know within a Fortran program if a given ascii field
> contains a number or not.
I don't remember which binary floating point representation is default
in Fortran, but you should use the appropriate OTS$CVT_T_x function.
For example, if you are using IEEE S-floating binary values then you
would use OTS$CVT_T_S.
See the online or printed help for all the arguments and flags. There
are options which may be useful in your particular application.
http://h71000.www7.hp.com/doc/82final/5933/5933pro.html
The return value from that routine will tell you if the conversion
failed, which would suggest a non-numeric value in the text string.
www.noesys.com
More information about the Info-vax
mailing list