PDSENS
The PDSENS routine packs grib pds extension 41- for ensemble.
USAGE: CALL PDSENS.F(KENS,KPROB,XPROB,KCLUST,KMEMBR,ILAST,MSGA)
Input argument list:
KENS(5) - BYTES 41-45 (GENERAL SECTION, ALWAYS PRESENT.)
KPROB(2) - BYTES 46-47 (PROBABILITY SECTION, PRESENT ONLY IF NEEDE
XPROB(2) - BYTES 48-51&52-55 (PROBABILITY SECTION, IF NEEDED.)
KCLUST(16) - BYTES 61-76 (CLUSTERING SECTION, IF NEEDED.)
KMEMBR(80) - BYTES 77-86 (CLUSTER MEMBERSHIP SECTION, IF NEEDED.)
ILAST - LAST BYTE TO BE PACKED (IF GREATER OR EQUAL TO FIRST BY
IN ANY OF FOUR SECTIONS ABOVE, WHOLE SECTION IS PACKED.
Output argument list: (INCLUDING WORK ARRAYS)
MSGA - FULL PDS SECTION, INCLUDING NEW ENSEMBLE EXTENSION
REMARKS:
Use PDSEUP routine for unpacking pds ensemble extension.
Subprogram can be called from a multiprocessing environment.
W3lib.tar |
Library contains Fortran 90 decoder/encoder
routines for GRIB edition 1. (Fortran90)
Date posted: 2/22/2007 |