source: branches/UKMO/dev_r5518_obs_oper_update_icethick/NEMOGCM/NEMO/OPA_SRC/nemo.f90 @ 11200

Last change on this file since 11200 was 7960, checked in by jwhile, 4 years ago

Updated namelist_ref and 2nd attemp at updating SVN keywords

File size: 1.0 KB
Line 
1PROGRAM nemo
2   !!======================================================================
3   !!                     ***  PROGRAM nemo  ***
4   !!
5   !! ** Purpose :   encapsulate nemo_gcm so that it can also be called
6   !!              together with the linear tangent and adjoint models
7   !!======================================================================
8   !! History :   OPA  ! 2001-02  (M. Imbard, A. Weaver)  Original code
9   !!   NEMO      1.0  ! 2003-10  (G. Madec) F90
10   !!----------------------------------------------------------------------
11   USE nemogcm   ! NEMO system   (nemo_gcm routine)
12   !!----------------------------------------------------------------------
13   !! NEMO/OPA 3.3 , NEMO Consortium (2010)
14   !! $Id$
15   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt)
16   !!----------------------------------------------------------------------
17   !
18   CALL nemo_gcm           ! NEMO direct code
19   !
20   !!======================================================================
21END PROGRAM nemo
Note: See TracBrowser for help on using the repository browser.