IMPLICIT REAL*8 (A-H,O-Z)