CALL SEQUENCE... spresol SPIN SPOUT INPUT OUTPUT [ -lrlmt VAL0 -kind VAL1 ] DESCRIPTION... spresol - EXTRACTS LOWER RESOLUTION SUB-SET FROM SPECTRAL FILE AUTHOR - S.LAMBERT, NOV 1979. LAST REVISION: $Header: /home/cvs/RMNLIB/utils/rdiag/lspgm/spresol.ptn,v 4.9 2014/09/25 20:20:54 dugas Exp $ PURPOSE - RETURNS IN SPOUT FILE A LOWER SPECTRAL RESOLUTION SUB-SET OF THE INPUT GLOBAL SPHERICAL HARMONIC COEFFICIENTS IN SPIN FILE INPUT FILE... SPIN = GLOBAL SPECTRAL FIELDS OUTPUT FILE... SPOUT = GLOBAL SPECTRAL FIELDS WITH LOWER SPECTRAL RESOLUTION INPUT PARAMETERS... LRLMT = ONE NUMBER CONTAINING THE REQUIRED RESOLUTION. THIS NUMBER CONTAINS SEVEN DIGITS... LR = FIRST THREE DIGITS = M TRUNCATION LM = SECOND THREE DIGITS = N TRUNCATION T = TYPE OF TRUNCATION (0=RHOMBOIDAL,2=TRIANGULAR). KIND = 0 ==> GLOBAL COEFFICIENTS INPUT < 0 ==> ANTI-SYMMETRIC COEFFICIENTS > 0 ==> SYMMETRIC COEFFICIENTS READ( 5,5000 ) LRLMT,KIND 5000 FORMAT(10X,I10,I5) EXAMPLE OF INPUT CARD... SPRESOL 150152 0 0123456789012345678901234567890123456789012345678901234567890 1 2 3 4 5 6 7 THIS EXTRACTS SPECTRAL FIELDS WITH 14 WAVES IN THE M AND N DIRECTIONS AND WITH GLOBAL TRIANGULAR TRUNCATION. EXIT CONDITIONS... 0 NO PROBLEMS FATAL CONDITIONS... 1 ERROR READING OUTSP 2 INPUT ARRAY INCONSISTENT WITH KIND 3 ERROR READING INPUT NON-FATAL CONDITIONS... 101 INSUFFICIENT ZONAL WAVE RESOLUTION IN SPIN 102 INSUFFICIENT RESOLUTION IN SPIN