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.
Changeset 834 for trunk/NEMO/LIM_SRC_3/limcons.F90 – NEMO

Ignore:
Timestamp:
2008-03-07T18:11:35+01:00 (16 years ago)
Author:
ctlod
Message:

Clean comments and useless lines, see ticket:#72

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/NEMO/LIM_SRC_3/limcons.F90

    r825 r834  
    11MODULE limcons 
     2#if defined key_lim3 
     3   !!---------------------------------------------------------------------- 
     4   !!   'key_lim3' :                                   LIM3 sea-ice model 
     5   !!---------------------------------------------------------------------- 
     6   !! 
    27   !!====================================================================== 
    38   !!                     ***  MODULE  limcons  *** 
    … …  
    1015   !!  
    1116   !!====================================================================== 
    12    !!---------------------------------------------------------------------- 
    13    !!   'key_lim3' :                                   LIM sea-ice model 
    14    !!---------------------------------------------------------------------- 
    1517   !!    lim_cons   :   checks whether energy/mass are conserved  
    1618   !!---------------------------------------------------------------------- 
     19   !! 
    1720   !! * Modules used 
    1821 
    … …  
    3336 
    3437   !! * Module variables 
    35  
    36    !!---------------------------------------------------------------------- 
    37    !!   LIM 2.1 , UCL-ASTR-LODYC-IPSL  (2004) 
     38   !!---------------------------------------------------------------------- 
     39   !!   LIM 3.0 , UCL-ASTR-LODYC-IPSL  (2008) 
    3840   !!---------------------------------------------------------------------- 
    3941 
    … …  
    222224   END SUBROUTINE lim_cons_check 
    223225 
    224 !============================================================================== 
    225  
    226    END MODULE limcons 
     226#else 
     227   !!---------------------------------------------------------------------- 
     228   !!   Default option         Empty module            NO LIM sea-ice model 
     229   !!---------------------------------------------------------------------- 
     230#endif 
     231   !!====================================================================== 
     232END MODULE limcons 
Note: See TracChangeset for help on using the changeset viewer.