Function : |
|
result : | logical
|
gthstnml : | type(GTHST_NMLINFO), intent(in)
|
gthstnml が初期設定されている場合には .true. が,
初期設定されていない場合には .false. が返ります.
If gthstnml is initialized, .true. is returned. If gthstnml
is not initialized, .false. is returned.
[Source]
logical function HstNmlInfoInitialized( gthstnml ) result(result)
!
! *gthstnml* が初期設定されている場合には .true. が,
! 初期設定されていない場合には .false. が返ります.
!
! If *gthstnml* is initialized, .true. is returned.
! If *gthstnml* is not initialized, .false. is returned.
!
use gtool_history_nmlinfo_types, only: GTHST_NMLINFO
implicit none
type(GTHST_NMLINFO), intent(in):: gthstnml
continue
result = gthstnml % initialized
end function HstNmlInfoInitialized