source:
vendors/t/fcm-make/25-build-cyclic-2/src/m2.f90
@
10669
Last change on this file since 10669 was 10669, checked in by nicolasmartin, 5 years ago | |
---|---|
File size: 167 bytes |
Rev | Line | |
---|---|---|
[10669] | 1 | module m2 |
2 | use m1, only: WHATEVER | |
3 | character(*), parameter :: HELLO='Hello' | |
4 | contains | |
5 | subroutine s2() | |
6 | write(*, '(a)') HELLO // ' from s2' | |
7 | end subroutine s2 | |
8 | end module m2 |
Note: See TracBrowser
for help on using the repository browser.