Ignore:
Timestamp:
Apr 2, 2025, 9:03:47 AM (3 months ago)
Author:
emillour
Message:

Common dynamics:
Add initialization of "dscrpt_tab_cntrl(:)" (strings of descriptors
incluede in restart.nc to describe contents of controle array) to
empty strings, since in some cases they are not filled.
EM

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/LMDZ.COMMON/libf/dyn3d_common/dynredem.F90

    r3637 r3706  
    9696  tab_cntrl(:)  = 0.
    9797  allocate(dscrpt_tab_cntrl(ldscrpt))
     98  !Initialize dscrpt_tab_cntrl(:) to empty strings
     99  dscrpt_tab_cntrl(:)=""
     100
    98101  dscrpt_tab_cntrl(1:5) = (/                        &
    99102      "(1)  Number of nodes along longitude      ", &
Note: See TracChangeset for help on using the changeset viewer.