Including twp functions.

From: Wang, Yi <yi.wang_at_nyahnyahspammersnyahnyah>
Date: Mon, 10 Nov 2008 14:05:49 -0700

Hello Folks:

I am not sure if this is related.

I have included twp functions at the very beginning of my script. I find the
second function cannot be recognized by NCL.

How do I fix this?

function
wrf_int(nlevel:integer,ut:float,pt:float,lev:float,n1:integer,n2:integer)
; Use this function to interpolate WRF to observation pressure levels

local nnnn,nlevel,ut,pt,lev,n1,n2,u4_tmp

begin
nnnn = dimsizes(ut)

u4_tmp = new((/nlevel,nnnn(0),nnnn(2),nnnn(3)/),float)
u4_tmp@_FillValue = -9999.0
u4t = new((/nlevel,nnnn(0)/),float)
u4t@_FillValue = -9999.0

do ii = 0,nlevel-1
u4_tmp(ii,:,:,:) = wrf_interp_3d_z(ut,pt,lev(ii))
end do
u4t = wgt_areaave(u4_tmp(:,:,n1:n2,n1:n2),1.0,1.0,0)

return(u4t)

End

Function wrf_rhtest(......), this second function cannot be found.

Thanks,

Yi Wang, PhD
Pacific Northwest National Lab

_______________________________________________
ncl-talk mailing list
List instructions, subscriber options, unsubscribe:
http://mailman.ucar.edu/mailman/listinfo/ncl-talk
Received on Mon Nov 10 2008 - 14:05:49 MST

This archive was generated by hypermail 2.2.0 : Fri Nov 14 2008 - 16:42:12 MST