Subroutine : SPLIT_DATE_CHAR

Defined in: share/module_date_time.F

Called by :

geth_julgmt (share/module_date_time.F)

      ndown_em (main/ndown_em.F)

      med_sidata_input (main/real_em.F)

            real_data (main/real_em.F)

Arguments:

  1. date         :: INTEGER , INTENT( INOUT ) 
  2. century_year :: INTEGER , INTENT( OUT )   
  3. month        :: INTEGER , INTENT( OUT )   
  4. day          :: INTEGER , INTENT( OUT )   
  5. hour         :: INTEGER , INTENT( OUT )   
  6. minute       :: INTEGER , INTENT( OUT )   
  7. second       :: INTEGER , INTENT( OUT )   
  8. ten_thousandth :: INTEGER , INTENT( OUT )