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