- #1
dimensionless
- 462
- 1
Why does does the following code not compile?
For some reason it compiles when I change the word "INTERGERS" to "REAL," but it doesn't compile as is.
Code:
PROGRAM TYPES
INTEGER A(3)
A(1)=1
A(2)=2
A(3)=3
CALL SUBR(A)
print *,'Done'
RETURN
END
C --- Here is a subroutine -----
SUBROUTINE SUBR(A)
DIMENSION A(3)
RETURN
END
For some reason it compiles when I change the word "INTERGERS" to "REAL," but it doesn't compile as is.