Ignore:
Timestamp:
Jul 24, 2024, 2:54:37 PM (4 months ago)
Author:
abarral
Message:

rename modules properly lmdz_*
move ismin, ismax, minmax into new lmdz_libmath.f90
(lint) uppercase fortran keywords

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/branches/Amaury_dev/libf/dyn3dmem/call_dissip_mod.f90

    r5103 r5116  
    240240      !$OMP END DO NOWAIT
    241241
    242       if (1 == 0) then
     242      if (1 == 0) THEN
    243243        !!! Ehouarn: lines here 1) kill 1+1=2 in the dynamics
    244244        !!!                     2) should probably not be here anyway
    … …  
    274274      !$OMP END DO NOWAIT
    275275
    276       if (1 == 0) then
     276      if (1 == 0) THEN
    277277        !!! Ehouarn: lines here 1) kill 1+1=2 in the dynamics
    278278        !!!                     2) should probably not be here anyway
Note: See TracChangeset for help on using the changeset viewer.