See attached.
In general, if anybody wants to find a Fortran routine that is used in a built-in function in NCL, you can download the NCL source code,
look in the "$NCARG/ni/src/lib/nfp" directory for the wrapper ("wrf_dbz_W"):
% cd $NCARG/ni/src/lib/nfp
% grep wrf_dbz_W *.c
wrapper.c:extern NhlErrorTypes wrf_dbz_W(void);
wrapper.c: NclRegisterFunc(wrf_dbz_W,args,"wrf_dbz",nargs);
wrfW.c:NhlErrorTypes wrf_dbz_W( void )
Ignore an "wrapper.c" matches. Instead, look in "wrfW.c" for
wrf_dbz_W and see what Fortran routine it calls:
/*
* Call the Fortran routine.
*/
NGCALLF(calcdbz,CALCDBZ)(tmp_dbz, tmp_prs, tmp_tmk, tmp_qvp, tmp_qra,
tmp_qsn, tmp_qgr, &iwedim, &isndim, &ibtdim,
&sn0, ivarint, iliqskin);
Look in $NCARG/ni/src/lib/nfpfort for that Fortran routine:
% cd ../nfpfort
% grep CALCDBZ *.f
wrf_user_dbz.f: SUBROUTINE CALCDBZ(DBZ,PRS,TMK,QVP,QRA,QSN,QGR,WEDIM,SNDIM,BTDIM,
--Mary
On Mar 27, 2012, at 3:08 PM, lin zhao wrote:
> Hi,
>
> Could anyone tell me where is the directory for the code "wrf_dbz"
> or the reference of the method to calculate reflectivity in NCL?
>
> Have a good day!
> Lin Zhao
>
> Department of Plants, Soils, & Climate
> Utah State University
> 5210 Old Main Hill
> Logan, Utah 84322-5210
> Tel: 435-797-9137 (lab)
>
>
>
>
>
> _______________________________________________
> ncl-talk mailing list
> List instructions, subscriber options, unsubscribe:
> http://mailman.ucar.edu/mailman/listinfo/ncl-talk
_______________________________________________
ncl-talk mailing list
List instructions, subscriber options, unsubscribe:
http://mailman.ucar.edu/mailman/listinfo/ncl-talk
This archive was generated by hypermail 2.1.8 : Mon Apr 09 2012 - 13:43:03 MDT