Symbol Description Uses
A11 31


File Line number Procedure Code
./pkg/fizhi/fizhi_lsm.F 1009 FLUXES 
     &          /  ( A11 - ALHX(CHNO)*DEDTC(ChNo) )
./pkg/fizhi/fizhi_lsm.F 1042 FLUXES 
     &            ( A11 - ALHX(CHNO)*DEDTC(ChNo) )
./pkg/fizhi/fizhi_lsm.F 1056 FLUXES 
     &              ( A11 - ALHX(CHNO)*DEDTC(ChNo) )
./pkg/fizhi/fizhi_lsm.F 1059 FLUXES 
            Q0SNOW=A11*DTC+A12*DEA
./pkg/fizhi/fizhi_lsm.F 1073 FLUXES 
        DTC = ( Q0 - A12*DEA ) / A11
./pkg/fizhi/fizhi_lsm.F 1077 FLUXES 
          STRDG8(ChNo)=-A12*DEA/A11
./pkg/fizhi/fizhi_lsm.F 1086 FLUXES 
          DTC = ( Q0X - A12*DEA ) / A11
./pkg/fizhi/fizhi_lsm.F 1089 FLUXES 
            Q0SNOW=A11*DTC+A12*DEA
./pkg/fizhi/fizhi_lsm.F 859 FLUXES 
     &        EPLANT,     A11,     A12,     A21,     A22,      F0,
./pkg/fizhi/fizhi_lsm.F 880 FLUXES 
      A11 = CSOIL(ChNo)/DTSTEP +
./pkg/fizhi/fizhi_lsm.F 893 FLUXES 
          STRDG3(ChNo)=Q0/A11
./pkg/fizhi/fizhi_lsm.F 894 FLUXES 
          STRDG4(ChNo)=(SWNET(ChNo)+HLWDWN(ChNo)-HLWTC)/A11
./pkg/fizhi/fizhi_lsm.F 895 FLUXES 
          STRDG5(ChNo)=HSTURB(ChNo)/A11
./pkg/fizhi/fizhi_lsm.F 896 FLUXES 
          STRDG6(ChNo)=ALHX(CHNO)*ETURB(ChNo)/A11
./pkg/fizhi/fizhi_lsm.F 897 FLUXES 
          STRDG7(ChNo)=CDEEPS*(TC(ChNo) - TD(ChNo))/A11
./pkg/fizhi/fizhi_lsm.F 898 FLUXES 
          STRDG9(ChNo)=A11
./pkg/fizhi/fizhi_lsm.F 929 FLUXES 
          DETERM = MIN( A12*A21/(A11*A22) - 1., -0.1 _d 0)
./pkg/fizhi/fizhi_lsm.F 930 FLUXES 
          DEA = ( Q0*A21 - A11*F0 ) / ( DETERM * A11*A22 )
./pkg/fizhi/fizhi_lsm.F 931 FLUXES 
          DTC = ( Q0 - A12*DEA ) / A11
./pkg/fizhi/fizhi_lsm.F 935 FLUXES 
          STRDG8(ChNo)=-A12*DEA/A11
./pkg/fizhi/fizhi_lsm.F 940 FLUXES 
          DENOM = DETERM * A11*A22
./pkg/fizhi/fizhi_lsm.F 946 FLUXES 
          DEA = ( Q0*A21 - A11*F0 ) / ( A12*A21 - A11*A22 )
./pkg/fizhi/fizhi_lsm.F 947 FLUXES 
          DTC = ( Q0 - A12*DEA ) / A11
./pkg/fizhi/fizhi_lsm.F 951 FLUXES 
          STRDG8(ChNo)=-A12*DEA/A11
./pkg/fizhi/fizhi_lsm.F 956 FLUXES 
          DENOM = A12 * A21 - A11*A22
./pkg/fizhi/fizhi_lsm.F 973 FLUXES 
            DEA = ( Q0X*A21 - A11*F0 ) / DENOM
./pkg/fizhi/fizhi_lsm.F 974 FLUXES 
            DTC = ( Q0X - A12*DEA ) / A11
./pkg/fizhi/fizhi_lsm.F 983 FLUXES 
          Q0SNOW=A11*DTC+A12*DEA
./pkg/fizhi/fizhi_lsm.F 989 FLUXES 
          STRDG8(ChNo)=-A12*DEA/A11