Either
"SUBROUTINE MySubroutine(isize,array)
IMPLICIT NONE
INTEGER, INTENT(IN) :: isize
REAL, DIMENSION(isize), INTENT(INOUT) :: array"
or
"REAL, DIMENSION(:), INTENT(INOUT) :: array"
do not work.
If I specify the size of array, it gives errors due to memory restriction.
One possible solution...