 Parent Directory
|
|
|
|
|
calc_grad_phi_surf.F
|
|
1.2
|
22 years |
cnh |
Bringing comments up to data and formatting for document extraction.
|
|
modeldata_example.F
|
|
1.9
|
22 years |
cnh |
Bringing comments up to data and formatting for document extraction.
|
|
external_forcing_surf.F
|
|
1.48
|
14 years |
mlosch |
third and step of replacing 3D versions of UICE,VICE,HEFF,AREA by 2D
versions.…
|
|
calc_ivdc.F
|
|
1.7
|
18 years |
jmc |
"rkSign" replaces "-rkFac" (<- removed)
|
|
convective_weights.F
|
|
1.5
|
18 years |
jmc |
"rkSign" replaces "-rkFac" (<- removed)
|
|
load_ref_files.F
|
|
1.1
|
15 years |
jmc |
- add initialisation of deepFac if using Pcoords (new S/R set_grid_factors)
- mo…
|
|
initialise_fixed.F
|
|
1.49
|
15 years |
jmc |
- add initialisation of deepFac if using Pcoords (new S/R set_grid_factors)
- mo…
|
|
set_grid_factors.F
|
|
1.1
|
15 years |
jmc |
- add initialisation of deepFac if using Pcoords (new S/R set_grid_factors)
- mo…
|
|
ini_grid.F
|
|
1.32
|
15 years |
jmc |
- add initialisation of deepFac if using Pcoords (new S/R set_grid_factors)
- mo…
|
|
ini_vertical_grid.F
|
|
1.19
|
15 years |
jmc |
- add initialisation of deepFac if using Pcoords (new S/R set_grid_factors)
- mo…
|
|
cg2d.F
|
|
1.52
|
15 years |
jmc |
- fix GLOBAL_SUM_SINGLECPU when using Exch2; re-use same buffers and same
gath…
|
|
calc_gw.F
|
|
1.40
|
15 years |
jmc |
- fix filling of diagnostics: Wm_Diss & Wm_Advec
- fix viscA4 on CS-grid : use r…
|
|
calc_viscosity.F
|
|
1.8
|
15 years |
jmc |
- fix index range in calc_viscosity.F (was wrong for CD-Scheme & explicit Visc)
…
|
|
find_rho.F
|
|
1.36
|
15 years |
jmc |
- remove S/R "FIND_RHO" (replaced by FIND_RHO_2D).
|
|
config_check.F
|
|
1.50
|
15 years |
jmc |
- stop if trying to use 1 seaice pkg with allowFreezing=T
- some limitations of …
|
|
solve_for_pressure.F
|
|
1.67
|
15 years |
jmc |
-fix S/R type (RL instead of RS) for output file "cg2d_b.[iter]"
-add similar ou…
|
|
the_main_loop.F
|
|
1.100
|
15 years |
heimbach |
Adapt store directives to new pseudotimestep loop.
|
|
convective_adjustment.F
|
|
1.33
|
15 years |
heimbach |
Add TAF option "kind" (or adjust "byte") to enable real*4 common blocks
|
|
load_fields_driver.F
|
|
1.8
|
15 years |
heimbach |
Add TAF option "kind" (or adjust "byte") to enable real*4 common blocks
|
|
forward_step.F
|
|
1.165
|
15 years |
heimbach |
Add TAF option "kind" (or adjust "byte") to enable real*4 common blocks
|
|
calc_phi_hyd.F
|
|
1.39
|
15 years |
heimbach |
Add TAF option "kind" (or adjust "byte") to enable real*4 common blocks
|
|
thermodynamics.F
|
|
1.124
|
15 years |
heimbach |
Add TAF option "kind" (or adjust "byte") to enable real*4 common blocks
|
|
calc_gs.F
|
|
1.50
|
15 years |
heimbach |
Add TAF option "kind" (or adjust "byte") to enable real*4 common blocks
|
|
calc_gt.F
|
|
1.54
|
15 years |
heimbach |
Add TAF option "kind" (or adjust "byte") to enable real*4 common blocks
|
|
calc_oce_mxlayer.F
|
|
1.7
|
15 years |
dfer |
Add smoothing parameter for mixed-layer diagnostics
|
|
calc_3d_diffusivity.F
|
|
1.14
|
16 years |
dfer |
Add tracer identity as argument of gmredi_calc_diff.F
|
|
do_oceanic_phys.F
|
|
1.79
|
14 years |
heimbach |
Adding stressDivergenceX/Y to store.
|
|
port_rand.F
|
|
1.6
|
19 years |
jmc |
Allow to set the seed ;
turn back to the original port_rand function if called w…
|
|
askparam.F
|
|
1.1
|
19 years |
molod |
Function to query values from inside of common blocks in PARAMS.h
|
|
model_ad_diff.list
|
|
1.24
|
15 years |
heimbach |
Make diags_rho.F active routine
|
|
freeze_surface.F
|
|
1.7
|
17 years |
heimbach |
Modifications for bottom topography control
o replace hFacC by _hFacC at various…
|
|
freesurf_rescale_g.F
|
|
1.6
|
17 years |
heimbach |
Modifications for bottom topography control
o replace hFacC by _hFacC at various…
|
|
tracers_iigw_correction.F
|
|
1.2
|
17 years |
heimbach |
Modifications for bottom topography control
o replace hFacC by _hFacC at various…
|
|
set_ref_state.F
|
|
1.3
|
15 years |
jmc |
Ocean: fill-in phiRef array (but presently not used).
|
|
ini_nh_vars.F
|
|
1.2
|
17 years |
baylor |
Pass the variable viscosities on to calc_gw.
|
|
taueddy_init_varia.F
|
|
1.3
|
14 years |
dfer |
Replace precFloat32 by readBinaryPrec
|
|
diags_phi_hyd.F
|
|
1.2
|
20 years |
heimbach |
Retain TAMC compatibility:
- avoid "_d" constructs in PARAMETER declarations
- a…
|
|
packages_error_msg.F
|
|
1.1
|
17 years |
jmc |
S/R PACKAGES_ERROR_MSG replaces PACKAGES_CHECK_ERROR :
- add 1 argument (used in…
|
|
do_statevars_diags.F
|
|
1.13
|
16 years |
jmc |
SOM: add diagnostics for 1srt & 2nd Order moments and sub-grid variance.
|
|
convectively_mixtracer.F
|
|
1.2
|
22 years |
adcroft |
Tidied up protex preamble promments.
|
|
packages_check.F
|
|
1.45
|
15 years |
heimbach |
Update.
|
|
freeze.F
|
|
1.11
|
19 years |
jmc |
add "_d 0" that was missing.
|
|
do_write_pickup.F
|
|
1.6
|
16 years |
mlosch |
add a flag writePickupAtEnd (default=true) to be able to suppress
writing a pick…
|
|
external_forcing.F
|
|
1.54
|
15 years |
jmc |
add implied forcing corresponding to mass source/sink of fluid
|
|
calc_div_ghat.F
|
|
1.23
|
15 years |
jmc |
add mass source/sink of fluid in continuity eq. ; need to store addMass
in pick…
|
|
integrate_for_w.F
|
|
1.12
|
15 years |
jmc |
add mass source/sink of fluid in continuity eq. ; need to store addMass
in pick…
|
|
check_pickup.F
|
|
1.3
|
15 years |
jmc |
add mass source/sink of fluid in continuity eq. ; need to store addMass
in pick…
|
|
integr_continuity.F
|
|
1.21
|
15 years |
jmc |
add mass source/sink of fluid in continuity eq. ; need to store addMass
in pick…
|
|
ini_mixing.F
|
|
1.10
|
14 years |
jmc |
add missing header file "PACKAGES_CONFIG.h" ; initialise diffKr over full domain…
|
|
rotate_spherical_polar_grid.F
|
|
1.2
|
16 years |
mlosch |
add the computation of the cos/sin(angle between model north and
geographical no…
|
|
calc_grad_phi_hyd.F
|
|
1.10
|
17 years |
jmc |
calculate pressure gradient only where necessary (avoid Pb with uninitialized ar…
|
|
calc_wsurf_tr.F
|
|
1.2
|
15 years |
jmc |
call GLOBAL_SUM_TILE_RL (result is less dependant on Nb of Procs/Threads)
|
|
ini_theta.F
|
|
1.27
|
14 years |
jmc |
call PLOT_FIELD_XYZ only if debugMode=T.
|
|
ini_salt.F
|
|
1.21
|
14 years |
jmc |
call PLOT_FIELD_XYZ only if debugMode=T.
|
|
config_summary.F
|
|
1.116
|
15 years |
jmc |
call WRITE_1D_R* with the right type of argument
|
|
ini_eos.F
|
|
1.20
|
15 years |
jmc |
change FIND_RHO_SCALAR : return rho (instead of rho - rhoConst)
|
|
seawater.F
|
|
1.3
|
15 years |
jmc |
change FIND_RHO_SCALAR : return rho (instead of rho - rhoConst)
|
|
ini_pnh.F
|
|
1.6
|
17 years |
jmc |
change commented lines (in case we read initial Phi_nh from a file)
|
|
do_the_model_io.F
|
|
1.60
|
14 years |
jmc |
change few calls after renaming few {PKG}_*DIAGS S/R to {PKG}_OUTPUT
|
|
update_masks_etc.F
|
|
1.3
|
15 years |
jmc |
change macros (EXCH & GLOBAL_SUM/MAX) sufix _R4/_R8 to _RS/_RL
when applied to …
|
|
do_stagger_fields_exchanges.F
|
|
1.7
|
15 years |
jmc |
change macros (EXCH & GLOBAL_SUM/MAX) sufix _R4/_R8 to _RS/_RL
when applied to …
|
|
ini_cg2d.F
|
|
1.46
|
15 years |
jmc |
change macros (EXCH & GLOBAL_SUM/MAX) sufix _R4/_R8 to _RS/_RL
when applied to …
|
|
update_etah.F
|
|
1.9
|
15 years |
jmc |
change macros (EXCH & GLOBAL_SUM/MAX) sufix _R4/_R8 to _RS/_RL
when applied to …
|
|
calc_surf_dr.F
|
|
1.14
|
15 years |
jmc |
change macros (EXCH & GLOBAL_SUM/MAX) sufix _R4/_R8 to _RS/_RL
when applied to …
|
|
cg2d_nsa.F
|
|
1.2
|
15 years |
jmc |
change macros (EXCH & GLOBAL_SUM/MAX) sufix _R4/_R8 to _RS/_RL
when applied to …
|
|
cg3d.F
|
|
1.20
|
15 years |
jmc |
change macros (EXCH & GLOBAL_SUM/MAX) sufix _R4/_R8 to _RS/_RL
when applied to …
|
|
ini_pressure.F
|
|
1.12
|
15 years |
jmc |
change macros (EXCH & GLOBAL_SUM/MAX) sufix _R4/_R8 to _RS/_RL
when applied to …
|
|
momentum_correction_step.F
|
|
1.7
|
15 years |
jmc |
change macros (EXCH & GLOBAL_SUM/MAX) sufix _R4/_R8 to _RS/_RL
when applied to …
|
|
ini_cg3d.F
|
|
1.24
|
15 years |
jmc |
change macros (EXCH & GLOBAL_SUM/MAX) sufix _R4/_R8 to _RS/_RL
when applied to …
|
|
do_fields_blocking_exchanges.F
|
|
1.25
|
15 years |
jmc |
change macros (EXCH & GLOBAL_SUM/MAX) sufix _R4/_R8 to _RS/_RL
when applied to …
|
|
do_gterm_blocking_exchanges.F
|
|
1.18
|
15 years |
jmc |
change macros (EXCH & GLOBAL_SUM/MAX) sufix _R4/_R8 to _RS/_RL
when applied to …
|
|
ini_surf_dr.F
|
|
1.3
|
15 years |
jmc |
change macros (EXCH & GLOBAL_SUM/MAX) sufix _R4/_R8 to _RS/_RL
when applied to …
|
|
grad_sigma.F
|
|
1.9
|
15 years |
jmc |
changes in FILL_CS_CORNER_TR_RL argument list.
|
|
calc_r_star.F
|
|
1.13
|
16 years |
jmc |
clean-up: remove initialisation (done in ini_r_star)
|
|
pressure_for_eos.F
|
|
1.4
|
15 years |
jmc |
comment out maskC multiplication (not really needed as far as I know,
but harmf…
|
|
timestep_tracer.F
|
|
1.13
|
17 years |
jmc |
comments: always spell tendency the same way (easier to grep for)
|
|
ini_mnc_vars.F
|
|
1.7
|
16 years |
mlosch |
correct units of EmPmR to kg/m^2/s
|
|
timestep_wvel.F
|
|
1.4
|
17 years |
jmc |
define and use reference profile for w <-> omega conversion in NH-code.
|
|
the_model_main.F
|
|
1.103
|
16 years |
jmc |
do not write pickup from THE_MODEL_MAIN but always from FORWARD_STEP
|
|
cycle_tracer.F
|
|
1.8
|
17 years |
jmc |
do the k loop inside CYCLE_TRACER (supposed to be more efficient)
|
|
dynamics.F
|
|
1.142
|
15 years |
jmc |
fix (number of arguments) a commented call to S/R REMOVE_MEAN_RL
|
|
diags_oceanic_surf_flux.F
|
|
1.9
|
15 years |
mlosch |
fix REAL4_IS_SLOW, fix a few diagnostics, but probably not all: copy
_RS surface…
|
|
solve_tridiagonal.F
|
|
1.2
|
19 years |
jmc |
fix comments
|
|
calc_diffusivity.F
|
|
1.36
|
16 years |
jmc |
fix for case where pkg/generic_advdiff is disable (e.g., exp. adjustment.cs-32x3…
|
|
remove_mean.F
|
|
1.3
|
15 years |
jmc |
fix wrong type of GLOBAL_SUM in REMOVE_MEAN_RS ;
+ change macros (EXCH & GLOBAL_…
|
|
tracers_correction_step.F
|
|
1.14
|
17 years |
jmc |
iMin,iMax,jMin,jMax are set within convective_adjustment S/R instead of
passed …
|
|
set_write_global_pickup.F
|
|
1.1
|
17 years |
jmc |
isolate in set_write_global_pickup.F the only S/R of checkpoint.F that is
still …
|
|
write_grid.F
|
|
1.28
|
14 years |
jmc |
local common block no longer needed
|
|
solve_pentadiagonal.F
|
|
1.2
|
20 years |
jmc |
make it safer in case Nr=1 or Nr=2
|
|
packages_readparms.F
|
|
1.59
|
14 years |
jmc |
move _BARRIER from PACKAGES_READPARMS to MNC_READPARMS
|
|
do_atmospheric_phys.F
|
|
1.8
|
15 years |
jmc |
move bi,bj loops inside AIM_DO_PHYSICS
|
|
update_r_star.F
|
|
1.7
|
15 years |
jmc |
move kSurfC,W,S from SURFACE.h to GRID.h
|
|
update_surf_dr.F
|
|
1.7
|
15 years |
jmc |
move kSurfC,W,S from SURFACE.h to GRID.h
|
|
find_alpha.F
|
|
1.17
|
15 years |
jmc |
new S/R FIND_RHO_2D (replace FIND_RHO):
change argument tFld & sFld to just 2-D…
|
|
packages_boot.F
|
|
1.46
|
15 years |
jmc |
new pkg "down_slope".
|
|
ini_hfac.F
|
|
1.1
|
18 years |
heimbach |
o Changes in initialisation needed for NLFS adjoint.
|
|
diags_phi_rlow.F
|
|
1.2
|
21 years |
jmc |
o avoid using any hFac in calc_phi_hyd ; use Ro_surf,R_low instead.
NLFS + p-co…
|
|
taueddy_external_forcing.F
|
|
1.4
|
15 years |
gforget |
o bridging the gap between eddy stress and GM.
... had missed this bit.
|
|
calc_buoyancy.F
|
|
1.8
|
21 years |
mlosch |
o cleaned up the use of rhoNil and rhoConst.
- rhoNil should only appear in th…
|
|
plot_field.F
|
|
1.14
|
22 years |
heimbach |
o merge of relevant stuff from the ecco-branch:
- genmake: removed $S64 overwr…
|
|
timestep.F
|
|
1.47
|
16 years |
jmc |
prepare for "clever pickup" implementation:
add startAB parameter to argument li…
|
|
adams_bashforth2.F
|
|
1.7
|
16 years |
jmc |
prepare for "clever pickup" implementation:
add startAB parameter to argument li…
|
|
adams_bashforth3.F
|
|
1.3
|
16 years |
jmc |
prepare for "clever pickup" implementation:
add startAB parameter to argument li…
|
|
ini_model_io.F
|
|
1.33
|
15 years |
jmc |
print Warning for globalFiles only if not using SingleCpuIO.
|
|
swfrac.F
|
|
1.14
|
16 years |
jmc |
reduce number of "warning: unused variable"
|
|
ini_parms.F
|
|
1.221
|
15 years |
jmc |
remove backward compatibility for thetaMin,phiMin
(replaced by xgOrigin,ygOrig…
|
|
ini_r_star.F
|
|
1.3
|
17 years |
jmc |
remove un-used variables (to reduce Nb of compiler warnings).
|
|
ini_vel.F
|
|
1.8
|
14 years |
jmc |
remove unnecessary BARRIER
|
|
ini_masks_etc.F
|
|
1.42
|
14 years |
jmc |
remove unnecessary BARRIER
|
|
external_fields_load.F
|
|
1.33
|
14 years |
jmc |
remove unnecessary BARRIER
|
|
ini_forcing.F
|
|
1.50
|
14 years |
jmc |
remove unnecessary BARRIER
|
|
write_state.F
|
|
1.60
|
14 years |
jmc |
remove unnecessary BARRIER
|
|
ini_psurf.F
|
|
1.11
|
14 years |
jmc |
remove unnecessary BARRIER
|
|
ini_depths.F
|
|
1.46
|
14 years |
jmc |
remove unnecessary BARRIER
|
|
read_pickup.F
|
|
1.5
|
14 years |
jmc |
remove unnecessary BARRIER
|
|
state_summary.F
|
|
1.8
|
14 years |
jmc |
remove unnecessary BARRIER
|
|
initialise_varia.F
|
|
1.58
|
14 years |
jmc |
remove unnecessary BARRIER
|
|
write_pickup.F
|
|
1.8
|
14 years |
jmc |
remove unnecessary BARRIER
|
|
packages_write_pickup.F
|
|
1.36
|
14 years |
jmc |
remove unnecessary BARRIER
|
|
ini_cori.F
|
|
1.29
|
14 years |
jmc |
remove unnecessary BARRIER
|
|
ini_linear_phisurf.F
|
|
1.16
|
14 years |
jmc |
remove unnecessary BARRIER and local common block.
|
|
ini_p_ground.F
|
|
1.7
|
18 years |
jmc |
remove unused variable (reduce number of warnings).
|
|
do_statevars_tave.F
|
|
1.2
|
18 years |
jmc |
remove unused variables (reduces number of compiler warnings)
|
|
packages_init_variables.F
|
|
1.72
|
14 years |
jmc |
rename S/R KPP_INIT & PP81_INIT --> KPP_INIT_VARIA & PP81_INIT_VARIA
|
|
ini_spherical_polar_grid.F
|
|
1.26
|
15 years |
jmc |
rename thetaMin,phiMin -> xgOrigin,ygOrigin
(temporary backward compatibility i…
|
|
set_defaults.F
|
|
1.144
|
15 years |
jmc |
rename thetaMin,phiMin -> xgOrigin,ygOrigin
(temporary backward compatibility i…
|
|
ini_cartesian_grid.F
|
|
1.21
|
15 years |
jmc |
rename thetaMin,phiMin -> xgOrigin,ygOrigin
(temporary backward compatibility i…
|
|
ini_cylinder_grid.F
|
|
1.5
|
15 years |
jmc |
rename thetaMin,phiMin -> xgOrigin,ygOrigin
(temporary backward compatibility i…
|
|
packages_init_fixed.F
|
|
1.67
|
15 years |
jmc |
replace FLT_INIT by 3-steps standard initialization S/R: readparms,
init_fixed …
|
|
convective_adjustment_ini.F
|
|
1.22
|
15 years |
jmc |
replace calls to "FIND_RHO" with recent version "FIND_RHO_2D"
|
|
set_parms.F
|
|
1.4
|
16 years |
jmc |
set flags for Dynamically Active Tracers
|
|
load_grid_spacing.F
|
|
1.2
|
17 years |
jmc |
setting both delR & delRc => no assumption on vertical grid (center@middle
or i…
|
|
correction_step.F
|
|
1.24
|
17 years |
jmc |
start to implement deep-atmosphere and/or anelastic formulation
|
|
update_cg2d.F
|
|
1.7
|
17 years |
jmc |
start to implement deep-atmosphere and/or anelastic formulation
|
|
impldiff.F
|
|
1.26
|
17 years |
jmc |
start to implement deep-atmosphere and/or anelastic formulation
|
|
calc_common_factors.F
|
|
1.22
|
17 years |
jmc |
start to implement deep-atmosphere and/or anelastic formulation
|
|
diags_rho.F
|
|
1.4
|
15 years |
jmc |
store 3-D (in-situ) density in commom block (this save 1 rho computation);
re-a…
|
|
ini_dynvars.F
|
|
1.21
|
15 years |
jmc |
store 3-D (in-situ) density in commom block (this save 1 rho computation);
re-a…
|
|
ini_fields.F
|
|
1.23
|
15 years |
jmc |
upate commented code (WRITE_CHECKPOINT was replaced by WRITE_PICKUP)
|
|
ini_curvilinear_grid.F
|
|
1.46
|
14 years |
jmc |
uses pkg/rw subroutinies when OLD_GRID_IO is defined
|
