MAPL_SunOrbitCreated Function

public function MAPL_SunOrbitCreated(ORBIT, RC)

The function MAPL_SunOrbitCreated returns .true. if the given orbit object has been initilized.

Arguments

Type IntentOptional Attributes Name
type(MAPL_SunOrbit), intent(in) :: ORBIT
integer, intent(out), optional :: RC

Return Value logical


Calls

proc~~mapl_sunorbitcreated~~CallsGraph proc~mapl_sunorbitcreated MAPL_SunOrbitCreated proc~mapl_return MAPL_Return proc~mapl_sunorbitcreated->proc~mapl_return 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

Called by

proc~~mapl_sunorbitcreated~~CalledByGraph proc~mapl_sunorbitcreated MAPL_SunOrbitCreated proc~mapl_sungetdaylightduration MAPL_SunGetDaylightDuration proc~mapl_sungetdaylightduration->proc~mapl_sunorbitcreated proc~mapl_sungetdaylightdurationmax MAPL_SunGetDaylightDurationMax proc~mapl_sungetdaylightdurationmax->proc~mapl_sunorbitcreated proc~mapl_sungetlocalsolarhourangle MAPL_SunGetLocalSolarHourAngle proc~mapl_sungetlocalsolarhourangle->proc~mapl_sunorbitcreated proc~mapl_sunorbitquery MAPL_SunOrbitQuery proc~mapl_sunorbitquery->proc~mapl_sunorbitcreated

Source Code

       logical function  MAPL_SunOrbitCreated(ORBIT, RC)

! !ARGUMENTS:

       type(MAPL_SunOrbit),    intent(IN ) :: ORBIT
       integer, optional,      intent(OUT) :: RC

       character(len=ESMF_MAXSTR), parameter :: IAm = "SunOrbitCreated"

       MAPL_SunOrbitCreated = ORBIT%CREATED
       _RETURN(ESMF_SUCCESS)
       return

     end function MAPL_SunOrbitCreated