- Timestamp:
- 11/12/09 17:15:09 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/tools/density_binning/density_bin_IDL_gm/bining2.pro
r2 r161 1 PRO bining2, $ ; 2 ;INPUTS 3 density, $ ; density at T points (3D array) 4 x1, $ ; field at T points (e.g. Salinity or Temperature) 5 sobwlmax, $ ; bowl depth array 6 sig_bowl, $ ; switch for bowl overlay 7 ;OUTPUTS 8 depth_bin, $ ; depth of layers (3D array) 9 thick_bin, $ ; thickness of layers (3D array) 10 x1_bin, $ ; X averaged for each sigma-layer (3D array) 11 bowl_bin, $ ; bowl depth binned on density 12 ; KEYWORDS 13 SIGMA = sigma, $ ; bining values (optionnal) 14 DEPTH_T = depth_t, $ ; depth of T level (NECESSARY) 15 DEPTH_W = depth_w, $ ; depth of W level (NECESSARY) 1 PRO bining2, $ 2 density, $ 3 x1, $ 4 sobwlmax, $ 5 sig_bowl, $ 6 depth_bin, $ 7 thick_bin, $ 8 x1_bin, $ 9 bowl_bin, $ 10 SIGMA = sigma, $ 11 DEPTH_T = depth_t, $ 12 DEPTH_W = depth_w, $ 16 13 E3T = e3t, $ 17 14 E3W = e3w, $ 18 TMASK = tmask ; tmask (3D array) (NECESSARY) 19 15 TMASK = tmask 20 16 ;; 21 17 ;; PRINCIPE DU BINING … … 41 37 ;; et l'apparition d'un +1 dans la declaration des tableaux de sortie 42 38 ;; la couche 0 contient tous les points dont la densite est inferieure a la densite minimale du bining 43 ;; la couche N+1 " " " superieure " maximale 44 ;; 45 ;; 46 ;; Creation : 19/10/99 G. Roullet 47 ;; 39 ;; la couche N+1 " " " superieure " maximale 40 ;; 41 ;; 42 ; @param DENSITY {in} 43 ; density at T points (3D array) 44 ; 45 ; @param X1 {in} 46 ; field at T points (e.g. Salinity or Temperature) 47 ; 48 ; @param SOBWLMAX {in} 49 ; bowl depth array 50 ; 51 ; @param SIG_BOWL {in} 52 ; switch for bowl overlay 53 ; 54 ; @param DEPTH_BIN {out} 55 ; depth of layers (3D array) 56 ; 57 ; @param THICK_BIN {out} 58 ; thickness of layers (3D array) 59 ; 60 ; @param X1_BIN {out} 61 ; X averaged for each sigma-layer (3D array) 62 ; 63 ; @param BOWL_BIN {out} 64 ; bowl depth binned on density 65 ; 66 ; @keyword SIGMA {in}{optional} 67 ; bining values 68 ; 69 ; @keyword DEPTH_T {in}{required} 70 ; depth of T level 71 ; 72 ; @keyword DEPTH_W {in}{required} 73 ; depth of W level 74 ; 75 ; @keyword E3T 76 ; 77 ; @keyword E3W 78 ; 79 ; @keyword TMASK{in}{required} 80 ; tmask (3D array) 81 ; 82 ; @history 83 ; 19/10/99 G. Roullet 84 ;- 85 48 86 size3d = size(density) 49 87 jpi = size3d(1)
Note: See TracChangeset
for help on using the changeset viewer.