source: branches/UKMO/dev_r5107_hadgem3_cplseq/NEMOGCM/NEMO/OPA_SRC/nemo.f90 @ 5591

Last change on this file since 5591 was 5477, checked in by cguiavarch, 5 years ago

Clear svn keywords from UKMO/dev_r5107_hadgem3_cplseq

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.