 Parent Directory
|
|
|
|
|
calc_grad_phi_surf.F
|
|
1.2
|
22 years |
cnh |
Bringing comments up to data and formatting for document extraction.
|
|
write_grid.F
|
|
1.34
|
12 years |
gforget |
the_main_loop.F :
- if not mitgcmuv_ad : no need for checkpointing loops or
tap…
|
|
timestep.F
|
|
1.53
|
12 years |
jmc |
- additional output argument for ADAMS_BASHFORTH S/R ;
- add diagnostics for Ada…
|
|
packages_check.F
|
|
1.58
|
12 years |
jmc |
- avoid multiple print to the same file (STDOUT) if multi-threads
- call ALL_PRO…
|
|
diags_rho.F
|
|
1.5
|
12 years |
jmc |
- change diagnostics WRHOMASS to just the Vertical transport of in-situ density;…
|
|
convective_weights.F
|
|
1.6
|
12 years |
jmc |
- fix description (comments)
- set output convectCount over the full array range…
|
|
cg2d_nsa.F
|
|
1.3
|
14 years |
jmc |
- import modifs from standard version (cg2d.F, v1.16):
use pre-computed solver …
|
|
diags_phi_rlow.F
|
|
1.9
|
12 years |
jmc |
- include r* effect on reference-state (PhiRef) in totPhiHyd
(so that it's rea…
|
|
momentum_correction_step.F
|
|
1.10
|
12 years |
jmc |
- move bi,bj loops inside INTEGR_CONTINUITY ;
- call INTEGR_CONTINUITY directly …
|
|
load_grid_spacing.F
|
|
1.8
|
12 years |
jmc |
- move delX,delY to new header file (SET_GRID.h) and adjust length to 1rst
fac…
|
|
config_summary.F
|
|
1.134
|
12 years |
jmc |
- only report Linear EOS parameters if using Linear EOS
- add celsius2K ; improv…
|
|
solve_tridiagonal.F
|
|
1.10
|
12 years |
jmc |
- remove 1 local array in original version (SOLVE_DIAGONAL_LOWMEMORY)
- replace …
|
|
ini_cori.F
|
|
1.33
|
13 years |
jmc |
- remove useConstantF, useBetaPlaneF, useSphereF and replace them
with integer…
|
|
ini_spherical_polar_grid.F
|
|
1.30
|
12 years |
jmc |
- rename S/R CALC_ANGLES to CALC_GRID_ANGLES and move it outside
rotate_spheri…
|
|
calc_grid_angles.F
|
|
1.1
|
12 years |
jmc |
- rename S/R CALC_ANGLES to CALC_GRID_ANGLES and move it outside
rotate_spheri…
|
|
rotate_spherical_polar_grid.F
|
|
1.4
|
12 years |
jmc |
- rename S/R CALC_ANGLES to CALC_GRID_ANGLES and move it outside
rotate_spheri…
|
|
ini_curvilinear_grid.F
|
|
1.51
|
12 years |
jmc |
- rename S/R CALC_ANGLES to CALC_GRID_ANGLES and move it outside
rotate_spheri…
|
|
solve_pentadiagonal.F
|
|
1.10
|
12 years |
jmc |
- replace division with multication by inverse (similar to original version)
- r…
|
|
ini_dynvars.F
|
|
1.23
|
14 years |
gforget |
ALLOW_3D_VISCAH/ALLOW_3D_VISCA4 bug fix
|
|
convective_adjustment.F
|
|
1.33
|
15 years |
heimbach |
Add TAF option "kind" (or adjust "byte") to enable real*4 common blocks
|
|
packages_readparms.F
|
|
1.69
|
12 years |
heimbach |
Breaking three rules (at least):
1. No check-ins Friday after 5:30pm
2. No check…
|
|
ini_nh_vars.F
|
|
1.3
|
14 years |
jmc |
Implement AB-3 for non-hydrostatic vertical momentum ;
add 2-D field to store Hy…
|
|
read_pickup.F
|
|
1.6
|
14 years |
jmc |
Implement AB-3 for non-hydrostatic vertical momentum ;
add 2-D field to store Hy…
|
|
freeze_surface.F
|
|
1.7
|
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…
|
|
freeze.F
|
|
1.11
|
19 years |
jmc |
add "_d 0" that was missing.
|
|
write_state.F
|
|
1.61
|
14 years |
jmc |
add NH free-surface formulation (selectNHfreeSurf=1) (not fully tested)
|
|
post_cg3d.F
|
|
1.3
|
14 years |
jmc |
add NH free-surface formulation (selectNHfreeSurf=1) (not fully tested)
|
|
do_oceanic_phys.F
|
|
1.114
|
12 years |
jmc |
add SEAICE_SIZE.h anywhere SEAICE.h is included
|
|
external_forcing_surf.F
|
|
1.55
|
12 years |
jmc |
add SEAICE_SIZE.h anywhere SEAICE.h is included
|
|
calc_oce_mxlayer.F
|
|
1.9
|
12 years |
jmc |
add Sub-Meso Eddies parameterisation (from Baylor)
|
|
packages_error_msg.F
|
|
1.2
|
12 years |
jmc |
add a call to ALL_PROC_DIE before stopping
|
|
do_write_pickup.F
|
|
1.6
|
16 years |
mlosch |
add a flag writePickupAtEnd (default=true) to be able to suppress
writing a pick…
|
|
find_alpha.F
|
|
1.19
|
12 years |
mlosch |
add a little initialisation trick to make TAF generate vectorizable code
|
|
forward_step.F
|
|
1.203
|
12 years |
jmc |
add call to PTRACERS_SWITCH_ONOFF at the beginning of a time-step
|
|
ini_eos.F
|
|
1.21
|
12 years |
mlosch |
add code for TEOS-10 (www.teos-10.org, McDougall et al. 2011). Use
this eos with…
|
|
ini_depths.F
|
|
1.50
|
12 years |
jmc |
add exchange topoZ after reading from file
|
|
find_rho.F
|
|
1.40
|
12 years |
mlosch |
add factorized versions of some EOS code to find_rho.F,
define USE_FACTORIZED_EO…
|
|
initialise_fixed.F
|
|
1.53
|
12 years |
jmc |
add many debug-print (to trace down where pkg/cal error msg comes from)
|
|
swfrac.F
|
|
1.15
|
14 years |
jmc |
add missing "_d 0" in water type coeff.
|
|
ini_mixing.F
|
|
1.10
|
14 years |
jmc |
add missing header file "PACKAGES_CONFIG.h" ; initialise diffKr over full domain…
|
|
set_ref_state.F
|
|
1.4
|
14 years |
jmc |
add output for rhoref(k) = rho(Tref,Sref)
|
|
calc_div_ghat.F
|
|
1.26
|
14 years |
jmc |
add parenthesis in cg3d_b computation
|
|
set_defaults.F
|
|
1.159
|
12 years |
dimitri |
adding pkg/frazil - see frazil_description.tex for details
|
|
packages_init_variables.F
|
|
1.86
|
12 years |
dimitri |
adding pkg/frazil - see frazil_description.tex for details
|
|
external_forcing.F
|
|
1.60
|
12 years |
dimitri |
adding pkg/frazil - see frazil_description.tex for details
|
|
packages_boot.F
|
|
1.57
|
12 years |
dimitri |
adding pkg/frazil - see frazil_description.tex for details
|
|
packages_init_fixed.F
|
|
1.78
|
12 years |
dimitri |
adding pkg/frazil - see frazil_description.tex for details
|
|
calc_viscosity.F
|
|
1.9
|
14 years |
jmc |
allow to specify a vertical profile of vertical viscosity
|
|
initialise_varia.F
|
|
1.70
|
12 years |
jmc |
always call INI_NLFS_VARS (to be sure all SURFACE.h variables are initialised)
…
|
|
calc_grad_phi_hyd.F
|
|
1.14
|
12 years |
jmc |
apply mask to output (horiz. gradient of Hydrostatic potential):
- does not con…
|
|
tracers_correction_step.F
|
|
1.16
|
14 years |
jmc |
apply zonal filter to all passive tracers
|
|
ini_nh_fields.F
|
|
1.3
|
12 years |
jmc |
avoid multiple print to the same file (STDOUT) if multi-threads
|
|
seawater.F
|
|
1.6
|
14 years |
jmc |
avoid unbalanced quote (single or double) in commented line
|
|
calc_phi_hyd.F
|
|
1.40
|
14 years |
jmc |
avoid unbalanced quote (single or double) in commented line
|
|
ini_grid.F
|
|
1.33
|
14 years |
jmc |
avoid unbalanced quote (single or double) in commented line
|
|
calc_diffusivity.F
|
|
1.37
|
14 years |
jmc |
avoid unbalanced quote (single or double) in commented line
|
|
do_fields_blocking_exchanges.F
|
|
1.29
|
13 years |
jmc |
back to previous version (comment out calls to OBCS_COPY_TRACER):
no longer nee…
|
|
calc_wsurf_tr.F
|
|
1.2
|
15 years |
jmc |
call GLOBAL_SUM_TILE_RL (result is less dependant on Nb of Procs/Threads)
|
|
set_parms.F
|
|
1.12
|
12 years |
jmc |
call S/R OFFLINE_RESET_PARMS to reset flags for off-line calculation
|
|
impldiff.F
|
|
1.29
|
12 years |
jmc |
change argument recip_hFac (drop bi,bj indices) in IMPLDIFF S/R
|
|
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 …
|
|
timestep_wvel.F
|
|
1.7
|
13 years |
jmc |
clean-up: remove call to OBCS_APPLY_W (not necessary).
|
|
config_check.F
|
|
1.61
|
12 years |
jmc |
collect the errors and stop cleanly at the end by calling ALL_PROC_DIE
|
|
ini_parms.F
|
|
1.247
|
12 years |
jmc |
collect the errors and stop cleanly at the end by calling ALL_PROC_DIE
|
|
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.17
|
12 years |
mlosch |
comment out masking of gtracer, lets keep our fingers crossed
|
|
thermodynamics.F
|
|
1.139
|
12 years |
jmc |
compute local recip_hFacC (no bi,bj) to use in vertical implicit solver
|
|
the_main_loop.F
|
|
1.126
|
12 years |
heimbach |
cph: avoid renewed call of initialise_varia in recomputation loop
cph: in some c…
|
|
do_the_model_io.F
|
|
1.64
|
13 years |
jmc |
do not by-pass OBCS_OUTPUT call at nIter0.
|
|
cycle_tracer.F
|
|
1.8
|
17 years |
jmc |
do the k loop inside CYCLE_TRACER (supposed to be more efficient)
|
|
ini_p_ground.F
|
|
1.9
|
13 years |
jmc |
first check-in of sigma (and hybrid-sigma) coordinate code
|
|
ini_sigma_hfac.F
|
|
1.1
|
13 years |
jmc |
first check-in of sigma (and hybrid-sigma) coordinate code
|
|
convectively_mixtracer.F
|
|
1.3
|
12 years |
jmc |
fix description (comments)
|
|
ini_fields.F
|
|
1.25
|
12 years |
jmc |
fix initialisation when using sigma-coords (call UPDATE_ETAWS from ini_fields.F)…
|
|
calc_surf_dr.F
|
|
1.17
|
13 years |
jmc |
fix previous modif
|
|
diags_phi_hyd.F
|
|
1.5
|
12 years |
jmc |
fix previous modif
|
|
calc_gs.F
|
|
1.54
|
12 years |
jmc |
fix typo in Adams-Bashforth diagnostic names
|
|
calc_gt.F
|
|
1.58
|
12 years |
jmc |
fix typo in Adams-Bashforth diagnostic names
|
|
remove_mean.F
|
|
1.3
|
15 years |
jmc |
fix wrong type of GLOBAL_SUM in REMOVE_MEAN_RS ;
+ change macros (EXCH & GLOBAL_…
|
|
ini_linear_phisurf.F
|
|
1.19
|
13 years |
jmc |
for the adjoint, change NonLin-FreeSurf initialisation sequence:
fill-in h0Fac…
|
|
write_pickup.F
|
|
1.11
|
12 years |
jmc |
in MDS_WR_METAFILES calls, replace "myTime" by a local copy into array of length…
|
|
ini_forcing.F
|
|
1.51
|
13 years |
jmc |
initialise index to trace which time-record is currently loaded
|
|
rotate_uv2en.F
|
|
1.1
|
14 years |
gforget |
introducing rotate_uv2en.F that rotates a vector field
from X/Y to Eastward/Nort…
|
|
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 …
|
|
ini_vertical_grid.F
|
|
1.21
|
12 years |
jmc |
minor change (identical instructions) to prevent some compilers to produce
wron…
|
|
check_pickup.F
|
|
1.5
|
12 years |
jmc |
more uniform warning message
|
|
do_statevars_diags.F
|
|
1.19
|
12 years |
dimitri |
move FrzForcT diag from frazil_diagnostics_state.F to frazil_calc_rhs.F
http://m…
|
|
calc_3d_diffusivity.F
|
|
1.17
|
12 years |
jmc |
move KPP hack into kpp_calc_diff_ptr.F (+ add argument to S/R KPP_CALC_DIFF_PTR)…
|
|
update_r_star.F
|
|
1.9
|
13 years |
jmc |
move call to OBCS_APPLY_R_STAR from update_r_star.F to calc_r_star.F
and add ar…
|
|
calc_r_star.F
|
|
1.21
|
13 years |
jmc |
move call to OBCS_APPLY_R_STAR from update_r_star.F to calc_r_star.F
and add ar…
|
|
update_surf_dr.F
|
|
1.10
|
13 years |
jmc |
move call to OBCS_APPLY_SURF_DR from update_surf_dr.F to calc_surf_dr.F
and add…
|
|
update_masks_etc.F
|
|
1.7
|
12 years |
mlosch |
move k-loop outside of i/j-loops when (re-)computing R_low in
in order to avoid …
|
|
ini_masks_etc.F
|
|
1.50
|
12 years |
mlosch |
move k-loop outside of i/j-loops when (re-)computing R_low in
in order to avoid …
|
|
grad_sigma.F
|
|
1.10
|
12 years |
jmc |
multiply sigmaR by maskC(k)*maskC(k-1) (instead of just maskC(k))
|
|
ini_local_grid.F
|
|
1.1
|
12 years |
jmc |
new S/R INI_LOCAL_GRID to define model tile-local grid (using same units
as delX…
|
|
ini_cylinder_grid.F
|
|
1.7
|
12 years |
jmc |
new S/R INI_LOCAL_GRID to define model tile-local grid (using same units
as delX…
|
|
ini_hfac.F
|
|
1.1
|
18 years |
heimbach |
o Changes in initialisation needed for NLFS adjoint.
|
|
packages_write_pickup.F
|
|
1.39
|
12 years |
dimitri |
o adding package bbl (Bottom Boundary Layer)
description in MITgcm/pkg/bbl/bbl…
|
|
taueddy_external_forcing.F
|
|
1.4
|
16 years |
gforget |
o bridging the gap between eddy stress and GM.
... had missed this bit.
|
|
plot_field.F
|
|
1.14
|
22 years |
heimbach |
o merge of relevant stuff from the ecco-branch:
- genmake: removed $S64 overwr…
|
|
do_statevars_tave.F
|
|
1.5
|
14 years |
jmc |
oops! fix previous modif
|
|
adams_bashforth2.F
|
|
1.8
|
12 years |
jmc |
re-arrange extrapolation calculation (affects machine truncation)
and add output…
|
|
adams_bashforth3.F
|
|
1.4
|
12 years |
jmc |
re-arrange extrapolation calculation (affects machine truncation)
and add output…
|
|
load_ref_files.F
|
|
1.2
|
13 years |
jmc |
read grid-spacing and ref.profile using S/R READ_GLVEC_RL.
|
|
external_fields_load.F
|
|
1.39
|
12 years |
jmc |
refine debugLevel criteria when printing messages
|
|
ini_cg3d.F
|
|
1.28
|
12 years |
jmc |
refine debugLevel criteria when printing messages
|
|
ini_model_io.F
|
|
1.43
|
12 years |
jmc |
refine debugLevel criteria when printing messages
|
|
ini_pressure.F
|
|
1.13
|
13 years |
jmc |
remove tabs
|
|
calc_buoyancy.F
|
|
1.9
|
13 years |
jmc |
remove tabs
|
|
ini_vel.F
|
|
1.8
|
14 years |
jmc |
remove unnecessary BARRIER
|
|
ini_psurf.F
|
|
1.11
|
14 years |
jmc |
remove unnecessary BARRIER
|
|
state_summary.F
|
|
1.8
|
14 years |
jmc |
remove unnecessary BARRIER
|
|
ini_mnc_vars.F
|
|
1.9
|
13 years |
jmc |
remove unused variables
|
|
port_rand.F
|
|
1.7
|
14 years |
jmc |
remove unused variables
|
|
set_grid_factors.F
|
|
1.2
|
14 years |
jmc |
remove unused variables
|
|
ini_nlfs_vars.F
|
|
1.7
|
12 years |
jmc |
remove/avoid un-used variables
|
|
update_etaws.F
|
|
1.2
|
12 years |
jmc |
remove/avoid un-used variables
|
|
ini_cartesian_grid.F
|
|
1.24
|
12 years |
jmc |
remove/avoid un-used variables
|
|
cg2d_sr.F
|
|
1.5
|
12 years |
jmc |
remove/avoid un-used variables
|
|
integr_continuity.F
|
|
1.28
|
12 years |
jmc |
remove/avoid un-used variables
|
|
convective_adjustment_ini.F
|
|
1.22
|
15 years |
jmc |
replace calls to "FIND_RHO" with recent version "FIND_RHO_2D"
|
|
taueddy_init_varia.F
|
|
1.4
|
14 years |
jmc |
replace calls to MDSREADFIELD with equivalent READ_FLD_XYZ_RS
|
|
model_ad_diff.list
|
|
1.34
|
12 years |
dimitri |
retiring model/src/freeze_interior.F
it has been replace by pkg/frazil
see pkg/f…
|
|
diags_oceanic_surf_flux.F
|
|
1.10
|
14 years |
jmc |
return to version 1.8, but uses (new) right type of S/R for diagnostic filling
…
|
|
calc_gw.F
|
|
1.48
|
12 years |
jmc |
selectAddFluid (ALLOW_ADDFLUID): add missing term in vertical momentum eq.
|
|
dynamics.F
|
|
1.162
|
12 years |
jmc |
separate fVer?(:,:,kUp) & fVer?(:,:,kDown) in argument list of MOM_FLUXFORM
& M…
|
|
freesurf_rescale_g.F
|
|
1.7
|
13 years |
jmc |
sigma (and hybrid-sigma) coordinate code for non-linear free-surface
|
|
update_sigma.F
|
|
1.1
|
13 years |
jmc |
sigma (and hybrid-sigma) coordinate code for non-linear free-surface
|
|
turnoff_model_io.F
|
|
1.6
|
13 years |
jmc |
split "OBCS.h" into 4 separated header files (OBCS_PARAMS,GRID,FIELDS,SEAICE)
|
|
calc_common_factors.F
|
|
1.22
|
17 years |
jmc |
start to implement deep-atmosphere and/or anelastic formulation
|
|
do_atmospheric_phys.F
|
|
1.9
|
13 years |
jmc |
switch some test on debugLevel value to debugMode test
|
|
update_etah.F
|
|
1.13
|
12 years |
jmc |
take sigma-coords related code out of update_etah.F into new S/R UPDATE_ETAWS
|
|
ini_theta.F
|
|
1.29
|
12 years |
jmc |
test debugLevel (instead of debugMode) to print maps (using PLOT_FIELDS call)
|
|
ini_salt.F
|
|
1.24
|
12 years |
jmc |
test debugLevel (instead of debugMode) to print maps (using PLOT_FIELDS call)
|
|
the_model_main.F
|
|
1.111
|
12 years |
jmc |
update and shorten "MITgcm Kernel Code Calling Sequence" (just keep
"important" …
|
|
update_cg2d.F
|
|
1.8
|
13 years |
jmc |
use interior masks (maskInC) to cancel out cg2d matrix coeff at OB and
outside …
|
|
integrate_for_w.F
|
|
1.16
|
13 years |
jmc |
use new local variable rStarDhDt (instead of common block variable rStarDhCDt)
t…
|
|
cg3d.F
|
|
1.24
|
12 years |
jmc |
use new parameter "printResidualFreq" to print residual in CG iterations
|
|
cg2d.F
|
|
1.54
|
12 years |
jmc |
use new parameter "printResidualFreq" to print residual in CG iterations
|
|
calc_ivdc.F
|
|
1.8
|
12 years |
mlosch |
use sigmaR in calc_ivdc rather than rhokp1 and rhokm1
|
|
load_fields_driver.F
|
|
1.11
|
12 years |
jmc |
useEBM : do not prevent to load some periodic forcing (call to EXTERNAL_FIELDS_L…
|
|
pre_cg3d.F
|
|
1.4
|
12 years |
jmc |
useRealFreshWaterFlux: remove masking of EmPmP (using maskInC) in
external_forc…
|
|
solve_for_pressure.F
|
|
1.78
|
12 years |
jmc |
useRealFreshWaterFlux: remove masking of EmPmP (using maskInC) in
external_forc…
|
|
ini_cg2d.F
|
|
1.50
|
13 years |
jmc |
with OBCS: use maskInC to cancel cg2d-matrix coeff at OB
and also outside OB in…
|
|
correction_step.F
|
|
1.26
|
13 years |
jmc |
zero out velocity outside OB interior region: This has no effect on the
solutio…
|
