C                                                                                  BLKDATA.63       
C                                                                                  BLKDATA.64       
      SUBROUTINE CHKBLKS
      SAVE

      COMMON/BLK1/ZERO1
      COMMON/BLK2/ZERO2
      COMMON/BLK3/ZERO3
      COMMON/BLK4/ZERO4
      COMMON/BLK5/ZERO5
      COMMON/BLK6/ZERO6
      COMMON/BLK7/ZERO7
      COMMON/BLK8/ZERO8
      COMMON/BLK9/ZERO9
      COMMON/BLK10/ZERO10
      COMMON/BLK11/ZERO11
      COMMON/BLK12/ZERO12
      COMMON/BLK13/ZERO13
      COMMON/BLK14/ZERO14
      COMMON/BLK15/ZERO15
      COMMON/BLK16/ZERO16
      COMMON/BLK17/ZERO17
      COMMON/BLK18/ZERO18
      COMMON/BLK19/ZERO19
      COMMON/BLK20/ZERO20
      COMMON/BLK21/ZERO21
      COMMON/BLK22/ZERO22
      COMMON/BLK23/ZERO23
      COMMON/BLK24/ZERO24
      COMMON/BLK25/ZERO25
      COMMON/BLK26/ZERO26
C     WRITE(6,100)ZERO1,ZERO2,ZERO3,ZERO4,ZERO5,ZERO6,ZERO7,ZERO8,ZERO9,           BLKDATA.94       
C    1  ZERO10,ZERO11,ZERO12,ZERO13,ZERO14,ZERO15,ZERO16,ZERO17,                   BLKDATA.95       
C    2  ZERO18,ZERO19,ZERO20,ZERO21,ZERO22,ZERO23,ZERO24,ZERO25,ZERO26             BLKDATA.96       
C 100 FORMAT(10E12.4)                                                              BLKDATA.97       
      RETURN
      END