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 2702 – NEMO

Changeset 2702


Ignore:
Timestamp:
2011-03-25T09:10:10+01:00 (14 years ago)
Author:
cetlod
Message:

add a missing comma in sms_lobster.F90 routine

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/dev_r2586_dynamic_mem/NEMOGCM/NEMO/TOP_SRC/LOBSTER/sms_lobster.F90

    r2690 r2702  
    118118      ALLOCATE(                                                                   & 
    119119         !*  Biological parameters 
    120          &      remdmp(jpk,jp_lobster) ,                                          & 
     120         &      remdmp(jpk,jp_lobster)                                      ,     & 
    121121         !*  Optical parameters 
    122          &      neln   (jpi,jpj) , xze    (jpi,jpj)     , xpar(jpi,jpj,jpk)       & 
     122         &      neln   (jpi,jpj) , xze    (jpi,jpj)     , xpar(jpi,jpj,jpk) ,     & 
    123123         !*  Sediment parameters 
    124          &      dminl  (jpi,jpj) , dmin3  (jpi,jpj,jpk) ,                         & 
     124         &      dminl  (jpi,jpj) , dmin3  (jpi,jpj,jpk)                     ,     & 
    125125         &      sedpocb(jpi,jpj) , sedpocn(jpi,jpj)     , sedpoca(jpi,jpj)  ,     & 
    126126         &      fbod   (jpi,jpj) , cmask  (jpi,jpj)                         , STAT=sms_lobster_alloc )  
Note: See TracChangeset for help on using the changeset viewer.