You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

10 lines
284 B

! Empty submodule for checking disambiguation of
! nodes at the same vertical level in the tree
submodule ( parent ) sibling
contains
module function sibling_function() result(sibling_stuff)
logical :: sibling_stuff
sibling_stuff=.true.
end function
end submodule sibling