1! RUN: %S/test_errors.sh %s %t %f18 2subroutine s 3 parameter(a=1.0) 4 !ERROR: IMPLICIT NONE statement after PARAMETER statement 5 implicit none 6end subroutine 7