ecomtau

PURPOSE

ECOMTAU returns wind stress from 4D ecomsi.cdf type files.

SYNOPSIS

function tau=ecomtau(cdf,tind);

DESCRIPTION

 ECOMTAU  returns wind stress from 4D ecomsi.cdf type files.
    tau=ecomtau(cdf,[tind]);

CROSS-REFERENCE INFORMATION

This function calls:

mcvgt MCVGT Get a NetCDF hyperslab.
tind TIND finds index of Julian day array closest to the specified Gregorian time

This function is called by:

SOURCE CODE

0001 function tau=ecomtau(cdf,tind);
0002 % ECOMTAU  returns wind stress from 4D ecomsi.cdf type files.
0003 %    tau=ecomtau(cdf,[tind]);
0004 taux=mcvgt(cdf,'taux');
0005 tauy=mcvgt(cdf,'tauy');
0006 tau=taux+sqrt(-1)*tauy;
0007 if(nargin==2),
0008   tau=tau(tind);
0009 end