w3fp05.f File Reference

Printer contour subroutine. More...

Go to the source code of this file.

Functions/Subroutines
subroutine	w3fp05 (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-10-13

Definition in file w3fp05.f.

Function/Subroutine Documentation

w3fp05()

subroutine w3fp05	(	real, dimension(1)	rdata,
		integer, dimension(407)	ktbl,
		real, dimension(4)	cnst,
		character*1, dimension(*)	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:

• Ralph Jones 1989-10-13
• Ralph Jones 1992-05-02 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.

Note

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

Author

Ralph Jones

Date

1989-10-13

Definition at line 37 of file w3fp05.f.