1! RUN: %python %S/test_errors.py %s %flang_fc1 2subroutine s1 3 implicit none 4 !ERROR: IMPLICIT statement after IMPLICIT NONE or IMPLICIT NONE(TYPE) statement 5 implicit integer(a-z) 6end subroutine 7 8subroutine s2 9 implicit none(type) 10 !ERROR: IMPLICIT statement after IMPLICIT NONE or IMPLICIT NONE(TYPE) statement 11 implicit integer(a-z) 12end subroutine 13