Symbol Description Uses
del_P 36


File Line number Procedure Code
./verification/OpenAD/code_oad_all/seawater.F 116 SW_TEMP 
      _RL del_P ,del_th, th, q
./verification/OpenAD/code_oad_all/seawater.F 124 SW_TEMP 
      del_P  = P - PR ! to get in-situ from potential temperature
./verification/OpenAD/code_oad_all/seawater.F 126 SW_TEMP 
      del_th = del_P*adtg_val
./verification/OpenAD/code_oad_all/seawater.F 130 SW_TEMP 
      call SW_ADTG(S,th,P+onehalf*del_P, adtg_val)
./verification/OpenAD/code_oad_all/seawater.F 131 SW_TEMP 
      del_th = del_P*adtg_val
./verification/OpenAD/code_oad_all/seawater.F 137 SW_TEMP 
      call SW_ADTG(S,th,P+onehalf*del_P, adtg_val)
./verification/OpenAD/code_oad_all/seawater.F 138 SW_TEMP 
      del_th = del_P*adtg_val
./verification/OpenAD/code_oad_all/seawater.F 143 SW_TEMP 
      call SW_ADTG(S,th,P+del_P, adtg_val)
./verification/OpenAD/code_oad_all/seawater.F 144 SW_TEMP 
      del_th = del_P*adtg_val
./verification/OpenAD/code_oad_all/seawater.F 45 SW_PTMP 
      _RL del_P ,del_th, th, q
./verification/OpenAD/code_oad_all/seawater.F 52 SW_PTMP 
      del_P  = PR - P
./verification/OpenAD/code_oad_all/seawater.F 54 SW_PTMP 
      del_th = del_P*adtg_val
./verification/OpenAD/code_oad_all/seawater.F 58 SW_PTMP 
      call SW_ADTG(S,th,P+onehalf*del_P, adtg_val)
./verification/OpenAD/code_oad_all/seawater.F 59 SW_PTMP 
      del_th = del_P*adtg_val
./verification/OpenAD/code_oad_all/seawater.F 65 SW_PTMP 
      call SW_ADTG(S,th,P+onehalf*del_P, adtg_val)
./verification/OpenAD/code_oad_all/seawater.F 66 SW_PTMP 
      del_th = del_P*adtg_val
./verification/OpenAD/code_oad_all/seawater.F 71 SW_PTMP 
      call SW_ADTG(S,th,P+del_P, adtg_val)
./verification/OpenAD/code_oad_all/seawater.F 72 SW_PTMP 
      del_th = del_P*adtg_val
./model/src/seawater.F 117 NO PROCEDURE 
      _RL del_P ,del_th, th, q
./model/src/seawater.F 124 NO PROCEDURE 
      del_P  = P - PR ! to get in-situ from potential temperature
./model/src/seawater.F 125 NO PROCEDURE 
      del_th = del_P*sw_adtg(S,T,P)
./model/src/seawater.F 129 NO PROCEDURE 
      del_th = del_P*sw_adtg(S,th,P+onehalf*del_P)
./model/src/seawater.F 135 NO PROCEDURE 
      del_th = del_P*sw_adtg(S,th,P+onehalf*del_P)
./model/src/seawater.F 140 NO PROCEDURE 
      del_th = del_P*sw_adtg(S,th,P+del_P)
./model/src/seawater.F 48 NO PROCEDURE 
      _RL del_P ,del_th, th, q
./model/src/seawater.F 54 NO PROCEDURE 
      del_P  = PR - P
./model/src/seawater.F 55 NO PROCEDURE 
      del_th = del_P*sw_adtg(S,T,P)
./model/src/seawater.F 59 NO PROCEDURE 
      del_th = del_P*sw_adtg(S,th,P+onehalf*del_P)
./model/src/seawater.F 65 NO PROCEDURE 
      del_th = del_P*sw_adtg(S,th,P+onehalf*del_P)
./model/src/seawater.F 70 NO PROCEDURE 
      del_th = del_P*sw_adtg(S,th,P+del_P)