*CDK FIELDT2F                                                                      FIELDT2F.1       
      COMMON/FIELDT2/FNH2OF(KMXP,IMXP,12)                                          FIELDT2F.2