CALL SEQUENCE... splook OUTSP INPUT OUTPUT [ -t1 VAL1 -name VAL2 -lv1 VAL3 \ -m VAL4 -n VAL5 -kind VAL6 [VAL7] -scal VAL8 ] AUTHORS - R.Laprise AND J.D.Henderson, NOV 29/83. LAST REVISION: $Header: /home/cvs/RMNLIB/utils/rdiag/lspgm/splook.ptn,v 4.13 2014/10/16 11:29:58 dugas Exp $ PURPOSE... PRINTS SPECTRAL FIELDS FOUND ON FILE OUTSP. THEY MUST BE REQUESTED ON INPUT CARDS IN THE SAME ORDER AS THEY APPEAR ON THE FILE. PARAMETERS... CNTR = -1 TO QUIT PROCESSING IMMEDIATLEY (IN INPUT CARD MODE). NSTEP (t1) \ NAM (name) = RECORD LABEL WORDS 2,3,4 IDENTIFYING THE FIELD TO SUM. LEVEL (lv1) / NPR (n) = MAXIMUM NUMBER OF N-ROWS TO PRINT MPR (m) = MAXIMUM NUMBER OF M-COLUMNS TO PRINT KIND(1) CONTROLS OUTPUT FORMAT AS FOLLOWS... = 1, (REAL,IMAG.). = 3, 2-D AMPL. SPECTRUM IN (M,N-M). (DEFAULT) = 4, 2-D AMPL. SPECTRUM IN (M,N). KIND(2) = VERTICAL LEVEL TYPE. IT CAN ONLY BE USED WITH CMC/RPN STD FILES AND THEN LV1 AND LV2 ARE ASSUMED TO CONTAIN DECODED VALUES. FURTHERMORE, THIS PARAMETRE CAN ONLY BE SPECIFIED IN COMMAND-LINE MODE. THE CURRENTLY SUPPORTED VALUES ARE: 'HAUTEUR' , heights (m) with respect to sea level 'SIGMA' , classical terrain following (0.0 -> 1.0) 'ETA' , first version of the GEM ETA coordinate 'PRESSION' , pressure (mb) 'ARBITRAIRE', arbitrary level (no units apply) 'HAUTEURS' , heights (M) with respect to the surface 'HYBRIDE' , hybrid GEM coordinate 'THETA' , potential temperature coordinate 'GALCHEN' , GalChen generalized coordinate SCALE (scal) IS A SCALE FACTOR TO APPLY BEFORE PRINTING = 0.0, REQUEST AUTOMATIC SCALING TO BE DONE NOTES: 1) NAM = ' ', '-1' OR 'NEXT' ARE EQUIVALENT, REQUESTING THAT THE NEXT FIELD BE PRINTED, WHATEVER NSTEP OR LEVEL FOUND. 2) NAM = 'ALL' REQUESTS THAT ALL RECORDS MATCHING NSTEP AND LEVEL BE DISPLAYED. READ( 5,5010 CNTR,NSTEP,NAME,LEVEL,NPR,MPR,KIND, SCALE 5010 FORMAT(A2,8X,I10,1X,A4,4I5,E10.0) EXAMPLE OF INPUT CARD... SPLOOK 1979010100 VORT 500 21 21 3 0.0 0123456789012345678901234567890123456789012345678901234567890 1 2 3 4 5 6 7 EXIT CONDITIONS... 0 NO PROBLEMS FATAL CONDITIONS... 1 UNKNOWN TYPE OF SPECTRAL ARRAY 2 ERROR READING OUTSP NON-FATAL CONDITIONS... 101 FINISHED READING OUTSP 102 FINISHED READING DIRECTIVES 103 FINISHED READING WHILE SKIPPING