program MyProgram ! 1,9 | |
use module_a, a_renamed3 => a_sub3of3 ! 2,7 2,17 2,31 | |
use module_b, only: b_sub2of3, b_renamed3 => b_sub3of3 ! 3,7 3,23 3,34 3,48 | |
implicit none | |
call a_sub1of3 ! 7,8 | |
call a_sub2of3 ! 8,8 | |
call a_renamed3 ! 9,8 | |
call b_sub2of3 ! 10,8 | |
call b_renamed3 ! 11,8 | |
call contained ! 12,8 | |
call external ! 13,8 | |
contains | |
subroutine contained; end subroutine ! 15,14 | |
end | |
subroutine external; end subroutine ! 18,12 |