/[MITgcm]/MITgcm/model/src/the_main_loop.F
ViewVC logotype

Log of /MITgcm/model/src/the_main_loop.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Links to HEAD: (view) (download) (annotate)
Links to checkpoint48: (view) (download) (annotate)
Sticky Tag:

Revision 1.32 - (view) (download) (annotate) - [select for diffs]
Fri Jan 10 23:41:15 2003 UTC (21 years, 4 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint47h_post, checkpoint47i_post, checkpoint47j_post, checkpoint48, checkpoint48a_post, checkpoint48b_post, checkpoint48c_pre
Changes since 1.31: +2 -1 lines
Diff to previous 1.31
o few modif.'s to get latest version adjointed
  (mainly kick out code in ini_linear_phisurf)
o modif's to run adjoint with exactConserv
o case GM_BOLUS_ADVEC should be cleaned
  S/R gmredi_slope_psi should be cleaned
o verification/carbon now has exactConserv=.TRUE.


Revision 1.31 - (view) (download) (annotate) - [select for diffs]
Sat Dec 28 10:11:10 2002 UTC (21 years, 5 months ago) by dimitri
Branch: MAIN
CVS Tags: checkpoint47f_post, checkpoint47g_post
Changes since 1.30: +10 -1 lines
Diff to previous 1.30
checkpoint47f_post
Merging from release1_p10:
o modifications for using pkg/exf with pkg/seaice
  - pkg/seaice CPP options SEAICE_EXTERNAL_FORCING
    and SEAICE_EXTERNAL_FLUXES
  - pkg/exf CPP options EXF_READ_EVAP and
    EXF_NO_BULK_COMPUTATIONS
  - usage examples are Experiments 8 and 9 in
    verification/lab_sea/README
  - verification/lab_sea default experiment now uses
    pkg/gmredi, pkg/kpp, pkg/seaice, and pkg/exf


Revision 1.30 - (view) (download) (annotate) - [select for diffs]
Thu Nov 21 19:11:42 2002 UTC (21 years, 6 months ago) by cheisey
Branch: MAIN
CVS Tags: branch-exfmods-tag, checkpoint47a_post, checkpoint47b_post, checkpoint47c_post, checkpoint47d_post, checkpoint47d_pre, checkpoint47e_post
Branch point for: branch-exfmods-curt
Changes since 1.29: +3 -3 lines
Diff to previous 1.29
Two packages:  bulk_force (Bulk forcing)
and therm_seaice (thermodynamic_seaice) - adopted from LANL CICE.v2.0.2
Earlier integration from Stephaine Dutkiewicz
and Patrick Heimbach.

Two ifdef statements for compile time,
ALLOW_THERM_SEAICE and ALLOW_BULK_FORCE

Two switches in data.pkg to turn on at run-time:

cat data.pkg
# Packages
 &PACKAGES
 useBulkForce=.TRUE.,
 useThermSeaIce=.TRUE.,
 &

WARNING:  useSEAICE and useThermSEAICE are mutually exclusive.

The bulk package requires an additional parameter file
with two namelists, data.ice and data.blk.

c ADAPTED FROM:
c LANL CICE.v2.0.2
c-----------------------------------------------------------------------
c.. thermodynamics (vertical physics) based on M. Winton 3-layer model
c.. See Bitz, C. M. and W. H. Lipscomb, 1999:  "An energy-conserving
c..       thermodynamic sea ice model for climate study."  J. Geophys.
c..       Res., 104, 15669 - 15677.
c..     Winton, M., 1999:  "A reformulated three-layer sea ice model."
c..       Submitted to J. Atmos. Ocean. Technol.

c.. authors Elizabeth C. Hunke and William Lipscomb
c..         Fluid Dynamics Group, Los Alamos National Laboratory
c-----------------------------------------------------------------------


Revision 1.29 - (view) (download) (annotate) - [select for diffs]
Fri Nov 15 03:01:21 2002 UTC (21 years, 6 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint47
Changes since 1.28: +2 -2 lines
Diff to previous 1.28
differentiable version of checkpoint46n_post
o external_fields_load now part of differentiation list
o pressure needs multiple storing;
  would be nice to have store_pressure at beginning or
  end of forward_step, e.g. by having phiHyd global (5-dim.)
  (NB: pressure is needed for certain cases in find_rho,
  which is also invoked through convective_adjustment).
o recomputations in find_rho for cases
 'JMD95'/'UNESCO' or 'MDJWF' are OK.
o #define ATMOSPHERIC_LOADING should be differentiable
o ini_forcing shifted to begining of initialise_varia


Revision 1.28 - (view) (download) (annotate) - [select for diffs]
Tue Nov 12 20:42:24 2002 UTC (21 years, 6 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint46n_post
Changes since 1.27: +15 -3 lines
Diff to previous 1.27
Merging from release1_p8 branch:
o GAD:
  - generated new common blocks to account for call of
    same gad routines with differing traceridentities
    (needed to modify tracerIdentity indices in GAD.h)
  - generated separate common blocks for case useCubedSphereExchange
    (Department of Futurology)
  - parameter lists to gmredi_?transport: added tracerIdentity
  - added new key indices to tamc.h


Revision 1.27 - (view) (download) (annotate) - [select for diffs]
Thu May 30 02:29:19 2002 UTC (22 years ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint45b_post, checkpoint45c_post, checkpoint45d_post, checkpoint46, checkpoint46a_post, checkpoint46a_pre, checkpoint46b_post, checkpoint46b_pre, checkpoint46c_post, checkpoint46c_pre, checkpoint46d_post, checkpoint46d_pre, checkpoint46e_post, checkpoint46e_pre, checkpoint46f_post, checkpoint46g_post, checkpoint46g_pre, checkpoint46h_post, checkpoint46h_pre, checkpoint46i_post, checkpoint46j_post, checkpoint46j_pre, checkpoint46k_post, checkpoint46l_post, checkpoint46l_pre, checkpoint46m_post
Changes since 1.26: +2 -1 lines
Diff to previous 1.26
Moved call to packages_init_varia before call convective_adjustment_ini.
Corresponding adjustment of tape init. for TAF.


Revision 1.26 - (view) (download) (annotate) - [select for diffs]
Thu Feb 7 20:00:09 2002 UTC (22 years, 3 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint44b_post, checkpoint44e_post, checkpoint44e_pre, checkpoint44f_post, checkpoint44f_pre, checkpoint44g_post, checkpoint44h_post, checkpoint44h_pre, checkpoint45, checkpoint45a_post, chkpt44c_post, chkpt44c_pre, chkpt44d_post, release1_final_v1
Branch point for: release1_final
Changes since 1.25: +7 -1 lines
Diff to previous 1.25
o merge of relevant stuff from the ecco-branch:
  - genmake: removed $S64 overwrite for case SunOS
  - pkg/exf: update and corrections for field swapping and obcs
  - pkg/ecco: parameter lists for the_model_main, the_main_loop
              harmonized between ECCO and MITgcm
  - pkg/autodiff: added flow directives for obcs, mdsio_gl_slice
                  updated checkpointing_lev... lists for obcs
  - model/src: minor changes in forward_step, plot_field
               added directive for divided adjoint in the_main_loop
  - pkg/mdsio: added mdsio_gl_slice


Revision 1.25 - (view) (download) (annotate) - [select for diffs]
Thu Jan 17 16:58:53 2002 UTC (22 years, 4 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint44, checkpoint44b_pre, chkpt44a_post, chkpt44a_pre
Changes since 1.24: +2 -2 lines
Diff to previous 1.24
* Updated adjoint/makefile
  o removed "_ecco" from names
  o added/modified forward mode options
  o added dependent vector option
  o tried SVD matrix computation (doesn't work;
    too much memory use by TAF)
* Updated flow directives related to FTL
* removed global_sum__g.F (not necessary)
* initialise forward mode anomalies in ctrl_unpack.F
  (so far "crude" initialization only).
* Added flag ALLOW_TANGENTLINEAR_RUN complememting
  ALLOW_ADJOINT_RUN
* driver routine the_model_main.F needs separate call
  to FTL routine G_THE_MAIN_LOOP with parameter list
  identical to THE_MAIN_LOOP (TAF doesn't remove arguments).
* added template file tangentlinear_model.F
  for forward mode.


Revision 1.24 - (view) (download) (annotate) - [select for diffs]
Fri Jan 11 19:00:43 2002 UTC (22 years, 4 months ago) by heimbach
Branch: MAIN
Changes since 1.23: +7 -59 lines
Diff to previous 1.23
Transfering major checkpoint store directive blocks to
separate header files.
Files are included in the_main_loop (lev3, lev2)
and forward_step (lev1).


Revision 1.23 - (view) (download) (annotate) - [select for diffs]
Tue Nov 20 21:14:41 2001 UTC (22 years, 6 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint43a-release1mods, release1-branch-end, release1-branch_branchpoint, release1-branch_tutorials
Branch point for: release1-branch
Changes since 1.22: +3 -3 lines
Diff to previous 1.22
#ifdef ALLOW_COST_TRACER replaced by ALLOW_PASSIVE_TRACER (required)


Revision 1.22 - (view) (download) (annotate) - [select for diffs]
Thu Nov 8 20:57:51 2001 UTC (22 years, 6 months ago) by heimbach
Branch: MAIN
Changes since 1.21: +14 -3 lines
Diff to previous 1.21
Preparing adjoint of Held-Suarez:
- bugfix for storing in absence of CD code
- adding EXACT_CONSERV to AD list
- new routine ini_autodiff to add TAMC-specific initialisations
- adding Shapiro filter to AD list


Revision 1.21 - (view) (download) (annotate) - [select for diffs]
Fri Sep 28 02:26:57 2001 UTC (22 years, 8 months ago) by adcroft
Branch: MAIN
CVS Tags: checkpoint43, ecco-branch-mod1, release1_b1, release1_beta1
Branch point for: ecco-branch, release1, release1_coupled
Changes since 1.20: +4 -3 lines
Diff to previous 1.20
Switched sense of CPP macro for controlling multi-dimensional advection:
 o DISABLE_MULTIDIM_ADVECTION is set in GAD_OPTIONS.h
 o automatically set if differentiating code
   (comments around call to gad_advection point out how to re-enable it)
 o this avoids needing to add the former macro to CPP_OPTIONS.h
   - reason for this is there's no point in any of the new schemes without it.


Revision 1.20 - (view) (download) (annotate) - [select for diffs]
Thu Sep 27 20:12:10 2001 UTC (22 years, 8 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint42
Changes since 1.19: +11 -4 lines
Diff to previous 1.19
Fixed AD-related problems:
o Store directives up-to-date with re-arranged Adams-Bashforth
  (mainly thermodynamics.F)
o New store directives for multi-dim. advection schemes
  * new CPP flag ALLOW_MULTI_DIM_ADVECTION
  * new common block and key passkey
  (mainly gad_advection.F)
o Modified store directives for split of dynamics/thermodynamics
  for the case ALLOW_KPP
o Cleaned argument list for timestep_tracer.F


Revision 1.19 - (view) (download) (annotate) - [select for diffs]
Thu Sep 27 18:15:58 2001 UTC (22 years, 8 months ago) by adcroft
Branch: MAIN
Changes since 1.18: +2 -2 lines
Diff to previous 1.18
Deleted single apostrophy (').


Revision 1.18 - (view) (download) (annotate) - [select for diffs]
Wed Sep 26 18:09:16 2001 UTC (22 years, 8 months ago) by cnh
Branch: MAIN
CVS Tags: checkpoint41
Changes since 1.17: +42 -44 lines
Diff to previous 1.17
Bringing comments up to data and formatting for document extraction.


Revision 1.17 - (view) (download) (annotate) - [select for diffs]
Tue Aug 21 16:21:17 2001 UTC (22 years, 9 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint40, checkpoint40pre8, checkpoint40pre9
Changes since 1.16: +9 -1 lines
Diff to previous 1.16
o New package pkg/rw/ needed new flow directives for TAMC.
o Replacement of calc_mom_rhs by mom_fluxform and mom_vecinv
  needed update of adjoint/makefile and additional store directives
  in the_main_loop.F to cover all cases.


Revision 1.16 - (view) (download) (annotate) - [select for diffs]
Tue Aug 14 00:20:49 2001 UTC (22 years, 9 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint40pre7
Changes since 1.15: +13 -12 lines
Diff to previous 1.15
Moved TR1.h headers between ifdef ALLOW_PASSIVE_TRACER.


Revision 1.15 - (view) (download) (annotate) - [select for diffs]
Mon Aug 13 18:20:36 2001 UTC (22 years, 9 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint40pre6
Changes since 1.14: +1 -3 lines
Diff to previous 1.14
Cleanup of store directives for TAF.


Revision 1.14 - (view) (download) (annotate) - [select for diffs]
Mon Jul 30 20:39:18 2001 UTC (22 years, 10 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint40pre4, checkpoint40pre5
Changes since 1.13: +4 -1 lines
Diff to previous 1.13
Added a few re-initialisations for TAF.


Revision 1.13 - (view) (download) (annotate) - [select for diffs]
Fri Jul 13 20:14:08 2001 UTC (22 years, 10 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint40pre3
Changes since 1.12: +14 -135 lines
Diff to previous 1.12
o Extracted core part of the_main_loop and re-created forward_step
  N.B.: Time-dependent part of cost function should remain in
        the_main_loop (or contributions must be stored)
o Added some parameter recomputations of nIter0


Revision 1.12 - (view) (download) (annotate) - [select for diffs]
Fri Jul 13 14:26:57 2001 UTC (22 years, 10 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint40pre2
Changes since 1.11: +34 -28 lines
Diff to previous 1.11
o Added grdchk package handling
o Added passive tracer handling


Revision 1.11 - (view) (download) (annotate) - [select for diffs]
Mon Jun 25 20:38:15 2001 UTC (22 years, 11 months ago) by ljmc
Branch: MAIN
CVS Tags: checkpoint40pre1
Changes since 1.10: +3 -2 lines
Diff to previous 1.10
the default is now to call the filter after solve_for_pressure


Revision 1.10 - (view) (download) (annotate) - [select for diffs]
Thu Jun 7 16:33:55 2001 UTC (22 years, 11 months ago) by adcroft
Branch: MAIN
Changes since 1.9: +55 -50 lines
Diff to previous 1.9
Corrected all the timer labels (for the non-adjoint sections).


Revision 1.9 - (view) (download) (annotate) - [select for diffs]
Mon Jun 4 13:25:35 2001 UTC (23 years ago) by adcroft
Branch: MAIN
Changes since 1.8: +6 -1 lines
Diff to previous 1.8
Added Kinetic energy monitoring.


Revision 1.8 - (view) (download) (annotate) - [select for diffs]
Wed May 30 19:33:18 2001 UTC (23 years ago) by adcroft
Branch: MAIN
Changes since 1.7: +6 -1 lines
Diff to previous 1.7
Adding skeleton "monitor" routines. The default is to do it every
time-step. monitorFreq=0 disables.


Revision 1.7 - (view) (download) (annotate) - [select for diffs]
Mon May 14 21:46:18 2001 UTC (23 years ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint39
Changes since 1.6: +13 -8 lines
Diff to previous 1.6
Modifications/fixes to support TAMC differentiability
(mostly missing or wrong directives).


Revision 1.6 - (view) (download) (annotate) - [select for diffs]
Tue Apr 10 22:35:25 2001 UTC (23 years, 1 month ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint38
Changes since 1.5: +370 -82 lines
Diff to previous 1.5
See doc/tag-index and doc/notes_c37_adj.txt
Preparation for stand-alone autodifferentiability.


Revision 1.5 - (view) (download) (annotate) - [select for diffs]
Tue Mar 6 17:10:29 2001 UTC (23 years, 3 months ago) by jmc
Branch: MAIN
CVS Tags: c37_adj, checkpoint37, pre38-close, pre38tag1
Branch point for: pre38
Changes since 1.4: +2 -3 lines
Diff to previous 1.4
remove "include CG2D.h"


Revision 1.4 - (view) (download) (annotate) - [select for diffs]
Wed Feb 14 22:50:10 2001 UTC (23 years, 3 months ago) by jmc
Branch: MAIN
CVS Tags: checkpoint36
Changes since 1.3: +7 -10 lines
Diff to previous 1.3
move the IO at the end of a time step


Revision 1.3 - (view) (download) (annotate) - [select for diffs]
Thu Feb 8 18:13:37 2001 UTC (23 years, 3 months ago) by jmc
Branch: MAIN
CVS Tags: checkpoint35
Changes since 1.2: +7 -11 lines
Diff to previous 1.2
set initial Time & Iteration counter in the_model_main
 and pass them as argument to the_main_loop


Revision 1.2 - (view) (download) (annotate) - [select for diffs]
Sun Feb 4 14:38:48 2001 UTC (23 years, 4 months ago) by cnh
Branch: MAIN
Changes since 1.1: +2 -1 lines
Diff to previous 1.1
Made sure each .F and .h file had
the CVS keywords Header and Name at its start.
Most had header but very few currently have Name, so
lots of changes!


Revision 1.1 - (view) (download) (annotate) - [select for diffs]
Wed Apr 5 19:04:14 2000 UTC (24 years, 2 months ago) by adcroft
Branch: MAIN
CVS Tags: branch-atmos-merge-freeze, branch-atmos-merge-phase1, branch-atmos-merge-phase2, branch-atmos-merge-phase3, branch-atmos-merge-phase4, branch-atmos-merge-phase5, branch-atmos-merge-phase6, branch-atmos-merge-phase7, branch-atmos-merge-shapiro, branch-atmos-merge-start, branch-atmos-merge-zonalfilt, checkpoint27, checkpoint28, checkpoint29, checkpoint30, checkpoint31, checkpoint32, checkpoint33, checkpoint34
Branch point for: branch-atmos-merge
Restructered the calling tree between THE_MODEL_MAIN()
and DYNAMICS(). Two calling levels have been inserted
to better split the "fixed" initialization phase from
the main time-loop for easier connectivity with the adjoint
infrastructure.

The calling tree now looks like:

   the_model_main:
      initialise_fixed()
      the_main_loop()

   the_main_loop:
      initialise_varia()
      do i=1,nIters
         forward_step()
      enddo
      forward_step()

   forward_step:
      load_external_fields()
      dynamics()
      do_the_model_io()
      solve_for_pressure()
      do_gterm_blocking_exchanges()
      write_checkpoint()


This form allows you to request diffs between any two revisions of this file. For each of the two "sides" of the diff, select a symbolic revision name using the selection box, or choose 'Use Text Field' and enter a numeric revision.

  Diffs between and
  Type of Diff should be a

Sort log by:

  ViewVC Help
Powered by ViewVC 1.1.22