get_calday Function

public function get_calday(ymd, tod)

!!!!!!!!!!!! WARNING HACK TO ENABLE Gregorian CALENDAR WITH SHR_ORB !!!!!!!!!!!!!!!!!!!! !! The following hack fakes day 366 by reusing day 365. This is just because the !!!!!! !! current shr_orb_decl calculation can't handle days > 366. !!!!!! !! Dani Bundy-Coleman and Erik Kluzek Aug/2008 !!!!!! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!!! END HACK TO ENABLE Gregorian CALENDAR WITH SHR_ORB !!!!!!!!!!!!!!!!!!!!!!!!

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: ymd
integer, intent(in) :: tod

Return Value real(kind=r8)