dirlist = {"inexact_solvers", "integrate_functions", "steppers", ...
           "string_compare", "utilities"};

dir = fileparts (mfilename ("fullpath"));

if (! exist (fullfile (dir, "inst"), "dir"))
  ## Run this if the package is installed
  for ii=1:length(dirlist)
    rmpath (fullfile (dir, "..", dirlist{ii}))
  endfor
else
  ## Run this if we are testing the package without installation        
  for ii=1:numel (dirlist)
    rmpath (fullfile (dir, "inst"))
    rmpath (fullfile (dir, "inst", dirlist{ii}))
    rmpath (fullfile (dir, "src"))
  endfor
endif

rmpath (fullfile ((__octave_config_info__).fcnfiledir, "ode", "private"))
clear dirlist dir odeset_path private_path
dirlist = {"inexact_solvers", "integrate_functions", "steppers", ...
           "string_compare", "utilities"};

dir = fileparts (mfilename ("fullpath"));

if (! exist (fullfile (dir, "inst"), "dir"))
  ## Run this if the package is installed
  for ii=1:length(dirlist)
    rmpath (fullfile (dir, "..", dirlist{ii}))
  endfor
else
  ## Run this if we are testing the package without installation        
  for ii=1:numel (dirlist)
    rmpath (fullfile (dir, "inst"))
    rmpath (fullfile (dir, "inst", dirlist{ii}))
    rmpath (fullfile (dir, "src"))
  endfor
endif

rmpath (fullfile ((__octave_config_info__).fcnfiledir, "ode", "private"))
clear dirlist dir odeset_path private_path
