blob: 1aef63e3103311fe35456800b35dcf522458c933 [file] [log] [blame]
! Test the notation for an Nth-generation descendant
! for N>1, which necessitates the colon.
submodule ( parent : child ) grandchild
contains
module subroutine grandchild_subroutine()
print *,"Test passed."
end subroutine
end submodule grandchild