Dismiss Notice
Join Physics Forums Today!
The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

Problem on reading dataset with variable decimal places as it is using fortran

  1. Sep 16, 2012 #1
    Hi all,
    I have attached my text file(tab delimited).
    I am planning to read those dataset into real array of (30,38). The dataset has variable decimal places like 312.66, 0, 535.696 ,456122.758.
    With the following codes,
    READ(12,*)((X(I,J),I=1,30),J=1,38)

    WRITE(*,20)((X(I,J),i=1,30),j=1,38)

    20 format(58(f12.3x,2x))

    I was able to read the original txt file and stored those data into real array of (30,38) and then it was written in new txt file.

    The problem is that because of the format(58(f12.3x,2x)) the data set in latter file got changed(now each data set has 3 decimal places)
    Is it possible to make data in latter file similar to original text file
     
  2. jcsd
  3. Sep 16, 2012 #2

    jtbell

    User Avatar

    Staff: Mentor

    When you read the original data, it's converted from decimal to binary and stored as binary inside your program. The binary data has no "memory" of the original number of decimal places.

    If you really need to preserve the original number of decimal places on output, you should read the data as character strings, then convert the strings to binary numeric data using Fortran's "internal read" technique. Do your calculations using the converted data, but write the original data back out using the character strings.
     
  4. Sep 17, 2012 #3
    hi jtbell,
    Thanks for writing me. I have written the program just to test which is as follow
    PROGRAM CHAR_ARRAY

    character(10):: data
    real::a
    read(*,*)data
    read(data,*)a
    print*,a
    END
    I gave 45.2 to data and output was 45.200001.
    so still the problem is same.
     
  5. Sep 17, 2012 #4
    Well, what jtbell said was to write the original data back out by using the original 'character' variable you read it into...not using your internal 'real' variables.
     
  6. Sep 18, 2012 #5
    hi gsal
    I carefully read to jtbell again and finally understood what you and he wants me to do.
    Thanks both of you.Problem is no more.
     
Know someone interested in this topic? Share this thread via Reddit, Google+, Twitter, or Facebook




Similar Discussions: Problem on reading dataset with variable decimal places as it is using fortran
  1. FORTRAN READ problems (Replies: 5)

Loading...