Ignore:
Timestamp:
Jul 15, 2020, 10:14:34 PM (4 years ago)
Author:
adurocher
Message:

Use blocks to allocate compressed arrays to the right size

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/branches/Optimisation_LMDZ/libf/phy_common/profiling_physic.F90

    r3749 r3760  
    2626  CHARACTER(*), parameter :: modname = "profiling_physic_mod"
    2727  LOGICAL, PARAMETER :: check_accuracy = .true.
    28   INTEGER, PARAMETER :: max_id=20, max_depth=10
     28  INTEGER, PARAMETER :: max_id=50, max_depth=10
    2929  INTEGER :: nb_id ! Number of timers
    3030  CHARACTER(15), DIMENSION(max_id) :: name ! Timer names
Note: See TracChangeset for help on using the changeset viewer.