Ignore:
Timestamp:
Jun 14, 2019, 9:00:44 AM (5 years ago)
Author:
emillour
Message:

Mars GCM:

  • minor updates: enable output of Ls in diagfi files and make an error message more verbose.

EM

Location:
trunk/LMDZ.MARS/libf/phymars
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.MARS/libf/phymars/physiq_mod.F

    r2081 r2141  
    25342534         call WRITEDIAGFI(ngrid,"temp","temperature","K",3,zt)
    25352535         call WRITEDIAGFI(ngrid,"Sols","Time","sols",0,zday)
    2536 
     2536         call WRITEDIAGFI(ngrid,"Ls","Solar longitude","deg",
     2537     &                    0,zls*180./pi)
    25372538         call WRITEDIAGFI(ngrid,"u","Zonal wind","m.s-1",3,zu)
    25382539         call WRITEDIAGFI(ngrid,"v","Meridional wind","m.s-1",3,zv)

  • trunk/LMDZ.MARS/libf/phymars/writediagfi.F

    r1955 r2141  
    506506         if (is_parallel) then
    507507           write(*,*) "writediagfi error: dim=1 not implemented ",
    508      &                 "in parallel mode"
     508     &                 "in parallel mode. Problem for ",trim(nom)
    509509           stop
    510510         endif
Note: See TracChangeset for help on using the changeset viewer.