MODULE MyTypeMod
TYPE MyType
PRIVATE
INTEGER, ALLOCATABLE :: Num
CONTAINS
PROCEDURE, PUBLIC :: IsNum!To check Allocation of Num
...
END TYPE MyType
CONTAINS
...
END MODULE MyTypeMod
PROGRAM testMyType
USE MyTypeMod, ONLY : MyType
...
END PROGRAM testMyType
このモジュールとプログラムでは、アクセシビリティ ステータス「IsNum」型バインド プロシージャを変更できますか? 「IsNum」プロシージャを testMyTypeMod PROGRAM だけで PRIVATE にすることはできますか?