

Set and retrieve parameters for Dsgrid routines. The ncl language affords a convenient implementation of the parameter setting and retrieval functions.
    procedure dssetp(
        pnam[1] : string,
        pval[1]
    )
 
    function dsgetp(
        pnam[1] : string
    )
 
begin
  NUM = 6
  NX = 61
  NY = 61
  xi = (/0.00, 1.00, 0.00, 1.00, 0.40, 0.75/)
  yi = (/0.00, 0.00, 1.00, 1.00, 0.20, 0.65/)
  zi = (/0.00, 0.00, 0.00, 0.00, 1.25, 0.80/)
  xeye =  3.3
  yeye = -3.3
  zeye =  3.3
  xo = new((/NX/),float)
  yo = new((/NY/),float)
;
; Create the output grid.
;
  xinc = 1./(NX-1) 
  yinc = 1./(NY-1) 
  ii = fspan(0.,60.,NX)
  xo = xinc * ii
  yo = yinc * ii
;
; Exponent equals 0.5
;
  dssetp("exp", 0.5)
  output = dsgrid2s(xi, yi, zi, xo, yo)
end
NG4.1 Home, Index, Examples, Glossary, Feedback, Ref Contents, Ref WhereAmI?