function [value, isTerminal, direction] = van_events(t, x, mu)
% event code for ode45 to find roots in x(1).  See 'help ode45' and
% read under events for more information.
%
% note that that all additional parameters passed to the odefile
% (in this case, mu) must also be passed to this file.
%
% 2003-11-07 cbm
% no rights reserved: public domain code
  
value = x(1);
isTerminal = 0;
direction = 0;
