g77 and FORTRAN 90

[jshier at mac dot com]

GNU:
I am having trouble getting a certain program to compile under g77. 
I use the standard F90 code but get errors. The program compiled under a 
Windows compiler (not g77) and all previous programs worked. I am 
including my compiler output and my program file.


Jon Shier


COMPILER RESULTS:

g77 e.f
saw_static = 0
added library = -lg2c
e.f: In program `e':
e.f:21:
CONTAINS
1       2
Unrecognized statement name at (1) and invalid form for assignment or 
statement-function definition at (2)
e.f:9:
write(*,*)"What is the maximum n: "
1
e.f:24: (continued):
FUNCTION find_fact(n)
2
Statement at (2) invalid in context established by statement at (1)
e.f:9:
write(*,*)"What is the maximum n: "
1
e.f:25: (continued):
real::find_fact,total
2
Statement at (2) invalid in context established by statement at (1)
e.f:9:
write(*,*)"What is the maximum n: "
1
e.f:26: (continued):
integer::i
2
Statement at (2) invalid in context established by statement at (1)
e.f:9:
write(*,*)"What is the maximum n: "
1
e.f:27: (continued):
integer::n
2
Statement at (2) invalid in context established by statement at (1)
e.f:15:
factval=find_fact(i)
1
e.f:30: (continued):
find_fact = 1
2
Invalid declaration of or reference to symbol `find_fact' at (2) 
[initially seen at (1)]
e.f:9:
write(*,*)"What is the maximum n: "
1
e.f:40: (continued):
END FUNCTION find_fact
2
Statement at (2) invalid in context established by statement at (1)

e.f

e.f