The function MAPL_SunOrbitCreated
returns .true.
if the given orbit object has been initilized.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(MAPL_SunOrbit), | intent(in) | :: | ORBIT | |||
integer, | intent(out), | optional | :: | RC |
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