5 * Revision 1.1.1.1 1996/02/15 17:50:37 mclareni
9 #include "kerngen/pilot.h"
10 #if defined(CERNLIB_QMMPW)
11 #include "mpwgs/datimh.F"
12 #elif defined(CERNLIB_QMSUN)
13 #include "sungs/datimh.F"
14 #elif defined(CERNLIB_QMVAX)
15 #include "vaxgs/datimh.F"
17 SUBROUTINE DATIMH (ND,NT)
19 C CERN PROGLIB# Z007 DATIMH DUMMY .VERSION KERNFOR 4.03 821008
21 C- DUMMY FOR NON-ESSENTIAL ROUTINE STILL MISSING ON YOUR MACHINE
23 DIMENSION ND(9), NT(9)
26 CALL UBLOW (8H29/09/79,M,8)
28 CALL UBLOW (8H12.00.00,M,8)