g2spec.F90 File Reference

Pack/unpack a spectral data field using the complex packing algorithm for spherical harmonic data as defined in Data Representation Template 5.51. More...

Go to the source code of this file.

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

Detailed Description

Pack/unpack a spectral data field using the complex packing algorithm for spherical harmonic data as defined in Data Representation Template 5.51.

Author

Stephen Gilbert

Date

2002-12-19

Definition in file g2spec.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
	)

Pack a spectral data field using the complex packing algorithm for spherical harmonic data as defined in 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 24 of file g2spec.F90.

References mkieee(), and simpack().

Referenced by addfield().

specunpack()

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

Unpack a spectral data field using the complex packing algorithm for spherical harmonic data, Data Representation Template 5.51.

Parameters

[in]	cpack	The packed data field (character*1 array).
[in]	len	length of packed field cpack.
[in]	idrstmpl	Contains the array of values for Data Representation Template 5.51.
[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.
[out]	fld	Contains the unpacked data values.

Author

Stephen Gilbert

Date

2002-12-19

Definition at line 123 of file g2spec.F90.

References g2_gbytesc(), rdieee(), and rdieeec().

Referenced by gf_unpack7().