w3ft33.f File Reference

Thicken thinned wafs grib grid 37-44. More...

Go to the source code of this file.

Functions/Subroutines
subroutine	w3ft33 (ain, out, nsflag)
	Subroutine thickens one thinned wafs grib grid to a real array of 5329 numbers (73,73) 1.25 degree grid.

Detailed Description

Thicken thinned wafs grib grid 37-44.

Author

Ralph Peterson

Date

1994

Definition in file w3ft33.f.

Function/Subroutine Documentation

w3ft33()

subroutine w3ft33	(	real, dimension(*)	ain,
		real, dimension(nx,ny)	out,
			nsflag
	)

Subroutine thickens one thinned wafs grib grid to a real array of 5329 numbers (73,73) 1.25 degree grid.

Program History Log:

Date | Programmer | Comment --—|---------—|-----— 1994-??-?? | Ralph Peterson 1994-11-07 | Ralph Jones | Add doc block, change call to 3 parameters. Replace cos with table lookup. 1995-06-02 | Ralph Peterson | Changes to correct miss-position between + or - 8.75 n/s. 1995-06-03 | Ralph Jones | Changes so 8 rows with 73 values are not thickened, 10% faster.

Parameters

[in]	AIN	Real 3447 word array with unpacked thinned wafs grib type 37-44.
[in]	NSFLAG	Integer = 1 AIN is wafs grib grid 37-40 n. hemi. = -1 AIN is wafs grib grid 41-44 s. hemi.
[out]	OUT	Real (73,73) word array with thickened wafs grib grid 37-44.

Remarks

The pole point for u and v wind components will have only one point. If you need the pole row corrected see page 9 section 1 in office note 388. You need both u and v to make the correction.

Author

Ralph Peterson

Date

1994

Definition at line 31 of file w3ft33.f.