*CDK FIELDTF FIELDTF.1 COMMON/FIELDT/FNH2O(KMXP,12) FIELDTF.2