Ignore:
Timestamp:
Apr 15, 2015, 6:49:07 PM (10 years ago)
Author:
ymipsl
Message:

remove all dynamic dependency in LMDZ physics except for the include "dimensions.h"

YM

File:
1 edited

Legend:

Unmodified
Added
Removed
  • dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/thermcell_main.F90

    r3809 r3814  
    565565      if (.not. (f0(1).ge.0.) ) then
    566566              abort_message = '.not. (f0(1).ge.0.)'
    567               CALL abort_gcm (modname,abort_message,1)
     567              CALL abort_physic (modname,abort_message,1)
    568568      endif
    569569
     
    695695      if (ierr==1) then
    696696           abort_message = 'thermcellV0_main: les thermiques vont trop haut '
    697            CALL abort_gcm (modname,abort_message,1)
     697           CALL abort_physic (modname,abort_message,1)
    698698      endif
    699699
Note: See TracChangeset for help on using the changeset viewer.