Changeset 3914 for trunk


Ignore:
Timestamp:
Sep 5, 2025, 4:26:19 PM (4 months ago)
Author:
vbelissa
Message:

Pluto PCM : Correcting bug in newstart. Victor Belissa

Location:
trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.COMMON/libf/grid/dimension/makdim

    r1441 r3914  
    1616    echo "The number of longitudes must be a multiple of 8."
    1717    echo "See the files dyn3d/groupe.F and dyn3dpar/groupe_p.F."
    18     exit 1
     18#exit 1
    1919fi
    2020

  • trunk/LMDZ.PLUTO/libf/dynphy_lonlat/phypluto/newstart.F

    r3910 r3914  
    28492849                 DO compt=1,4
    28502850                    if (qsurf(edge(compt),igcm_n2).le.1.e-6.and.
    2851      &                                       tsurf(ig).gt.val7) then
     2851     &                          tsurf(edge(compt)).gt.val7) then
    28522852                       ignew=edge(compt)
    28532853                    endif
Note: See TracChangeset for help on using the changeset viewer.