Ignore:
Timestamp:
May 25, 2005, 3:10:09 PM (19 years ago)
Author:
Laurent Fairhead
Message:

Synchronisation avec tous les diagnostiques de Ionela IM
Inclusion du slab ocean IM
LF

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ4/trunk/libf/phylmd/phytrac.F

    r625 r644  
    628628
    629629      if (thermiques) then
    630         print*,'calcul de leffet des thermiques'
     630c        print*,'calcul de leffet des thermiques'
    631631        nsplit=10
    632632        DO it=1, nqmax
    … …  
    652652            enddo
    653653          enddo ! nsplit
    654           print*,'apres thermiques'
     654c          print*,'apres thermiques'
    655655c             call dump2d(iim,jjm-1,d_tr_th(1,1,1),'d_tr_th      ')
    656656c            do k=1,klev
    … …  
    868868         close(99)
    869869      else
    870          print*, 'physique pas fini'
     870c         print*, 'physique pas fini'
    871871      endif
    872872
Note: See TracChangeset for help on using the changeset viewer.