NCEPLIBS-bufr
11.7.0
|
Print the contents of a data subset. More...
Go to the source code of this file.
Functions/Subroutines | |
subroutine | ufbdmp (LUNIN, LUPRT) |
This subroutine prints a verbose listing of the contents of a data subset, including all data values and replicated sequences, as well as jump/link table information and other internal subset pointers. More... | |
Print the contents of a data subset.
Definition in file ufbdmp.f.
subroutine ufbdmp | ( | LUNIN, | |
LUPRT | |||
) |
This subroutine prints a verbose listing of the contents of a data subset, including all data values and replicated sequences, as well as jump/link table information and other internal subset pointers.
This subroutine is similar to subroutine ufdump(), but it prints different characteristics of each data subset, and in a slightly different format. However, both subroutines can be useful for different diagnostic purposes, and both can also be run interactively to scroll through the contents of a data subset.
[in] | LUNIN | – integer: Absolute value is Fortran logical unit number for BUFR file
|
[in] | LUPRT | – integer: Fortran logical unit number for print output
|
Logical unit ABS(LUNIN) should have already been opened for input operations via a previous call to subroutine openbf(), and a BUFR data subset should have already been read into internal arrays via a previous call to one of the subset-reading subroutines.
Except when LUPRT = 0, logical unit LUPRT must already be associated with a filename on the local system, typically via a Fortran "OPEN" statement. When LUPRT = 0, the subroutine will run interactively and print to standard output, scrolling 20 lines at a time and prompting each time whether to quit and return to the application program (by typing 'q' then '<Enter>') or continue scrolling (by typing anything else).
Program history log:
Date | Programmer | Comments |
---|---|---|
1994-01-06 | J. Woollen | Original author |
1998-07-08 | J. Woollen | Replaced call to Cray library routine ABORT with call to new internal routine bort() |
1999-11-18 | J. Woollen | The number of BUFR files which can be opened at one time increased from 10 to 32 |
2002-05-14 | J. Woollen | Removed old Cray compiler directives |
2003-11-04 | S. Bender | Added remarks and routine interdependencies |
2003-11-04 | D. Keyser | Increased MAXJL from 15000 to 16000; unified/portable for WRF; added documentation; outputs more complete diagnostic info when routine terminates abnormally |
2003-11-04 | D. Keyser | Allowed fuzziness in test for missing values; added option to print using either 'G15.6' or 'F15.6'; added several jump/link table values to output |
2004-08-18 | J. Ator | Modified fuzziness test; added readlc() option; restructured some logic for clarity |
2006-04-14 | D. Keyser | Add call to upftbv() for flag tables to get actual bits that were set to generate value |
2007-01-19 | J. Ator | Use function ibfms() |
2014-12-10 | J. Ator | Use modules instead of COMMON blocks |
2020-09-09 | J. Ator | Fix missing check for long character strings |
2021-09-30 | J. Ator | Replace rjust with Fortran intrinsic adjustr |
Definition at line 71 of file ufbdmp.f.
References bort(), ibfms(), icbfms(), isize(), nemtab(), readlc(), status(), and upftbv().