NCEPLIBS-g2  3.4.5
compack.f File Reference

This subroutine packs up a data field. More...

Go to the source code of this file.

Functions/Subroutines

subroutine compack (fld, ndpts, idrsnum, idrstmpl, cpack, lcpack)
 This subroutine packs up a data field. More...
 

Detailed Description

This subroutine packs up a data field.

Author
Stephen Gilbert
Date
2000-06-21

Definition in file compack.f.

Function/Subroutine Documentation

◆ compack()

subroutine compack ( real, dimension(ndpts), intent(in)  fld,
integer, intent(in)  ndpts,
integer, intent(in)  idrsnum,
integer, dimension(*), intent(inout)  idrstmpl,
character(len=1), dimension(*), intent(out)  cpack,
integer, intent(out)  lcpack 
)

This subroutine packs up a data field.

It uses a complex packing algorithm as defined in the GRIB2 documention and supports GRIB2 complex packing templates with or without spatial differences (i.e. DRTs 5.2 and 5.3). It also fills in GRIB2 Data Representation Template 5.2 or 5.3 with the appropriate values.

Parameters
[in]fldContains the data values to pack
[in]ndptsThe number of data values in array fld
[in]idrsnumData Representation Template number 5.N must equal 2 or 3.
[in,out]idrstmplContains the array of values for Data Representation Template 5.2 or 5.3
  • (1) = Reference value - ignored on input
  • (2) = Binary Scale Factor
  • (3) = Decimal Scale Factor
  • (7) = Missing value management
  • (8) = Primary missing value
  • (9) = Secondary missing value
  • (17) = Order of Spatial Differencing ( 1 or 2 )
[out]cpackThe packed data field (character*1 array)
[out]lcpacklength of packed field cpack.
Author
Stephen Gilbert
Date
2000-06-21

Definition at line 32 of file compack.f.