How to convert String literals to integers ? 1

[arunmd1]

Hi . my program is reading a string '0.5' from a supplied input file. I have to convert this into a real value of 0.5
Does anybody know how to do it?

 

[xwb]

Read it

character*20::strvalue
real:: fval
strvalue = '0.5'
read (strvalue, *) fval

 

[arunmd1]

Hi xwb, Thanks for ur reply.
But while i try to execute the code u gave, it is throwing 3 errors.
One of the error is given below.

Error: A REAL or INTEGER or LOGICAL data type is required in this context. [STRVALUE]
read(strvalue,*) fval

 

[xwb]

Which version of fortran are you using? 66 77 90 95 or 2003.

Should work from 77 onwards. What is strvalue declared as?

 

[arunmd1]

I am using 77 . String value is '0.5'

 

[xwb]

Try this and see if it builds - it works on g77

      program atol
      character*16 strval
      real fval
      strval = '0.5'
      read (strval, *) fval
      write (*, *) fval
      stop
      end program

 

[arunmd1]

Hey i got the answer.

we can use

STRVAL = '0.5'
READ (STRVAL,'(f3.2)') Floatvariable