Symbol Description Uses
AA 69



File Line number Procedure Code
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 1549 TRBFLX
      _RL AA(irun,NLEV),BB(irun,NLEV),SSDEV(irun,NLEV)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 1849 TRBFLX
       AA(I,NLEV) = 1. / (1. + CLH * BB(I,NLEV) )
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 1850 TRBFLX
       BB(I,NLEV) = BB(I,NLEV) * AA(I,NLEV) * plk(I,nlev)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 1853 TRBFLX
       SBAR(I,NLEV) = AA(I,NLEV) * (SH(I,NLEV) - SHSAT(I,NLEV))
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 1854 TRBFLX
       SSDEV(I,NLEV)=CT(I)*(AA(I,NLEV)*DSH(I,NLEV)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 1876 TRBFLX
       BETAW1(I,NLEV) = BETAW(I,NLEV) + AA(I,NLEV) * FCC(I,NLEV)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 1945 TRBFLX
       AA(I,1) = 1. / (1. + CLH * BB(I,1) )
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 1947 TRBFLX
       BB(I,1) = BB(I,1) * AA(I,1)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 1948 TRBFLX
       SBAR(I,1) = AA(I,1) * (SH(I,1) - SHSAT(I,1))
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 1952 TRBFLX
       SSDEV(I,1) = XL(I,1)*(AA(I,1)*DSH(I,1)-
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 1960 TRBFLX
       SSDEV(I,2) = XL(I,1)*(AA(I,2)*DSH(I,1)-
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 1965 TRBFLX
       SSDEV(I,2) = XL(I,2)*(AA(I,2)*DSH(I,2)-
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 1987 TRBFLX
       BETAW1(I,1) = BETAW(I,1) + AA(I,1) * FCC(I,1) * BETAL(I,1)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 3976 TRBDIF
      _RL AA(irun,nlev), BB(irun,nlev), CC(irun,nlev+1)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 3996 TRBDIF
      AA(I,1) = 1. + CC(I,1) + BB(I,1)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 4002 TRBDIF
      AA(I,1) = AA(I,1) - XX2(I,1)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 4007 TRBDIF
      CALL VTRI0(AA,BB,CC,XX1,XX1,NLEV,irun)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 4017 TRBDIF
      CALL VTRI1(AA,BB,XX2,NLEV,irun)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 4025 TRBDIF
      IF(ITYPE.EQ.3) CALL VTRI2 (AA,BB,CC,XX2,XX2,NLEV,irun)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 4458 ZCSUB
      _RL AA(IRUN,5),TEMP(IRUN)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 4514 ZCSUB
        AA(I,K) = AA1(K)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 4515 ZCSUB
        IF( INT2(I).EQ.1 )  AA(I,K) = AA2(K)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 4516 ZCSUB
        IF( INT3(I).EQ.1 )  AA(I,K) = AA3(K)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 4517 ZCSUB
        IF( INT4(I).EQ.1 )  AA(I,K) = AA4(K)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 4526 ZCSUB
       VDZSEA(I)  =  ( AA(I,4) + AA(I,5) * VUSTAR(I) ) * VUSTAR(I)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 4527 ZCSUB
       VZSEA(I)  =  AA(I,2) + ( AA(I,3) + VDZSEA(I) ) * VUSTAR(I)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 4528 ZCSUB
       TEMP(I) = AA(I,1) / VUSTAR(I)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 4538 ZCSUB
        VDZSEA(I)  =  3. * VDZSEA(I) -(AA(I,4)*VUSTAR(I) - AA(I,3))
./pkg/fizhi/fizhi_turb.F 1509 TRBFLX
      _RL AA(irun,NLEV),BB(irun,NLEV),SSDEV(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 1809 TRBFLX
       AA(I,NLEV) = 1. / (1. + CLH * BB(I,NLEV) )
./pkg/fizhi/fizhi_turb.F 1810 TRBFLX
       BB(I,NLEV) = BB(I,NLEV) * AA(I,NLEV) * plk(I,nlev)
./pkg/fizhi/fizhi_turb.F 1813 TRBFLX
       SBAR(I,NLEV) = AA(I,NLEV) * (SH(I,NLEV) - SHSAT(I,NLEV))
./pkg/fizhi/fizhi_turb.F 1814 TRBFLX
       SSDEV(I,NLEV)=CT(I)*(AA(I,NLEV)*DSH(I,NLEV)
./pkg/fizhi/fizhi_turb.F 1836 TRBFLX
       BETAW1(I,NLEV) = BETAW(I,NLEV) + AA(I,NLEV) * FCC(I,NLEV)
./pkg/fizhi/fizhi_turb.F 1905 TRBFLX
       AA(I,1) = 1. / (1. + CLH * BB(I,1) )
./pkg/fizhi/fizhi_turb.F 1907 TRBFLX
       BB(I,1) = BB(I,1) * AA(I,1)
./pkg/fizhi/fizhi_turb.F 1908 TRBFLX
       SBAR(I,1) = AA(I,1) * (SH(I,1) - SHSAT(I,1))
./pkg/fizhi/fizhi_turb.F 1912 TRBFLX
       SSDEV(I,1) = XL(I,1)*(AA(I,1)*DSH(I,1)-
./pkg/fizhi/fizhi_turb.F 1920 TRBFLX
       SSDEV(I,2) = XL(I,1)*(AA(I,2)*DSH(I,1)-
./pkg/fizhi/fizhi_turb.F 1925 TRBFLX
       SSDEV(I,2) = XL(I,2)*(AA(I,2)*DSH(I,2)-
./pkg/fizhi/fizhi_turb.F 1947 TRBFLX
       BETAW1(I,1) = BETAW(I,1) + AA(I,1) * FCC(I,1) * BETAL(I,1)
./pkg/fizhi/fizhi_turb.F 3937 TRBDIF
      _RL AA(irun,nlev), BB(irun,nlev), CC(irun,nlev+1)
./pkg/fizhi/fizhi_turb.F 3957 TRBDIF
      AA(I,1) = 1. + CC(I,1) + BB(I,1)
./pkg/fizhi/fizhi_turb.F 3963 TRBDIF
      AA(I,1) = AA(I,1) - XX2(I,1)
./pkg/fizhi/fizhi_turb.F 3968 TRBDIF
      CALL VTRI0(AA,BB,CC,XX1,XX1,NLEV,irun)
./pkg/fizhi/fizhi_turb.F 3978 TRBDIF
      CALL VTRI1(AA,BB,XX2,NLEV,irun)
./pkg/fizhi/fizhi_turb.F 3986 TRBDIF
      IF(ITYPE.EQ.3) CALL VTRI2 (AA,BB,CC,XX2,XX2,NLEV,irun)
./pkg/fizhi/fizhi_turb.F 4419 ZCSUB
      _RL AA(IRUN,5),TEMP(IRUN)
./pkg/fizhi/fizhi_turb.F 4475 ZCSUB
        AA(I,K) = AA1(K)
./pkg/fizhi/fizhi_turb.F 4476 ZCSUB
        IF( INT2(I).EQ.1 )  AA(I,K) = AA2(K)
./pkg/fizhi/fizhi_turb.F 4477 ZCSUB
        IF( INT3(I).EQ.1 )  AA(I,K) = AA3(K)
./pkg/fizhi/fizhi_turb.F 4478 ZCSUB
        IF( INT4(I).EQ.1 )  AA(I,K) = AA4(K)
./pkg/fizhi/fizhi_turb.F 4487 ZCSUB
       VDZSEA(I)  =  ( AA(I,4) + AA(I,5) * VUSTAR(I) ) * VUSTAR(I)
./pkg/fizhi/fizhi_turb.F 4488 ZCSUB
       VZSEA(I)  =  AA(I,2) + ( AA(I,3) + VDZSEA(I) ) * VUSTAR(I)
./pkg/fizhi/fizhi_turb.F 4489 ZCSUB
       TEMP(I) = AA(I,1) / VUSTAR(I)
./pkg/fizhi/fizhi_turb.F 4499 ZCSUB
        VDZSEA(I)  =  3. * VDZSEA(I) -(AA(I,4)*VUSTAR(I) - AA(I,3))
./pkg/fizhi/fizhi_lsm.F 703 RCUNST
     &                DUM2,          DUM3,            AA,      BB,
./pkg/fizhi/fizhi_lsm.F 735 RCUNST
      AA = 0.5 - (0.633 + 0.330*VGCHIL(ITYP(ChNo)))*VGCHIL(ITYP(ChNo))
./pkg/fizhi/fizhi_lsm.F 736 RCUNST
      BB = 0.877 * ( ONE - 2.*AA )
./pkg/fizhi/fizhi_lsm.F 737 RCUNST
      CC =  ( AA + BB*SUNANG(ChNo) ) / SUNANG(ChNo)
./pkg/fizhi/fizhi_lsm.F 743 RCUNST
      DUM2 = (ONE-PDIR(ChNo)) * ( BB*(ONE/3.+PIE/4.) + AA*1.5 )