juldate Function

public function juldate(yyyymmdd, hhmiss)


                                                                        *
 Calculates the Julian date                                             *
                                                                        *
 AUTHOR: Andreas Stohl (15 October 1993)                                *
                                                                        *
 Variables:                                                             *
 dd             Day                                                     *
 hh             Hour                                                    *
 hhmiss         Hour, minute + second                                   *
 ja,jm,jy       help variables                                          *
 juldate        Julian Date                                             *
 julday         help variable                                           *
 mi             Minute                                                  *
 mm             Month                                                   *
 ss             Second                                                  *
 yyyy           Year                                                    *
 yyyymmddhh     Date and Time                                           *
                                                                        *
 Constants:                                                             *
 igreg          help constant                                           *
                                                                        *

Arguments

Type IntentOptional Attributes Name
integer :: yyyymmdd
integer :: hhmiss

Return Value real(kind=dp)