New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
blk_oce.F90 in trunk/NEMO/OFF_SRC/SBC – NEMO

source: trunk/NEMO/OFF_SRC/SBC/blk_oce.F90 @ 719

Last change on this file since 719 was 719, checked in by ctlod, 17 years ago

get back to the nemo_v2_3 version for trunk
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 1.7 KB
Line 
1MODULE blk_oce
2   !!======================================================================
3   !!                 ***  MODULE  blk_oce  ***
4   !! Bulk   :  bulk parameter and  variables defined in memory
5   !!======================================================================
6   !! History :
7   !!   8.5  !  02-11  (G. Madec)  F90: Free form and module
8   !!----------------------------------------------------------------------
9   !!   OPA 9.0 , LOCEAN-IPSL  (2005)
10   !!   $Header$
11   !!   This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt
12   !!----------------------------------------------------------------------
13#if defined key_flx_bulk_monthly || defined key_flx_bulk_daily
14   !!----------------------------------------------------------------------
15   !! ' key_flx_bulk_monthly or defined key_flx_bulk_daily             bulk
16   !!----------------------------------------------------------------------
17   !! * Modules used
18   USE par_oce          ! ocean parameters
19
20   IMPLICIT NONE
21
22   LOGICAL, PUBLIC ::   l_bulk = .TRUE.   !:
23   
24   !!----------------------------------------------------------------------
25   !! bulk common variables
26   !!----------------------------------------------------------------------
27
28   REAL(wp), PUBLIC, DIMENSION(jpi,jpj) ::   &  !:
29      vatm     ,      &  !: wind speed
30      catm               !: percent of cloud cover
31
32#else
33   !!----------------------------------------------------------------------
34   !!   Default option                                         Empty module
35   !!----------------------------------------------------------------------
36   LOGICAL, PUBLIC ::   l_bulk = .FALSE.  !:
37#endif
38   
39   !!----------------------------------------------------------------------
40END MODULE blk_oce
Note: See TracBrowser for help on using the repository browser.