After declaring an array in a subroutine, I would like to save it for future calls to the subroutine. My code looks as follows:
SUBROUTINE SUB (a,b,VAR1,x,y) REAL VAR1(3, x, y) SAVE VAR1
When I compile, I get an error as follows:
PGF90-S-0050-Assumed size array, VAR1, is not a dummy argument
This code was compiled successfully with XLF, but f90 chokes.
Any suggestions on how to compile this successfully with f90?