second.f

一个有用的分子动力学小辅助程序

      DOUBLE PRECISION FUNCTION SECOND()
 
******** RETURNS THE ELAPSED CPU TIME, IN SECONDS.
******** THIS ROUTINE IS OPERATING SYSTEM-DEPENDENT.
 
*        AIX VERSION
      SECOND = 0.01D0*MCLOCK()
      RETURN
      END