Changeset 96 for trunk/mesoscale/PLOT


Ignore:
Timestamp:
Mar 22, 2011, 3:17:07 PM (14 years ago)
Author:
aslmd
Message:

LMD_MM_MARS et LMD_LES_MARS: ajouts mineurs: commentaires et modifications routines de plot

Location:
trunk/mesoscale/PLOT/SPEC
Files:
1 added
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/mesoscale/PLOT/SPEC/LES/getturb.pro

    r85 r96  
    1414;smoothampl=5.
    1515
    16 ;
    17 ; constantes
    18 ;
    19 p0=610. & t0=220. & r_cp=1/4.4 & grav=3.72 & R=192.
     16;;
     17;; constantes
     18;;
     19;p0=610. & t0=220. & r_cp=1/4.4 & grav=3.72 & R=192.
     20p0=610. & t0=220. & r_cp=1.0/3.9 & grav = 3.72 & R=191.
     21print, 'ATTENTION ATTENTION R/cp !!!!', r_cp
    2022
    2123;
     
    2931   WINDOW, /PIXMAP & WDELETE & DEVICE,BYPASS_TRANSLATION=0,DECOMPOSED=0,RETAIN=2
    3032endif else begin
    31    PREF_SET, 'IDL_PATH', '/home/spiga/Save/SOURCES/IDL/fsc_psconfig:<IDL_DEFAULT>', /COMMIT
     33   ;PREF_SET, 'IDL_PATH', '/home/spiga/Save/SOURCES/IDL/fsc_psconfig:<IDL_DEFAULT>', /COMMIT
     34   PREF_SET, 'IDL_PATH', '/home/spiga/SVN/trunk/mesoscale/PLOT/MINIMAL:<IDL_DEFAULT>', /COMMIT
    3235endelse
    3336
     
    174177;@include_w.pro
    175178
     179;@include_tprime.pro
     180
    176181ENDELSE
    177182
  • trunk/mesoscale/PLOT/SPEC/MAP/map_uvt.pro

    r95 r96  
    7979if (n_elements(field1) eq 0) then begin
    8080        print, 'field1: horizontal velocity'
    81         zevel = overvector_x^2 + overvector_y^2  ;; attention il faut que les tableaux soient de la meme taille, OK si uvmet
     81                ;;;attention attention overvector_x et overvector_y sont vides
     82                ;zevel = overvector_x^2 + overvector_y^2  ;; attention il faut que les tableaux soient de la meme taille, OK si uvmet
     83        zevel = (reform(u(*,*,ntime)))^2 + (reform(v(*,*,ntime)))^2 ;; attention il faut que les tableaux soient de la meme taille, OK si uvmet
    8284        what_I_plot = sqrt(zevel)
    8385endif else begin
Note: See TracChangeset for help on using the changeset viewer.