Symbol Description Uses
AA5 15



File Line number Procedure Code
./pkg/fizhi/fizhi_utils.F 36 NO PROCEDURE
      PARAMETER ( AA5  =   1.061405429 )
./pkg/fizhi/fizhi_utils.F 40 NO PROCEDURE
      PARAMETER ( X4   =   AA5 / AA3   )
./pkg/fizhi/fizhi_utils.F 41 NO PROCEDURE
      PARAMETER ( X5   =   AA5 / AA4   )
./pkg/seaice/lsr.F 153 LSR
          AA5= -(AA3-AA4) * _tanPhiAtV(I,J,bi,bj)
./pkg/seaice/lsr.F 162 LSR
     &           + AA5 + AA6
./pkg/seaice/lsr.F 381 LSR
          AA5=(zetaMinusEta(I-1,J  ,bi,bj) + zetaMinusEta(I,J  ,bi,bj)
./pkg/seaice/lsr.F 406 LSR
     &        +( (AA1+AA2) + (AA3+AA4)  + AA5 + AA6
./pkg/seaice/lsr.F 53 LSR
      _RL  AA1, AA2, AA3, AA4, AA5, AA6, S1, S2, S1A, S2A
./pkg/seaice/seaice_lsr.F 1181 SEAICE_LSR
          AA5 = etaMeanZ(I,J  ,bi,bj) * _recip_dyG(I,J,bi,bj)
./pkg/seaice/seaice_lsr.F 1211 SEAICE_LSR
     &         + ( (AA4+AA3) - (AA6-AA5) + AA7
./pkg/seaice/seaice_lsr.F 1216 SEAICE_LSR
          UVRT1(I,J,bi,bj)= AA3 - AA5 - AA8
./pkg/seaice/seaice_lsr.F 1461 SEAICE_LSR
          AA5= zetaMinusEta(I,J  ,bi,bj) * _tanPhiAtU(I,J,  bi,bj)
./pkg/seaice/seaice_lsr.F 1476 SEAICE_LSR
     &         + AA5
./pkg/seaice/seaice_lsr.F 1480 SEAICE_LSR
     &         +( (AA1+AA2) + (AA3+AA4)  + (AA5-AA6)
./pkg/seaice/seaice_lsr.F 897 SEAICE_LSR
      _RL AA1, AA2, AA3, AA4, AA5, AA6, AA7, AA8, S1, S2, S1A, S2A