parse_timeunit_i4 Subroutine

public subroutine parse_timeunit_i4(tunit, n, t0, dt, rc)

Uses

  • proc~~parse_timeunit_i4~~UsesGraph proc~parse_timeunit_i4 parse_timeunit_i4 ESMF ESMF proc~parse_timeunit_i4->ESMF

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: tunit
integer, intent(in) :: n
type(ESMF_Time), intent(out) :: t0
type(ESMF_TimeInterval), intent(out) :: dt
integer, intent(out), optional :: rc

Calls

proc~~parse_timeunit_i4~~CallsGraph proc~parse_timeunit_i4 parse_timeunit_i4 interface~parse_timeunit parse_timeunit proc~parse_timeunit_i4->interface~parse_timeunit proc~mapl_return MAPL_Return proc~parse_timeunit_i4->proc~mapl_return proc~mapl_verify MAPL_Verify proc~parse_timeunit_i4->proc~mapl_verify interface~parse_timeunit->proc~parse_timeunit_i4 proc~parse_timeunit_i8 parse_timeunit_i8 interface~parse_timeunit->proc~parse_timeunit_i8 at at proc~mapl_return->at insert insert proc~mapl_return->insert proc~mapl_throw_exception MAPL_throw_exception proc~mapl_return->proc~mapl_throw_exception proc~mapl_verify->proc~mapl_throw_exception proc~parse_timeunit_i8->proc~mapl_return proc~parse_timeunit_i8->proc~mapl_verify ESMF_TimeIntervalSet ESMF_TimeIntervalSet proc~parse_timeunit_i8->ESMF_TimeIntervalSet ESMF_TimeSet ESMF_TimeSet proc~parse_timeunit_i8->ESMF_TimeSet interface~mapl_assert MAPL_Assert proc~parse_timeunit_i8->interface~mapl_assert

Called by

proc~~parse_timeunit_i4~~CalledByGraph proc~parse_timeunit_i4 parse_timeunit_i4 interface~parse_timeunit parse_timeunit proc~parse_timeunit_i4->interface~parse_timeunit interface~parse_timeunit->proc~parse_timeunit_i4 proc~diff_two_timeunits diff_two_timeunits proc~diff_two_timeunits->interface~parse_timeunit proc~time_esmf_2_nc_int time_esmf_2_nc_int proc~time_esmf_2_nc_int->interface~parse_timeunit proc~time_nc_int_2_esmf time_nc_int_2_esmf proc~time_nc_int_2_esmf->interface~parse_timeunit interface~convert_time_esmf2nc convert_time_esmf2nc interface~convert_time_esmf2nc->proc~time_esmf_2_nc_int interface~convert_time_nc2esmf convert_time_nc2esmf interface~convert_time_nc2esmf->proc~time_nc_int_2_esmf

Source Code

  subroutine parse_timeunit_i4(tunit, n, t0, dt, rc)
    use ESMF
    implicit none

    character(len=*), intent(in) :: tunit
    integer, intent(in) :: n
    type(ESMF_Time), intent(out) :: t0
    type(ESMF_TimeInterval), intent(out) :: dt
    integer, optional, intent(out) :: rc
    integer :: status
    integer(ESMF_KIND_I8) :: n8

    n8 = n
    call parse_timeunit(tunit, n8, t0, dt, _RC)
   _RETURN(_SUCCESS)

  end subroutine parse_timeunit_i4