Ignore:
Timestamp:
Apr 9, 2021, 3:38:52 PM (4 years ago)
Author:
acozic
Message:

add the parameter "lafin" to chemhook_end routine to allow inca to know when the simulation is ending

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ6/branches/LMDZ-INCA-Dyn/libf/phylmd/physiq_mod.F90

    r3849 r3871  
    49774977            pphis, &
    49784978            zx_rh, &
    4979             aps, bps, ap, bp)
     4979            aps, bps, ap, bp, lafin)
    49804980
    49814981       CALL VTe(VTinca)
     
    52885288       IF (is_omp_master) CALL xios_context_finalize
    52895289#ifdef INCA
    5290        IF (is_omp_master .and. grid_type==unstructured) THEN
    5291           CALL finalize_inca
    5292        ENDIF
     5290       if (type_trac == 'inca' ) then
     5291          IF (is_omp_master .and. grid_type==unstructured) THEN
     5292             CALL finalize_inca
     5293          ENDIF
     5294       endif
    52935295#endif
    52945296
Note: See TracChangeset for help on using the changeset viewer.