1
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 にすることはできますか?

4

1 に答える 1