c Date conversion common block integer dpm(12) integer mdoy(12) character*3 mon(12) common/icdate/ dpm, mdoy common/ccdate/ mon