Ignore:
Timestamp:
Mar 9, 2023, 5:16:38 PM (15 months ago)
Author:
lguez
Message:

Abort even when ierr is 0

This is consistent with the name of the subroutine.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/create_etat0_limit_unstruct.F90

    r3585 r4460  
    8989                abort_message='create_etat0_limit_unstruct, Initial state file are created, all is fine'
    9090                CALL abort_physic(modname,abort_message,0)
    91                 STOP 0
    9291              ENDIF
    9392!$OMP BARRIER
    … …  
    110109              abort_message='create_etat0_limit_unstruct, Initial state file are created, all is fine'
    111110              CALL abort_physic(modname,abort_message,0)
    112               STOP 0
    113111          ENDIF
    114112        ENDIF
Note: See TracChangeset for help on using the changeset viewer.