r63w72.f File Reference

Convert w3fi63() parms to w3fi72() parms. More...

Go to the source code of this file.

Functions/Subroutines
subroutine	r63w72 (KPDS, KGDS, IPDS, IGDS)
	Determines the integer PDS and GDS parameters for the GRIB1 packing routine w3fi72() given the parameters returned from the GRIB1 unpacking routine w3fi63(). More...

Detailed Description

Convert w3fi63() parms to w3fi72() parms.

Author

Mark Iredell

Date

1992-10-31

Definition in file r63w72.f.

Function/Subroutine Documentation

r63w72()

subroutine r63w72	(	dimension(200)	KPDS,
		dimension(200)	KGDS,
		dimension(200)	IPDS,
		dimension(200)	IGDS
	)

Determines the integer PDS and GDS parameters for the GRIB1 packing routine w3fi72() given the parameters returned from the GRIB1 unpacking routine w3fi63().

Program history log:

• Mark Iredell 1991-10-31
• Mark Iredell 1996-05-03 Corrected some level types and some data representation types
• Mark Iredell 1997-02-14 Only altered ipds(26:27) for extended pds
• Chris Caruso 1998-06-01 Y2K fix for year of century
• Diane Stoken 2005-05-06 Recognize level 236

Note

kgds and igds extend beyond their dimensions here if pl parameters are present.

Parameters

[in]	kpds	integer (200) PDS parameters from w3fi63().
[in]	kgds	integer (200) GDS parameters from w3fi63().
[out]	ipds	integer (200) PDS parameters for w3fi72().
[out]	igds	integer (200) GDS parameters for w3fi72().

Author

Mark Iredell

Date

1992-10-31

Definition at line 26 of file r63w72.f.