getgb1r.f File Reference

Reads and unpacks a grib message. More...

Go to the source code of this file.

Functions/Subroutines
subroutine	getgb1r (LUGB, LSKIP, LGRIB, KF, KPDS, KGDS, KENS, LB, F, NBITSS, IRET)
	Program history log: More...

Detailed Description

Reads and unpacks a grib message.

Author

Mark Iredell

Date

1995-10-31

Definition in file getgb1r.f.

Function/Subroutine Documentation

getgb1r()

subroutine getgb1r	(		LUGB,
			LSKIP,
			LGRIB,
			KF,
		integer, dimension(200)	KPDS,
		integer, dimension(200)	KGDS,
		integer, dimension(200)	KENS,
		logical*1, dimension(*)	LB,
		real, dimension(*)	F,
			NBITSS,
			IRET
	)

Program history log:

• Mark Iredell 1995-10-31
• Chuang 2004-07-22 Add packing bit number nbitss in the argument list because eta grib files need it to repack grib file.

  Parameters

  [in]	LUGB	Integer unit of the unblocked grib data file.
  [in]	LSKIP	Integer number of bytes to skip.
  [in]	LGRIB	Integer number of bytes to read.
  [out]	KF	Integer number of data points unpacked.
  [out]	KPDS	Integer (200) unpacked pds parameters.
  [out]	KGDS	Integer (200) unpacked gds parameters.
  [out]	KENS	Integer (200) unpacked ensemble pds parms.
  [out]	LB	Logical*1 (kf) unpacked bitmap if present.
  [out]	F	Real (kf) unpacked data.
  [out]	NBITSS	Packaging bit number. Used by GRIB file to repack.
  [out]	IRET	Integer return code.

• 0 All ok.
• 97 Error reading grib file.
• other w3fi63 grib unpacker return code.

Note

There is no protection against unpacking too much data. Subprogram can be called from a multiprocessing environment. Do not engage the same logical unit from more than one processor. This subprogram is intended for private use by getgb routines only.

Author

Mark Iredell

Date

1995-10-31

Definition at line 32 of file getgb1r.f.