tind

PURPOSE

SYNOPSIS

DESCRIPTION

 TIND finds index of Julian day array closest to the specified Gregorian time
  if optional third argument, returns array of indices

   Usage: i=tind(jd,greg,[greg2]);
     
  examples:
    i=tind(jd,[1990 4 5 0 0 0]);
     returns the index of jd that is closest to to 0000 April 5, 1990 

    ii=tind(jd,[1990 4 5 0 0 0],[1992 3 1 12 0 0]);
   
    returns the indices of jd that are between 0000 April 5, 1990 
     and 1200 March 1, 1992.

CROSS-REFERENCE INFORMATION

• julian JULIAN Converts Gregorian calendar dates to corresponding
• near NEAR finds the indices of x that are closest to the point x0.

• allmean function allmean(cdf1,cdf2,tind,tout);
• cmean function cmean(cdfin,cdfout,varin,tind,tout)
• ctotal CTOTAL computes to total amount of tracer present in a given time
• depave DEPAVE computes the depth-averaged value of a 4D variable at
• depaveuv DEPAVEUV computes the depth-averaged value of velocity at
• depmax DEPmax computes the depth-maxraged value of a 4D variable at
• ecom_depaveuv ECOM_DEPAVEUV computes the depth-averaged value of velocity at
• ecom_zslice ECOM_ZSLICE Returns a matrix containing a horizontal slice at a specified depth
• ecom_zsliceuv ZSLICEUV Returns a matrix containing a horizontal slice at a specified depth
• ecomdemo m-file to show a few examples of extracting data
• ecomtau ECOMTAU returns wind stress from 4D ecomsi.cdf type files.
• emean function emean(cdfin,cdfout,tind,tout)
• freshthick function [f,x,y]=freshthick(cdf,tind,s0);
• freshtot FRESHTOT computes to total amount of fresh water present in a given time
• hfmean HFMEAN averages the heat flux over time steps TIND
• pomdemo POMDEMO an m-file to show a few examples of extracting data
• scrum_ctotal CTOTAL computes to total amount of tracer present in a given time
• scrum_depaveuv ECOM_DEPAVEUV computes the depth-averaged value of velocity at
• scrum_ftotal ftotAL computes to total amount of fresh water present in a given time
• taumean function taumean(cdfin,cdfout,tind,tout)
• tmean function tmean(cdfin,cdfout,tind,tout)
• vmean function vmean(cdfin,cdfout,tind,tout)

SOURCE CODE

0001 function i=tind(jd,greg,greg2);
0002 % TIND finds index of Julian day array closest to the specified Gregorian time
0003 %  if optional third argument, returns array of indices
0004 %
0005 %   Usage: i=tind(jd,greg,[greg2]);
0006 %
0007 %  examples:
0008 %    i=tind(jd,[1990 4 5 0 0 0]);
0009 %     returns the index of jd that is closest to to 0000 April 5, 1990
0010 %
0011 %    ii=tind(jd,[1990 4 5 0 0 0],[1992 3 1 12 0 0]);
0012 %
0013 %    returns the indices of jd that are between 0000 April 5, 1990
0014 %     and 1200 March 1, 1992.
0015 %
0016 
0017 % Rich Signell (rsignell@usgs.gov)
0018 
0019 n=length(jd);
0020 jd1=julian(greg);
0021 if(nargin==3),
0022   jd2=julian(greg2);
0023   if(jd2<min(jd(:)) | jd1>max(jd(:))),
0024    disp(' outside range')
0025    return
0026   end
0027 end
0028 if(nargin==3),
0029  i=find(jd>=jd1&jd<=jd2);
0030 else
0031  i=near(jd,jd1,1);
0032 end
0033