指针初始化
REAL,POINTER :: VECTOR( : ) =>NULL( )
自动的对象初始化
在类型说明中说明的值,例如,
TYPE ENTRY REAL :: VALUE= 2.0 INTEGER INDEX TYPE(ENTRY) , POINTER :: NEXT => NULL( ) END TYPE ENTRY Dearly needed for HSL_AD01.