NCEPLIBS-w3emc  2.9.2
w3ft201.f File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine w3ft201 (ALOLA, APOLA, INTERP)
 SUBROUTINE: W3FT201 CONVERT (361,181) GRID TO (65,65) N. More...
 

Function/Subroutine Documentation

◆ w3ft201()

subroutine w3ft201 ( real, dimension(361,181)  ALOLA,
real, dimension(npts)  APOLA,
  INTERP 
)

SUBROUTINE: W3FT201 CONVERT (361,181) GRID TO (65,65) N.

HEMI. GRID AUTHOR: JONES,R.E. ORG: W342 DATE: 94-09-11

ABSTRACT: CONVERT A GLOBAL 1.0 DEGREE LAT.,LON. 361 BY 181 GRID TO A POLAR STEREOGRAPHIC 65 BY 65 GRID. THE POLAR STEREOGRAPHIC MAP PROJECTION IS TRUE AT 60 DEG. N. , THE MESH LENGTH IS 381 KM. AND THE ORIENTION IS 105 DEG. W. THIS IS THE SAME AS W3FT43V EXCEPT THE ORIENTION IS 105 DEG. W.

PROGRAM HISTORY LOG: 93-03-29 R.E.JONES ADD SAVE STATEMENT

USAGE: CALL W3FT201(ALOLA,APOLA,INTERP)

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

INPUT FILES: NONE

OUTPUT ARGUMENTS: APOLA - 65*65 GRID OF NORTHERN HEMISPHERE. 4225 POINT GRID IS AWIPS GRID TYPE 201

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 65*65 GRID ORIENTATION AFTER INTERPOLATION. YOU MAY USE W3FC08 TO DO THIS.
  3. ALL POINTS BELOW EQUATOR ARE ON THIS GRID.

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 52 of file w3ft201.f.