getgb1s.f File Reference

Find a grib message. More...

Go to the source code of this file.

Functions/Subroutines
subroutine	getgb1s (CBUF, NLEN, NNUM, J, JPDS, JGDS, JENS, K, KPDS, KGDS, KENS, LSKIP, LGRIB, IRET)
	Find a grib message. More...

Detailed Description

Find a grib message.

Author

Mark Iredell

Date

1995-10-31

Definition in file getgb1s.f.

Function/Subroutine Documentation

getgb1s()

subroutine getgb1s	(	character, dimension(nlen*nnum)	CBUF,
			NLEN,
			NNUM,
			J,
		integer, dimension(200)	JPDS,
		integer, dimension(200)	JGDS,
		integer, dimension(200)	JENS,
			K,
		integer, dimension(200)	KPDS,
		integer, dimension(200)	KGDS,
		integer, dimension(200)	KENS,
			LSKIP,
			LGRIB,
			IRET
	)

Find a grib message.

Find in the index file a reference to the grib message requested. The grib message request specifies the number of messages to skip and the unpacked pds and gds parameters. (A requested parameter of -1 means to allow any value of this parameter to be found.)

Program history log:

• Mark Iredell 1995-10-31
• Mark Iredell 2001-06-05 Apply linux port by ebisuzaki.

Parameters

[in]	CBUF	Character*1 (nlen*nnum) buffer containing index data.
[in]	NLEN	Integer length of each index record in bytes.
[in]	NNUM	Integer number of index records.
[in]	J	Integer number of messages to skip (=0 to search from beginning).
[in]	JPDS	Integer (200) pds parameters for which to search (=-1 for wildcard).
[in]	JGDS	Integer (200) gds parameters for which to search (only searched if jpds(3)=255) (=-1 for wildcard).
[in]	JENS	Integer (200) ensemble pds parms for which to search (only searched if jpds(23)=2) (=-1 for wildcard).
[out]	K	Integer message number found (can be same as j in calling program in order to facilitate multiple searches).
[out]	KPDS	Integer (200) unpacked pds parameters.
[out]	KGDS	Integer (200) unpacked gds parameters.
[out]	KENS	Integer (200) unpacked ensemble pds parms.
[out]	LSKIP	Integer number of bytes to skip.
[out]	LGRIB	Integer number of bytes to read.
[out]	IRET	Integer return code. 0 All ok. 1 Request not found.

Note

Subprogram can be called from a multiprocessing environment. This subprogram is intended for private use by getgb routines only.

Author

Mark Iredell

Date

1995-10-31

Definition at line 42 of file getgb1s.f.