ferret how to:

["Miguel Gonzales" <mig02x@xxxxxxxxxxx>]

hello steve:
I need aid in the script description which has like result a "mask", for 
which its function I do not know it clearly, but it is necessary for the 
type of plottings that handling,  script is the following:

! title of the script::          create_mask.jnl
! tipe :: oceanographic plot
!
use pisces_pac_5d_1992_JAN_grid_T.nc
let msk=if votemper[k=1] then 1 else 0*sossheig
!
let mask=msk[l=@ave]-msk[i=@shf:1,l=@ave]
set vi left
fill votemper[k=1,l=2]
let sst_alongcoast=mask*votemper[k=1]
set vi right
fill/l=2 sst_alongcoast
list/l=2/j=2 sst_alongcoast
let csst=sst_alongcoast[i=@sum]
fill csst
sp rm mask_coast_pisces00.nc
save/file=mask_coast_pisces00.nc mask

_________________________________________________________________
MSN Amor: busca tu ½ naranja http://latam.msn.com/amor/