Symbol Description Uses
parfrac fraction of Qsw that is PAR 7



File Line number Procedure Code
./pkg/dic/DIC_VARS.h 125 NO PROCEDURE
     &     parfrac, k0, lit0,
./pkg/dic/DIC_VARS.h 171 NO PROCEDURE
      _RL k0, parfrac, lit0
./pkg/dic/bio_export.F 88 BIO_EXPORT
        lit(i,j)=-parfrac*Qsw(i,j,bi,bj)*maskC(i,j,1,bi,bj)
./pkg/dic/dic_readparms.F 115 DIC_READPARMS
       parfrac     = 0.4 _d 0
./pkg/dic/dic_readparms.F 226 DIC_READPARMS
       CALL WRITE_0D_RL( parfrac, INDEX_NONE,'parfrac =',
./pkg/dic/dic_readparms.F 86 DIC_READPARMS
     & parfrac, k0, lit0, KPO4, KFE,
./pkg/dic/insol.F 82 INSOL
          fluxi = solar*(1. _d 0-albedo)*cosz*frac*parfrac