File |
Line number |
Procedure |
Code |
./pkg/opps/opps_calc.F |
484 |
OPPS_CALC |
IF ( buoyancyRelation .EQ. 'OCEANIC' ) THEN |
./pkg/opps/opps_calc.F |
498 |
OPPS_CALC |
ELSEIF ( buoyancyRelation .EQ. 'OCEANICP' ) THEN |
./pkg/opps/opps_check.F |
33 |
OPPS_CHECK |
IF ( buoyancyRelation .NE. 'OCEANIC' ) THEN |
./pkg/opps/opps_interface.F |
93 |
OPPS_INTERFACE |
IF ( buoyancyRelation .eq. 'OCEANIC' ) THEN |
./pkg/opps/opps_interface.F |
95 |
OPPS_INTERFACE |
ELSEIF ( buoyancyRelation .eq. 'OCEANICP' ) THEN |
./pkg/opps/opps_interface.F |
97 |
OPPS_INTERFACE |
ELSEIF ( buoyancyRelation .eq. 'ATMOSPHERIC' ) THEN |
./pkg/my82/my82_check.F |
33 |
MY82_CHECK |
IF ( buoyancyRelation .NE. 'OCEANIC' ) THEN |
./model/src/calc_phi_hyd.F |
135 |
CALC_PHI_HYD |
IF ( buoyancyRelation .EQ. 'OCEANIC' ) THEN |
./model/src/calc_phi_hyd.F |
221 |
CALC_PHI_HYD |
ELSEIF ( buoyancyRelation .EQ. 'OCEANICP' ) THEN |
./model/src/calc_phi_hyd.F |
325 |
CALC_PHI_HYD |
ELSEIF ( buoyancyRelation .EQ. 'ATMOSPHERIC' ) THEN |
./model/src/calc_buoyancy.F |
37 |
CALC_BUOYANCY |
IF ( buoyancyRelation .eq. 'ATMOSPHERIC' ) THEN |
./model/src/calc_buoyancy.F |
45 |
CALC_BUOYANCY |
ELSEIF ( buoyancyRelation .eq. 'OCEANIC' ) THEN |
./model/src/calc_buoyancy.F |
53 |
CALC_BUOYANCY |
ELSEIF ( buoyancyRelation .eq. 'OCEANICP' ) THEN |
./model/src/ini_linear_phisurf.F |
103 |
INI_LINEAR_PHISURF |
ELSEIF ( buoyancyRelation .eq. 'OCEANICP' ) THEN |
./model/src/ini_linear_phisurf.F |
129 |
INI_LINEAR_PHISURF |
ELSEIF ( buoyancyRelation .eq. 'ATMOSPHERIC' ) THEN |
./model/src/ini_linear_phisurf.F |
160 |
INI_LINEAR_PHISURF |
IF ( ( buoyancyRelation .eq. 'ATMOSPHERIC' .OR. |
./model/src/ini_linear_phisurf.F |
161 |
INI_LINEAR_PHISURF |
& buoyancyRelation .eq. 'OCEANICP' ) |
./model/src/ini_linear_phisurf.F |
185 |
INI_LINEAR_PHISURF |
IF ( buoyancyRelation .eq. 'ATMOSPHERIC' |
./model/src/ini_linear_phisurf.F |
79 |
INI_LINEAR_PHISURF |
IF ( buoyancyRelation .eq. 'OCEANIC' ) THEN |
./pkg/ebm/ebm_forcing_surf.F |
55 |
EBM_FORCING_SURF |
if ( buoyancyRelation .eq. 'OCEANICP' ) then |
./model/src/config_summary.F |
82 |
CONFIG_SUMMARY |
WRITE(msgBuf,'(A,A40)') 'buoyancyRelation = ', buoyancyRelation |
./model/src/config_check.F |
389 |
CONFIG_CHECK |
& .AND. buoyancyRelation.EQ.'OCEANICP' ) THEN |
./model/src/config_check.F |
400 |
CONFIG_CHECK |
& .AND. buoyancyRelation.EQ.'OCEANICP' ) THEN |
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
158 |
INI_DEPTHS |
IF (buoyancyRelation .EQ. 'ATMOSPHERIC') THEN |
./model/src/ini_depths.F |
158 |
INI_DEPTHS |
IF (buoyancyRelation .EQ. 'ATMOSPHERIC') THEN |
./model/src/ini_pressure.F |
176 |
INI_PRESSURE |
& buoyancyRelation(1:11) |
./verification/advect_xz/code/ini_depths.F |
162 |
INI_DEPTHS |
IF (buoyancyRelation .EQ. 'ATMOSPHERIC') THEN |
./model/src/ini_parms.F |
169 |
INI_PARMS |
& rhoConst, rhoConstFresh, buoyancyRelation, HeatCapacity_Cp, |
./model/src/ini_parms.F |
383 |
INI_PARMS |
IF ( buoyancyRelation.EQ.'ATMOSPHERIC' ) THEN |
./model/src/ini_parms.F |
386 |
INI_PARMS |
ELSEIF ( buoyancyRelation.EQ.'OCEANICP') THEN |
./model/src/ini_parms.F |
389 |
INI_PARMS |
ELSEIF ( buoyancyRelation.EQ.'OCEANIC' ) THEN |
./model/src/write_grid.F |
85 |
WRITE_GRID |
IF (buoyancyRelation .EQ. 'ATMOSPHERIC') |
./model/inc/PARAMS.h |
110 |
NO PROCEDURE |
CHARACTER*(MAX_LEN_FNAM) buoyancyRelation |
./model/inc/PARAMS.h |
86 |
NO PROCEDURE |
& saltClimFile, buoyancyRelation, |
./pkg/ptracers/ptracers_forcing.F |
55 |
PTRACERS_FORCING |
if ( buoyancyRelation .eq. 'OCEANICP' ) then |
./pkg/ggl90/ggl90_check.F |
33 |
GGL90_CHECK |
IF ( buoyancyRelation .NE. 'OCEANIC' ) THEN |
./model/src/diags_phi_rlow.F |
116 |
DIAGS_PHI_RLOW |
IF ( buoyancyRelation .EQ. 'OCEANICP' .OR. |
./model/src/diags_phi_rlow.F |
117 |
DIAGS_PHI_RLOW |
& buoyancyRelation .EQ. 'ATMOSPHERIC' ) THEN |
./model/src/diags_phi_rlow.F |
67 |
DIAGS_PHI_RLOW |
IF ( buoyancyRelation .EQ. 'OCEANIC' ) THEN |
./model/src/calc_grad_phi_hyd.F |
150 |
CALC_GRAD_PHI_HYD |
IF ( buoyancyRelation .EQ. 'OCEANIC' ) THEN |
./model/src/calc_grad_phi_hyd.F |
171 |
CALC_GRAD_PHI_HYD |
ELSEIF (buoyancyRelation .EQ. 'OCEANICP' ) THEN |
./model/src/calc_grad_phi_hyd.F |
186 |
CALC_GRAD_PHI_HYD |
ELSEIF ( buoyancyRelation .EQ. 'ATMOSPHERIC' ) THEN |
./model/src/calc_grad_phi_hyd.F |
72 |
CALC_GRAD_PHI_HYD |
IF ( buoyancyRelation .EQ. 'ATMOSPHERIC' ) THEN |
./model/src/calc_grad_phi_hyd.F |
91 |
CALC_GRAD_PHI_HYD |
IF ( buoyancyRelation .EQ. 'ATMOSPHERIC' ) THEN |
./pkg/seaice/growth.F |
49 |
GROWTH |
if ( buoyancyRelation .eq. 'OCEANICP' ) then |
./model/src/set_defaults.F |
127 |
SET_DEFAULTS |
buoyancyRelation = 'OCEANIC' |
./pkg/pp81/pp81_check.F |
33 |
PP81_CHECK |
IF ( buoyancyRelation .NE. 'OCEANIC' ) THEN |
./pkg/pp81/pp81_calc.F |
97 |
PP81_CALC |
IF ( (buoyancyRelation .EQ. 'OCEANIC' .AND. K .EQ. 2) .OR. |
./pkg/pp81/pp81_calc.F |
98 |
PP81_CALC |
& (buoyancyRelation .EQ. 'OCEANICP' .AND. K .EQ. Nr) ) THEN |
./pkg/monitor/mon_surfcor.F |
115 |
MON_SURFCOR |
IF ( buoyancyRelation .eq. 'ATMOSPHERIC' ) THEN |
./pkg/monitor/mon_surfcor.F |
173 |
MON_SURFCOR |
IF ( buoyancyRelation .eq. 'ATMOSPHERIC' ) THEN |
./pkg/monitor/mon_surfcor.F |
191 |
MON_SURFCOR |
IF ( buoyancyRelation .eq. 'ATMOSPHERIC' ) THEN |
./pkg/monitor/mon_surfcor.F |
87 |
MON_SURFCOR |
IF ( buoyancyRelation .eq. 'ATMOSPHERIC' ) THEN |