NCEPLIBS-w3emc  2.9.2
w3ft213.f File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine w3ft213 (ALOLA, APOLA, INTERP)
 SUBROUTINE: W3FT48V CONVERT (361,91) GRID TO (129,85) N. More...
 

Function/Subroutine Documentation

◆ w3ft213()

subroutine w3ft213 ( real, dimension(361,91)  ALOLA,
real, dimension(npts)  APOLA,
  INTERP 
)

SUBROUTINE: W3FT48V CONVERT (361,91) GRID TO (129,85) N.

HEMI. GRID AUTHOR: JONES,R.E. ORG: W342 DATE: 93-10-23

ABSTRACT: CONVERT A NORTHERN HEMISPHERE 1.0 DEGREE LAT.,LON. 361 BY 91 GRID TO A POLAR STEREOGRAPHIC 129 BY 85 GRID. THE POLAR STEREOGRAPHIC MAP PROJECTION IS TRUE AT 60 DEG. N. , THE MESH LENGTH IS 95.25 KM. AND THE ORIENTION IS 105 DEG. W. AWIPS GRID 213 NATIONAL - CONUS - DOUBLE RESOLUTION

PROGRAM HISTORY LOG: 93-10-23 R.E.JONES

USAGE: CALL W3FT213(ALOLA,APOLA,INTERP)

INPUT ARGUMENTS: ALOLA - 361*91 GRID 1.0 DEG. LAT,LON GRID N. HEMI. 32851 POINT GRID. 360 * 181 ONE DEGREE GRIB GRID 3 WAS FLIPPED, GREENWISH ADDED TO RIGHT SIDE AND CUT TO 361 * 91. INTERP - 1 LINEAR INTERPOLATION , NE.1 BIQUADRATIC

INPUT FILES: NONE

OUTPUT ARGUMENTS: APOLA - 129*85 GRID OF NORTHERN HEMISPHERE. 10965 POINT GRID IS AWIPS GRID TYPE 213

OUTPUT FILES: ERROR MESSAGE TO FORTRAN OUTPUT FILE

WARNINGS:

  1. W1 AND W2 ARE USED TO STORE SETS OF CONSTANTS WHICH ARE REUSABLE FOR REPEATED CALLS TO THE SUBROUTINE.
  2. WIND COMPONENTS ARE NOT ROTATED TO THE 129*85 GRID ORIENTATION AFTER INTERPOLATION. YOU MAY USE W3FC08 TO DO THIS.

RETURN CONDITIONS: NORMAL SUBROUTINE EXIT

SUBPROGRAMS CALLED: UNIQUE : NONE

LIBRARY: ASIN , ATAN2

ATTRIBUTES: LANGUAGE: CRAY CFT77 FORTRAN MACHINE: CRAY C916-128, CRAY Y-MP8/864, CRAY Y-MP EL2/256

Definition at line 50 of file w3ft213.f.