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.
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.

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().