Changeset 2170


Ignore:
Timestamp:
Dec 16, 2014, 11:37:16 AM (10 years ago)
Author:
acozic
Message:

Add modification to manage xios with inca model

Location:
LMDZ5/trunk/libf
Files:
5 edited

Legend:

Unmodified
Added
Removed
  • LMDZ5/trunk/libf/dyn3dmem/gcm.F

    r2151 r2170  
    240240     $        iphysiq,day_step,nday,
    241241     $        nbsrf, is_oce,is_sic,
    242      $        is_ter,is_lic)
     242     $        is_ter,is_lic, calend)
    243243
    244244         call init_inca_para(
  • LMDZ5/trunk/libf/dyn3dmem/leapfrog_loc.F

    r2038 r2170  
    16041604c$OMP MASTER
    16051605                 call fin_getparam
     1606c$OMP END MASTER
     1607
     1608#ifdef INCA
     1609                 call finalize_inca
     1610#endif
     1611
     1612c$OMP MASTER
    16061613                 call finalize_parallel
    16071614c$OMP END MASTER
  • LMDZ5/trunk/libf/dyn3dpar/gcm.F

    r2151 r2170  
    246246     $        iphysiq,day_step,nday,
    247247     $        nbsrf, is_oce,is_sic,
    248      $        is_ter,is_lic)
     248     $        is_ter,is_lic, calend)
    249249
    250250         call init_inca_para(
  • LMDZ5/trunk/libf/dyn3dpar/leapfrog_p.F

    r2083 r2170  
    14101410c$OMP MASTER
    14111411              call fin_getparam
    1412               call finalize_parallel
     1412c$OMP END MASTER
     1413#ifdef INCA
     1414                 call finalize_inca
     1415#endif
     1416c$OMP MASTER
     1417               call finalize_parallel
    14131418c$OMP END MASTER
    14141419              abort_message = 'Simulation finished'
  • LMDZ5/trunk/libf/phylmd/physiq.F90

    r2159 r2170  
    13081308             annee_ref, &
    13091309             day_ref,  &
    1310              itau_phy)
     1310             itau_phy, &
     1311             io_lon, &
     1312             io_lat)
    13111313
    13121314        CALL VTe(VTinca)
Note: See TracChangeset for help on using the changeset viewer.