NCEPLIBS-bufr
11.5.0
|
Go to the source code of this file.
Functions/Subroutines | |
function | invcon (NC, LUN, INV1, INV2) |
THIS FUNCTION SEARCHES A "WINDOW" (SEE BELOW REMARKS) FOR AN ELEMENT IDENTIFIED IN THE USER STRING AS A CONDITIONAL NODE (I.E. More... | |
Definition in file invcon.f.
function invcon | ( | NC, | |
LUN, | |||
INV1, | |||
INV2 | |||
) |
THIS FUNCTION SEARCHES A "WINDOW" (SEE BELOW REMARKS) FOR AN ELEMENT IDENTIFIED IN THE USER STRING AS A CONDITIONAL NODE (I.E.
AN ELEMENT WHICH MUST MEET A CONDITION IN ORDER TO BE READ FROM OR WRITTEN TO A DATA SUBSET). IF A CONDITIONAL ELEMENT IS FOUND AND IT CONFORMS TO THE CONDITION, THEN THE INDEX OF THE ELEMENT WITHIN THE WINDOW IS RETURNED. OTHERWISE A VALUE OF ZERO IS RETURNED.
PROGRAM HISTORY LOG: 1994-01-06 J. WOOLLEN – ORIGINAL AUTHOR 1998-07-08 J. WOOLLEN – IMPROVED MACHINE PORTABILITY 1999-11-18 J. WOOLLEN – THE NUMBER OF BUFR FILES WHICH CAN BE OPENED AT ONE TIME INCREASED FROM 10 TO 32 (NECESSARY IN ORDER TO PROCESS MULTIPLE BUFR FILES UNDER THE MPI) 2003-11-04 S. BENDER – ADDED REMARKS/BUFRLIB ROUTINE INTERDEPENDENCIES 2003-11-04 D. KEYSER – MAXJL (MAXIMUM NUMBER OF JUMP/LINK ENTRIES) INCREASED FROM 15000 TO 16000 (WAS IN VERIFICATION VERSION); UNIFIED/PORTABLE FOR WRF; ADDED DOCUMENTATION (INCLUDING HISTORY) (INCOMPLETE); OUTPUTS MORE COMPLETE DIAGNOSTIC INFO WHEN UNUSUAL THINGS HAPPEN 2009-04-21 J. ATOR – USE ERRWRT 2010-04-27 J. WOOLLEN – ADD DOCUMENTATION 2014-12-10 J. ATOR – USE MODULES INSTEAD OF COMMON BLOCKS
USAGE: INVCON (NC, LUN, INV1, INV2) INPUT ARGUMENT LIST: NC - INTEGER: CONDITION CODE: 1 = '=' (EQUAL) 2 = '!' (NOT EQUAL) 3 = '<' (LESS THAN) 4 = '>' (GREATER THAN) LUN - INTEGER: I/O STREAM INDEX INTO INTERNAL MEMORY ARRAYS INV1 - INTEGER: FIRST INDEX OF WINDOW TO SEARCH INV2 - INTEGER: LAST INDEX OF WINDOW TO SEARCH
OUTPUT ARGUMENT LIST: INVCON - INTEGER: INDEX WITHIN WINDOW OF CONDITIONAL NODE CONFORMING TO SPECIFIED CONDITION 0 = NONE FOUND
REMARKS:
SEE THE DOCBLOCK IN BUFR ARCHIVE LIBRARY SUBROUTINE GETWIN FOR AN EXPLANATION OF "WINDOWS" WITHIN THE CONTEXT OF A BUFR DATA SUBSET.
THIS ROUTINE CALLS: ERRWRT THIS ROUTINE IS CALLED BY: CONWIN Normally not called by any application programs.
Definition at line 57 of file invcon.f.
References errwrt().
Referenced by conwin().