Ignore:
Timestamp:
Feb 22, 2010, 3:51:12 PM (15 years ago)
Author:
acozic
Message:

acozic: add argument in init_const_lmdz call for initialisation of INCA model

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ4/branches/LMDZ4V5.0-dev/libf/dyn3d/gcm.F

    r1299 r1316  
    7676#include "iniprint.h"
    7777#include "tracstoke.h"
     78#include "indicesol.h"
    7879
    7980      INTEGER         longcles
     
    211212      IF (config_inca /= 'none') THEN
    212213#ifdef INCA
    213       call init_const_lmdz(nbtr,anneeref,dayref,iphysiq,day_step,nday)
     214      call init_const_lmdz(nbtr,anneeref,dayref,iphysiq,day_step,nday,
     215     $        nbsrf, is_oce,is_sic,is_ter,is_lic)
    214216      call init_inca_para(iim,jjm+1,klon,1,klon_mpi_para_nb,0)
    215217#endif
Note: See TracChangeset for help on using the changeset viewer.