9 lines
276 B
Fortran
9 lines
276 B
Fortran
! Test the notation for an Nth-generation descendant
|
|
! for N>1, which necessitates the colon.
|
|
submodule ( parent : grandchild ) GreatGrandChild
|
|
contains
|
|
module subroutine GreatGrandChild_subroutine()
|
|
print *,"Test passed."
|
|
end subroutine
|
|
end submodule GreatGrandChild
|