Symbol Description Uses
SW_ADTG 7



File Line number Procedure Code
./pkg/openad/seawater.F 133 SW_ADTG
      SUBROUTINE SW_ADTG  (S,T,P, rv)
./pkg/openad/seawater.F 57 SW_PTMP
      call SW_ADTG(S,T,P, adtg_val)
./pkg/openad/seawater.F 62 SW_PTMP
      call SW_ADTG(S,th,P+onehalf*del_P, adtg_val)
./pkg/openad/seawater.F 69 SW_PTMP
      call SW_ADTG(S,th,P+onehalf*del_P, adtg_val)
./pkg/openad/seawater.F 75 SW_PTMP
      call SW_ADTG(S,th,P+del_P, adtg_val)
./model/src/seawater.F 129 NO PROCEDURE
      _RL FUNCTION SW_ADTG  (S,T,P)
./model/src/seawater.F 173 NO PROCEDURE
      SW_ADTG =      a0 + (a1 + (a2 + a3*T)*T)*T