CODEWITHSUNDEEP
stringcastingintegerfortran77
Henry Cho
Henry Cho

Reputation: 770

Fortran77 Casting integer to a String

Out of interest, I was trying to find a way to cast an integer to a String in Fortran77. I came across CHAR(I), but this converts the ASCII index I into the character in that postion. Is there a way to just simply cast an integer to a String in Fortran77? How about vice versa?

Upvotes: 0

Views: 3938

Answers (1)

High Performance Mark
High Performance Mark

Reputation: 78316

The Fortran way is to write the value of the integer into a string variable; this operation is known as an internal write. I'm heading out the door now so won't check this, and I have an ethical objection to writing FORTRAN77 or helping anyone else write it, so make no guarantee that the following doesn't contain bits of more modern Fortran.

First declare a character variable to receive the integer

character(len=12) :: int_as_string

then write the integer into it as you would normally write an integer to any other channel such as stdout

write(int_as_string,'(i12.12)') my_int

I expect you'll want to set the format for writing the integer to something that suits you better

Upvotes: 3

Related Questions