specpack.F90 File Reference

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

Go to the source code of this file.

Functions/Subroutines
subroutine	specpack (fld, ndpts, JJ, KK, MM, idrstmpl, cpack, lcpack)
	This subroutine packs a spectral data field using the complex packing algorithm for spherical harmonic data as defined in the GRIB2 Data Representation Template 5.51. More...

Detailed Description

This subroutine packs up a spectral data field.

Author

Stephen Gilbert

Date

2002-12-19

Definition in file specpack.F90.

Function/Subroutine Documentation

specpack()

subroutine specpack	(	real, dimension(ndpts), intent(in)	fld,
		integer, intent(in)	ndpts,
		integer, intent(in)	JJ,
		integer, intent(in)	KK,
		integer, intent(in)	MM,
		integer, dimension(*), intent(inout)	idrstmpl,
		character(len=1), dimension(*), intent(out)	cpack,
		integer, intent(out)	lcpack
	)

This subroutine packs a spectral data field using the complex packing algorithm for spherical harmonic data as defined in the GRIB2 Data Representation Template 5.51.

Parameters

[in]	fld	Contains the data values to pack.
[in]	ndpts	The number of data values in array fld.
[in]	JJ	J pentagonal resolution parameter.
[in]	KK	K pentagonal resolution parameter.
[in]	MM	M pentagonal resolution parameter.
[in]	idrstmpl	Contains the array of values for Data Representation Template 5.51.
[out]	cpack	The packed data field (character*1 array).
[out]	lcpack	length of packed field cpack.

Author

Stephen Gilbert

Date

2002-12-19

Definition at line 21 of file specpack.F90.

References mkieee(), and simpack().

Referenced by addfield().