父の手続きを子モジュールで実行する方法につまずいた。つまり、このトリックにより、モジュールの依存関係ツリーに関連して、上流の方法でプロセスを実行できます。具体的には、以下に例を示します。
module parent
procedure(likefoo),pointer :: to_foo
interface
subroutine likefoo
end subroutine likefoo
end interface
contains
subroutine run
call to_foo
end subroutine
end module
module child
use parent
contains
subroutine foo
print *, 'hola'
end subroutine foo
end module
program main
use parent
use child
to_foo => foo
call run
end program
この例は、ifort 13.0.0 で陽性テストされました。このコードは標準で許可されているのか、それともコンパイラ依存機能であるため問題なく動作するのでしょうか? ご協力いただきありがとうございます。