Symbol Description Uses
PR Reference pressure [db] 20



File Line number Procedure Code
./pkg/openad/seawater.F 116 SW_TEMP
      _RL  S, T, P, PR
./pkg/openad/seawater.F 123 SW_TEMP
      CALL SW_PTMP  (S,T,PR,P,rv)
./pkg/openad/seawater.F 18 SW_PTMP
      SUBROUTINE SW_PTMP  (S,T,P,PR, rv)
./pkg/openad/seawater.F 44 SW_PTMP
      _RL S,T,P,PR
./pkg/openad/seawater.F 56 SW_PTMP
      del_P  = PR - P
./pkg/openad/seawater.F 86 SW_TEMP
      SUBROUTINE SW_TEMP( S, T, P, PR, rv)
./pkg/sbo/sbo_rho.F 25 NO PROCEDURE
      _RL PLAT,D,C1,P,PR,Q,X,SR,V350P,B
./pkg/sbo/sbo_rho.F 46 NO PROCEDURE
      PR = P
./pkg/sbo/sbo_rho.F 48 NO PROCEDURE
      Q = PR*((((-2.1687E-16*T+1.8676E-14)*T-4.6206E-13)*P+
./pkg/sbo/sbo_rho.F 55 NO PROCEDURE
      P = P + 0.5*PR
./pkg/sbo/sbo_rho.F 56 NO PROCEDURE
      x = PR*((((-2.1687E-16*T+1.8676E-14)*T-4.6206E-13)*P+
./pkg/sbo/sbo_rho.F 64 NO PROCEDURE
      x = PR*((((-2.1687E-16*T+1.8676E-14)*T-4.6206E-13)*P+
./pkg/sbo/sbo_rho.F 72 NO PROCEDURE
      P = P + 0.5*PR 
./pkg/sbo/sbo_rho.F 73 NO PROCEDURE
      x = PR*((((-2.1687E-16*T+1.8676E-14)*T-4.6206E-13)*P+
./model/src/seawater.F 112 NO PROCEDURE
      _RL  S, T, P, PR
./model/src/seawater.F 119 NO PROCEDURE
      SW_temp = SW_PTMP (S,T,PR,P)
./model/src/seawater.F 19 NO PROCEDURE
      _RL FUNCTION SW_PTMP  (S,T,P,PR)
./model/src/seawater.F 43 NO PROCEDURE
      _RL S,T,P,PR
./model/src/seawater.F 56 NO PROCEDURE
      del_P  = PR - P
./model/src/seawater.F 83 NO PROCEDURE
      _RL FUNCTION SW_TEMP( S, T, P, PR )