function [np,gam] = calvario (x,y,calanus)

% Paramètre d'entrée de la fonction 'vario2di'
% help vario2di pour plus d'information sur chaque variable
% x et y sont en km

  nd     = length(x);			
  nlag   = 20;
  xlag   = 20; 
  xltol  = 10;
  ndir   = 1;
  azm    = 0; 
  atol   = 90;
  bandw  = 500;
  nvarg  = 2;
  ivtail = [1;1];
  ivhead = [1;1];
  ivtype = [1;4];
  nvar   = 1;

  [np,gam,hm,tm,hv,tv] = ...
	 vario2di (nd,x,y,calanus,nlag,xlag,xltol,ndir,azm,...
	           atol,bandw,nvarg,ivtail,ivhead,ivtype,nvar);