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