Misc

Miscellaneous routines.

To check equality of logical values:

abool = bool1 == bool2

To check inequality of logical values:

abool = bool1 /= bool2

To assign a string to a number.

aint = "1"; aint = "128"
areal = "1.0"

See example:

program main
use easifemBase
implicit none
INTEGER( I4B ) :: aint
REAL( DFP ) :: areal
aint = "12"
CALL Display(aint, "aint = ")
areal = "12.23"
call display(areal, "areal = ")
end program main

To check if a string is number:

abool = isNumeric("1.2")