- #1
Sandbox.WeC
- 5
- 0
I'm writing this program for an assignment and I have run into a roadblock. I thought it was a pretty simple program, but I think my lack of experience with fortran is working against me.. Here is the bare code:
Program Readfile
implicit none
real(kind=8)::x,y,z,u,v
integer::n
OPEN(unit=12,file="file1.data")
OPEN(unit=13,file="file2.data")
read(12,*)
read(12,*)
DO n=1,38,1
read(12,*)x,y
z = LOG10[x]
u = LOG10[y]
v = LOG10[(x*x*x*y)/(1exp24)]
write(13,*)x,y,z,u,v
END DO
close(12)
close(13)
END PROGRAM
It is a simple concept. All it has to do is open file1 to get 2 values, then write in file2 those values, and a couple functions of them. The read(12,*) lines are used to skip the first two lines in file one, because they are junk. I am doing n=1,38 because there are 38 lines the program must do this to. The problem arises with the z= , u= , and v= statements. When I compile using the command gfortran file.f90 -o file.o it comes back and gives me Unclassifiable statement errors for all 3. What is my problem? Sorry if it is really obvious..
Program Readfile
implicit none
real(kind=8)::x,y,z,u,v
integer::n
OPEN(unit=12,file="file1.data")
OPEN(unit=13,file="file2.data")
read(12,*)
read(12,*)
DO n=1,38,1
read(12,*)x,y
z = LOG10[x]
u = LOG10[y]
v = LOG10[(x*x*x*y)/(1exp24)]
write(13,*)x,y,z,u,v
END DO
close(12)
close(13)
END PROGRAM
It is a simple concept. All it has to do is open file1 to get 2 values, then write in file2 those values, and a couple functions of them. The read(12,*) lines are used to skip the first two lines in file one, because they are junk. I am doing n=1,38 because there are 38 lines the program must do this to. The problem arises with the z= , u= , and v= statements. When I compile using the command gfortran file.f90 -o file.o it comes back and gives me Unclassifiable statement errors for all 3. What is my problem? Sorry if it is really obvious..