w3fp10.f File Reference

Printer contour subroutine. More...

Go to the source code of this file.

Functions/Subroutines
subroutine	w3fp10 (rdata, ktbl, cnst, title, krect, kcontr, linev, iwidth)
	Prints a two-dimensional grid of any shape, with contouring, if desired.

Detailed Description

Printer contour subroutine.

Author

Ralph Jones

Date

1989-09-08

Definition in file w3fp10.f.

Function/Subroutine Documentation

w3fp10()

subroutine w3fp10	(	real, dimension(*)	rdata,
		integer, dimension(*)	ktbl,
		real, dimension(4)	cnst,
		integer, dimension(33)	title,
			krect,
			kcontr,
			linev,
			iwidth
	)

Prints a two-dimensional grid of any shape, with contouring, if desired.

Grid values are scaled according to to constants specified by the programer, rounded, and printed as 4,3, or 2 digit integers with sign, the sign marking the grid position of the printed number. If contouring is requested, bessel's interpolation formula is used to optain the contour lines. Contours are indicated by alphabetic characters ranging from a to h or numeric characters from 0 to 9. Contour origin and interval are specified by the programmer in terms of printed values.

Program History Log

Date	Programmer	Comments
1989-09-08	Ralph Jones	Initial
1992-05-02	Ralph Jones	Convert to cray cft77 fortran, add save.

Parameters

[in]	RDATA	Real array of grid data to be printed.
[in]	KTBL	Integer array with shape of array.
[in]	CNST	Real array of four elements, used in scaling for printing and contouring.
[in]	TITLE	Is a array of 132 characters or less of hollerith data, 1st char. must be blank. printed at bottom of the map.
[in]	KRECT	1 if grid is rectangular, 0 otherwise.
[in]	KCONTR	1 for contouring , 0 otherwise.
[in]	LINEV	0 is for 6 lines per vertical inch, non-zero 8 lines per vertical inch.
[in]	IWIDTH	Number of characters in print line, 132 is standard printer.

Return conditions: Normal subroutine return, unless number of rows is greater than 200, prints error message and exits.

Note

Special version of w3fp05(), 1st point is upper left hand corner. Written on request of peter chase because some grib fields can start with the upper left hand corner as the 1st point of a grid.

Author

Ralph Jones

Date

1989-09-08

The value CRMX is machine dependent, it should be set to a value a little less than the largest positive floating point number for the computer.

LIMNRW is limit on number of rows allowed and is dimension of KRLOC

Definition at line 44 of file w3fp10.f.