C     from CPLNI.INC   
C     PERLND module common
C            NITR section
      COMMON/SCRTCH/AIRTFG,SNOWFG,PWATFG,SEDFG,PSTFG,PWGFG,PQALFG,
     $              MSTLFG,PESTFG,NITRFG,PHOSFG,TRACFG,AGFG,PFLAG,
     $              PIVL,PYREND,PERPFG,UUNITS,IUNITS,OUNITS,PUNIT,
     $              MESSU,MSGFL,LSNO,LSID,DELT,DELT60,DELT5,NDAY,
     $              NDAYS,NBLKSI,NBLKS,HRFG,DAYFG,STFG,EDAYFG,EMONFG,
     $              EPYRFG,YR,MON,DAY,HR,MIN,IVL,IVL1,PIVLNO,NXTMON,
     $              SPAFP,SPAKND,SPIVL,SPOPNO,DUMGEN,DUM1,PRECFP,DUM2,
     $              SNIF,DUM3,SURS,UZS,DUM4,LZS,AGWS,DUM5,SURSB,UZSB,
     $              DUM6,SOSED,DUM7,SOSDFP,DUM8,SOSDB,DUM9,SOSDBX,
     $              DUM10,SLTMP,ULTMP,LGTMP,DUM11,SLTFP,ULTFP,LGTFP,
     $              DUM12,MST,FRAC,MSTFP,FRACFP,MSTB,FRACB,MSTBFP,
     $              FRACBX,DUM13,SLME,SLSM,ULSM,LLSM,ALSM,DUM14,
     $              AGGTFG,PSWCNT,DUM15,NITIF,NIAFFP,NIACFP,VNUTFG,
     $              FORAFG,ITMAXA,BNUMN,CNUMN,NUPTFG,FIXNFG,AMVOFG,
     $              ALPNFG,VNPRFG,NIADFG,NCRP,CRPDAT,CRPDAY,CRPFRC,
     $              NUPTGT,NMXRAT,WILTPT,NIAFXM,NIACNM,SKPLNM,UKPLNM,
     $              LKPLNM,AKPLNM,SKRBNM,UKRBNM,LKRBNM,AKRBNM,KRANM,
     $              SKRLNM,UKRLNM,BNPRFM,LNPRFM,SKUNIM,UKUNIM,LKUNIM,
     $              AKUNIM,SKUAMM,UKUAMM,LKUAMM,AKUAMM,SKINIM,UKINIM
      COMMON/SCRTCH/LKINIM,AKINIM,SKIAMM,UKIAMM,LKIAMM,AKIAMM,NUPTFM,
     $              SNUPTM,UNUPTM,LNUPTM,ANUPTM,GNPM,SNPM,UNPM,LNPM,
     $              ANPM,SORNPM,UORNPM,LORNPM,AORNPM,SCSATN,UCSATN,
     $              LCSATN,ACSATN,SANUFM,UANUFM,LANUFM,AANUFM,SKVOL,
     $              UKVOL,LKVOL,AKVOL,THVOL,TRFVOL,BIVLN,CIVLN,NWCNT,
     $              NECNT,AGPLTN,LITTRN,SN,UN,IN,LN,AN,TN,TOTN,SNDFC,
     $              UNDFC,LNDFC,ANDFC,TNDFC,AGPLNX,LITRNX,SNFP,UNFP,
     $              INFP,LNFP,ANFP,TNFP,TNITFP,NDFCTX,SNB,UNB,INB,
     $              SKPLN,UKPLN,LKPLN,AKPLN,KRETBN,KRETAN,SKSATN,
     $              UKSATN,LKSATN,AKSATN,SNUPTG,UNUPTG,LNUPTG,ANUPTG,
     $              NUPTGX,SPNUTG,UPNUTG,LPNUTG,APNUTG,ANUTF,SNRXF,
     $              UNRXF,LNRXF,ANRXF,SNRXFB,UNRXFB,NCFX1,NCFX2,NCFX3,
     $              NCFX4,NCFX5,NCFX6,NCFX7,NCFX8,NCFX9,NCFX10,NCFX11,
     $              NCFX12,NCFX13,NCFX14,NCFX15,NCFX16,NCFX17,NCFX18,
     $              NCFX19,NCFX20,NCFX21,NCFX22,NCFX23,NCFX24,NCFX25,
     $              NCFX26,NCFX27,NCFX28,SOSEDN,PONO3,PONH4,POORN,
     $              PONITR,SDNFP,TSAMSX,SSAMSX,TSNO3X,SSNO3X,TDNIFP,
     $              NIADDX,NIADWX,NFIXFP,TSSLNX,SSSLNX,TSSRNX,SSSRNX
      COMMON/SCRTCH/AMVOLX,OSDNFP,PONIFP,POAMFP,POONFP,PONFP,DUMPER
      INTEGER       AIRTFG,SNOWFG,PWATFG,SEDFG,PSTFG,PWGFG,PQALFG,
     $              MSTLFG,PESTFG,NITRFG,PHOSFG,TRACFG,AGFG,PFLAG(12),
     $              PIVL,PYREND,PERPFG,UUNITS,IUNITS,OUNITS,PUNIT(2),
     $              MESSU,MSGFL,LSNO,LSID(5),NDAY(12),NDAYS,NBLKS,
     $              HRFG,DAYFG,STFG,EDAYFG,EMONFG,EPYRFG,YR,MON,DAY,
     $              HR,MIN,IVL,IVL1,PIVLNO,NXTMON,SPAFP,SPAKND,SPIVL,
     $              SPOPNO,DUMGEN(15),PRECFP,SOSDFP,SOSDBX(5),SLTFP,
     $              ULTFP,LGTFP,MSTFP(5),FRACFP(8),MSTBFP(3,5),
     $              FRACBX(5,5),AGGTFG,PSWCNT(6),NIAFFP(3,2),
     $              NIACFP(3,2),VNUTFG,FORAFG,ITMAXA,BNUMN,CNUMN,
     $              NUPTFG,FIXNFG,AMVOFG,ALPNFG,VNPRFG,NIADFG(12),
     $              NCRP,CRPDAT(4,3),CRPDAY(13,3),BIVLN,CIVLN,
     $              NWCNT(6),NECNT(1),AGPLNX,LITRNX,SNFP(8),UNFP(8),
     $              INFP(4),LNFP(8),ANFP(8),TNFP(8),TNITFP,NDFCTX(5),
     $              NUPTGX(4),SDNFP(3),TSAMSX(5),SSAMSX(3),TSNO3X(5),
     $              SSNO3X(3),TDNIFP,NIADDX(3,2),NIADWX(3,2),
     $              NFIXFP(5),TSSLNX(5),SSSLNX(3),TSSRNX(5),SSSRNX(3),
     $              AMVOLX(5),OSDNFP,PONIFP,POAMFP,POONFP,PONFP
      REAL          DELT,DELT60,DELT5,NBLKSI,SNIF(5),SURS,UZS,LZS,
     $              AGWS,SURSB(5),UZSB(5),SOSED,SOSDB(5),SLTMP,ULTMP,
     $              LGTMP,MST(5),FRAC(8),MSTB(3,5),FRACB(5,5),SLME,
     $              SLSM,ULSM,LLSM,ALSM,NITIF(3,5),CRPFRC(13,3),
     $              NUPTGT,NMXRAT,WILTPT(4),NIAFXM(12,3,2),
     $              NIACNM(12,3,2),SKPLNM(12),UKPLNM(12),LKPLNM(12),
     $              AKPLNM(12),SKRBNM(12),UKRBNM(12),LKRBNM(12),
     $              AKRBNM(12),KRANM(12),SKRLNM(12),UKRLNM(12),
     $              BNPRFM(12),LNPRFM(12),SKUNIM(12),UKUNIM(12),
     $              LKUNIM(12),AKUNIM(12),SKUAMM(12),UKUAMM(12),
     $              LKUAMM(12),AKUAMM(12),SKINIM(12),UKINIM(12),
     $              LKINIM(12),AKINIM(12),SKIAMM(12),UKIAMM(12),
     $              LKIAMM(12),AKIAMM(12),NUPTFM(12),SNUPTM(12),
     $              UNUPTM(12),LNUPTM(12),ANUPTM(12),GNPM(11),
     $              SNPM(11),UNPM(11),LNPM(11),ANPM(11),SORNPM(4),
     $              UORNPM(4),LORNPM(4),AORNPM(4),SCSATN(4),UCSATN(4),
     $              LCSATN(4),ACSATN(4),SANUFM(12),UANUFM(12),
     $              LANUFM(12),AANUFM(12),SKVOL,UKVOL,LKVOL,AKVOL
      REAL          THVOL,TRFVOL,AGPLTN,LITTRN,SN(8),UN(8),IN(4),
     $              LN(8),AN(8),TN(8),TOTN(5),SNDFC,UNDFC,LNDFC,ANDFC,
     $              TNDFC,SNB(8,5),UNB(8,5),INB(4,5),SKPLN,UKPLN,
     $              LKPLN,AKPLN,KRETBN(5),KRETAN(4),SKSATN(4),
     $              UKSATN(4),LKSATN(4),AKSATN(4),SNUPTG,UNUPTG,
     $              LNUPTG,ANUPTG,SPNUTG,UPNUTG,LPNUTG,APNUTG,
     $              ANUTF(4),SNRXF(16),UNRXF(16),LNRXF(16),ANRXF(16),
     $              SNRXFB(16,5),UNRXFB(16,5),NCFX1(3,5),NCFX2(5,5),
     $              NCFX3(3,5),NCFX4(5,5),NCFX5(3,5),NCFX6(5,5),
     $              NCFX7(5,5),NCFX8(5,5),NCFX9(5,5),NCFX10(3,2,5),
     $              NCFX11(3,2,5),NCFX12(5,5),NCFX13(5,5),NCFX14(3,5),
     $              NCFX15(5,5),NCFX16(3,5),NCFX17(5,5),NCFX18(5,5),
     $              NCFX19(5,5),NCFX20(5,5),NCFX21(5,5),NCFX22(5,5),
     $              NCFX23(5,5),NCFX24(1,5),NCFX25(3,5),NCFX26(3,5),
     $              NCFX27(5,5),NCFX28(5,5),SOSEDN,PONO3,PONH4,POORN,
     $              PONITR
      INTEGER       DUM1(3),DUM2(28),DUM3(289),DUM4,DUM5(30),
     $              DUM6(438),DUM7(12),DUM8(51),DUM9(10),DUM10(77),
     $              DUM11(8),DUM12(1544),DUM13(259),DUM14(120),
     $              DUM15(742),DUMPER(12126)
C
      EQUIVALENCE   (ASVEC,AIRTFG),(PRTDAT,PFLAG),(UNIT,UUNITS),
     $              (TIMFG,HRFG),(DATIM,YR),(PREC,SNIF),(SOILM,SLME),
     $              (NITFG,VNUTFG),(NYLDPM,NUPTGT),(AMVOPM,SKVOL),
     $              (TOTNIT,TOTN(1)),(NDFCT,SNDFC),(KPLN,SKPLN),
     $              (NUPTG,SNUPTG),(SEDN,NCFX1(1,1)),
     $              (TSAMS,NCFX2(1,1)),(SSAMS,NCFX3(1,1)),
     $              (TSNO3,NCFX4(1,1)),(SSNO3,NCFX5(1,1)),
     $              (DENIF,NCFX6(1,1)),(AMNIT,NCFX7(1,1)),
     $              (AMIMB,NCFX8(1,1)),(ORNMN,NCFX9(1,1)),
     $              (NIADDR,NCFX10(1,1,1)),(NIADWT,NCFX11(1,1,1))
      EQUIVALENCE   (NFIXFX,NCFX12(1,1)),(TSSLN,NCFX13(1,1)),
     $              (SSSLN,NCFX14(1,1)),(TSSRN,NCFX15(1,1)),
     $              (SSSRN,NCFX16(1,1)),(NIIMB,NCFX17(1,1)),
     $              (AMVOL,NCFX18(1,1)),(REFRON,NCFX19(1,1)),
     $              (NIUPA,NCFX20(1,1)),(AMUPA,NCFX21(1,1)),
     $              (NIUPB,NCFX22(1,1)),(AMUPB,NCFX23(1,1)),
     $              (RETAGN,NCFX24(1,1)),(RTLLN,NCFX25(1,1)),
     $              (RTRLN,NCFX26(1,1)),(RTLBN,NCFX27(1,1)),
     $              (RTRBN,NCFX28(1,1))
      INTEGER       ASVEC(12),PRTDAT(14),UNIT(5),TIMFG(6),DATIM(5),
     $              NITFG(10)
      REAL          PREC,SOILM(5),NYLDPM(2),AMVOPM(6),TOTNIT,NDFCT(5),
     $              KPLN(4),NUPTG(4),SEDN(3),TSAMS(5),SSAMS(3),
     $              TSNO3(5),SSNO3(3),DENIF(5),AMNIT(5),AMIMB(5),
     $              ORNMN(5),NIADDR(3,2),NIADWT(3,2),NFIXFX(5),
     $              TSSLN(5),SSSLN(3),TSSRN(5),SSSRN(3),NIIMB(5),
     $              AMVOL(5),REFRON(5),NIUPA(5),AMUPA(5),NIUPB(5),
     $              AMUPB(5),RETAGN,RTLLN(3),RTRLN(3),RTLBN(5),
     $              RTRBN(5)
C     end byte:  72000 word:18000
