Changeset 142 for trunk/SRC/ToBeReviewed/CALCULS/level2depth.pro
- Timestamp:
- 07/21/06 14:47:49 (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/ToBeReviewed/CALCULS/level2depth.pro
r134 r142 4 4 ;------------------------------------------------------------ 5 5 ;+ 6 ; NAME:level2depht7 6 ; 8 ; PURPOSE: permet de passer d''un tableau 2d de niveau au9 ; tableau 2d de profondeur correspondant a ces niveaux7 ; @file_comments 8 ; Allows to pass from a 2d level array to a 2d depth array corresponding o these levels 10 9 ; 11 ; CATEGORY: SANS BOUCLE 10 ; @categories 11 ; Without loop 12 12 ; 13 ; CALLING SEQUENCE: res=level2depth(niveau) 13 ; @param TAB {in}{required} 14 ; 2d level array of sill levels (or a structure respecting litchamp criterions) 14 15 ; 15 ; INPUTS: niveau tableau 2d de niveaux seuil (ou une structure repondant16 ; aux criteres de litchamp)16 ; @keyword NOMASK 17 ; To do not mask land points. 17 18 ; 18 ; KEYWORD PARAMETERS:19 ; /NOMASK: pour ne pas masquer les points terres19 ; @returns 20 ; 2d array containing depthes 20 21 ; 21 ; OUTPUTS: un tableau 2d contenant des profondeurs 22 ; @uses 23 ; common.pro 22 24 ; 23 ; COMMON BLOCKS: 24 ; common.pro 25 ; 26 ; SIDE EFFECTS: 27 ; 28 ; RESTRICTIONS: 29 ; 30 ; EXAMPLE: 31 ; 32 ; MODIFICATION HISTORY: Sebastien Masson (smasson@lodyc.jussieu.fr) 25 ; @history 26 ; Sebastien Masson (smasson@lodyc.jussieu.fr) 33 27 ; 17/6/1999 34 28 ; 14/6/2000 accepte !values.f_nan 29 ; 30 ; @version 31 ; $Id$ 32 ; 35 33 ;- 36 34 ;------------------------------------------------------------ … … 41 39 compile_opt idl2, strictarrsubs 42 40 ; 43 tempsun = systime(1) ; pourkey_performance41 tempsun = systime(1) ; To key_performance 44 42 @common 45 43 ;------------------------------------------------------------ 46 ; lecture du champ d''entree et recuperation de la taille du sous 47 ; domaine utilise 44 ; Reading of the input field and recovery of the used subdomain's size 48 45 ;------------------------------------------------------------ 49 46 niveaux = litchamp(tab) 50 47 grille,mask, -1, -1,gdep,nx,ny,nz,firstx,firsty,firstz,lastx,lasty,lastz 51 48 ;--------------------------------------------------------------- 52 ; verification de la coherence entre la taille du tableau et le domaine definit pardomdef49 ; verification of the coherence between array's size and the domain definied by domdef 53 50 ;--------------------------------------------------------------- 54 51 taille = size(niveaux)
Note: See TracChangeset
for help on using the changeset viewer.