| File |
Line number |
Procedure |
Code |
|
./pkg/opps/opps_calc.F |
626 |
OPPS_CALC |
rhoNum = eosMDJWFnum(0) |
|
./pkg/opps/opps_calc.F |
627 |
OPPS_CALC |
& + t1*(eosMDJWFnum(1) |
|
./pkg/opps/opps_calc.F |
628 |
OPPS_CALC |
& + t1*(eosMDJWFnum(2) + eosMDJWFnum(3)*t1) ) |
|
./pkg/opps/opps_calc.F |
629 |
OPPS_CALC |
& + s1*(eosMDJWFnum(4) |
|
./pkg/opps/opps_calc.F |
630 |
OPPS_CALC |
& + eosMDJWFnum(5)*t1 + eosMDJWFnum(6)*s1) |
|
./pkg/opps/opps_calc.F |
631 |
OPPS_CALC |
& + p1*(eosMDJWFnum(7) + eosMDJWFnum(8)*t2 |
|
./pkg/opps/opps_calc.F |
632 |
OPPS_CALC |
& + eosMDJWFnum(9)*s1 |
|
./pkg/opps/opps_calc.F |
633 |
OPPS_CALC |
& + p1*(eosMDJWFnum(10) + eosMDJWFnum(11)*t2) ) |
|
./model/src/ini_eos.F |
218 |
INI_EOS |
eosMDJWFnum( 0) = 9.99843699 _d +02 |
|
./model/src/ini_eos.F |
219 |
INI_EOS |
eosMDJWFnum( 1) = 7.35212840 _d +00 |
|
./model/src/ini_eos.F |
220 |
INI_EOS |
eosMDJWFnum( 2) = -5.45928211 _d -02 |
|
./model/src/ini_eos.F |
221 |
INI_EOS |
eosMDJWFnum( 3) = 3.98476704 _d -04 |
|
./model/src/ini_eos.F |
222 |
INI_EOS |
eosMDJWFnum( 4) = 2.96938239 _d +00 |
|
./model/src/ini_eos.F |
223 |
INI_EOS |
eosMDJWFnum( 5) = -7.23268813 _d -03 |
|
./model/src/ini_eos.F |
224 |
INI_EOS |
eosMDJWFnum( 6) = 2.12382341 _d -03 |
|
./model/src/ini_eos.F |
225 |
INI_EOS |
eosMDJWFnum( 7) = 1.04004591 _d -02 |
|
./model/src/ini_eos.F |
226 |
INI_EOS |
eosMDJWFnum( 8) = 1.03970529 _d -07 |
|
./model/src/ini_eos.F |
227 |
INI_EOS |
eosMDJWFnum( 9) = 5.18761880 _d -06 |
|
./model/src/ini_eos.F |
228 |
INI_EOS |
eosMDJWFnum(10) = -3.24041825 _d -08 |
|
./model/src/ini_eos.F |
229 |
INI_EOS |
eosMDJWFnum(11) = -1.23869360 _d -11 |
|
./model/src/ini_eos.F |
62 |
INI_EOS |
eosMDJWFnum(k) = 0. _d 0 |
|
./model/src/find_alpha.F |
243 |
FIND_ALPHA |
dnum_dtheta = eosMDJWFnum(1) |
|
./model/src/find_alpha.F |
244 |
FIND_ALPHA |
& + t1*(2.*eosMDJWFnum(2) + 3.*eosMDJWFnum(3)*t1) |
|
./model/src/find_alpha.F |
245 |
FIND_ALPHA |
& + eosMDJWFnum(5)*s1 |
|
./model/src/find_alpha.F |
246 |
FIND_ALPHA |
& + p1t1*(2.*eosMDJWFnum(8) + 2.*eosMDJWFnum(11)*p1) |
|
./model/src/find_alpha.F |
482 |
FIND_BETA |
dnum_dsalt = eosMDJWFnum(4) |
|
./model/src/find_alpha.F |
483 |
FIND_BETA |
& + eosMDJWFnum(5)*t1 |
|
./model/src/find_alpha.F |
484 |
FIND_BETA |
& + 2.*eosMDJWFnum(6)*s1 + eosMDJWFnum(9)*p1 |
|
./model/src/find_rho.F |
465 |
FIND_RHONUM |
rhoNum(i,j) = eosMDJWFnum(0) |
|
./model/src/find_rho.F |
466 |
FIND_RHONUM |
& + t1*(eosMDJWFnum(1) |
|
./model/src/find_rho.F |
467 |
FIND_RHONUM |
& + t1*(eosMDJWFnum(2) + eosMDJWFnum(3)*t1) ) |
|
./model/src/find_rho.F |
468 |
FIND_RHONUM |
& + s1*(eosMDJWFnum(4) |
|
./model/src/find_rho.F |
469 |
FIND_RHONUM |
& + eosMDJWFnum(5)*t1 + eosMDJWFnum(6)*s1) |
|
./model/src/find_rho.F |
470 |
FIND_RHONUM |
& + p1*(eosMDJWFnum(7) + eosMDJWFnum(8)*t2 |
|
./model/src/find_rho.F |
471 |
FIND_RHONUM |
& + eosMDJWFnum(9)*s1 |
|
./model/src/find_rho.F |
472 |
FIND_RHONUM |
& + p1*(eosMDJWFnum(10) + eosMDJWFnum(11)*t2) ) |
|
./model/src/find_rho.F |
726 |
FIND_RHO_SCALAR |
rhoNum = eosMDJWFnum(0) |
|
./model/src/find_rho.F |
727 |
FIND_RHO_SCALAR |
& + t1*(eosMDJWFnum(1) |
|
./model/src/find_rho.F |
728 |
FIND_RHO_SCALAR |
& + t1*(eosMDJWFnum(2) + eosMDJWFnum(3)*t1) ) |
|
./model/src/find_rho.F |
729 |
FIND_RHO_SCALAR |
& + s1*(eosMDJWFnum(4) |
|
./model/src/find_rho.F |
730 |
FIND_RHO_SCALAR |
& + eosMDJWFnum(5)*t1 + eosMDJWFnum(6)*s1) |
|
./model/src/find_rho.F |
731 |
FIND_RHO_SCALAR |
& + p1*(eosMDJWFnum(7) + eosMDJWFnum(8)*t2 |
|
./model/src/find_rho.F |
732 |
FIND_RHO_SCALAR |
& + eosMDJWFnum(9)*s1 |
|
./model/src/find_rho.F |
733 |
FIND_RHO_SCALAR |
& + p1*(eosMDJWFnum(10) + eosMDJWFnum(11)*t2) ) |
|
./model/inc/EOS.h |
53 |
NO PROCEDURE |
_RL eosMDJWFnum(0:11), eosMDJWFden(0:12) |
|
./model/inc/EOS.h |
55 |
NO PROCEDURE |
& eosMDJWFnum, eosMDJWFden |