implicit04.f90 159 Bytes Raw Blame History Permalink 1 2 3 4 5 6 ! RUN: %S/test_errors.sh %s %t %f18 subroutine s parameter(a=1.0) !ERROR: IMPLICIT NONE statement after PARAMETER statement implicit none end subroutine