| subroutine declared_external_subroutine | |
| implicit none | |
| print *, "Called declared_external_subroutine" | |
| end subroutine declared_external_subroutine | |
| subroutine undeclared_external_subroutine | |
| implicit none | |
| print *, "Called undeclared_external_subroutine" | |
| end subroutine undeclared_external_subroutine |