Changeset 2883


Ignore:
Timestamp:
Jan 31, 2023, 7:54:07 PM (2 years ago)
Author:
romain.vande
Message:

Mars PCM:
Small fix : move an endif misplaced for watercap
RV

Location:
trunk/LMDZ.MARS
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.MARS/README

    r2881 r2883  
    38463846== 26/01/2023 == SF+AB
    38473847Fix a small error on co2ice in dynphy_lonlat/phymars/lect_start_archive.F (used by newstart)
     3848
     3849== 31/01/2023 == RV
     3850Small fix : move an endif misplaced for watercap

  • trunk/LMDZ.MARS/libf/phymars/phyetat0_mod.F90

    r2826 r2883  
    603603                          "<watercap> is set to zero"
    604604     watercap(:)=0
    605 
     605   endif ! of if (.not.found)
    606606     write(*,*) 'Now transfer negative surface water ice to', &
    607607                ' watercap !'
    … …  
    628628      enddo
    629629     endif ! of if (nq.ge.1)
    630    endif ! of if (.not.found)
    631630else
    632631   watercap(:)=0
Note: See TracChangeset for help on using the changeset viewer.