function errorSimparse = testsimparse

% $Id: testsimparse.m,v 1.2 2004/05/11 15:08:07 stuver Exp $

load ./refData/simparseData5May2004.mat

[id, f, tau, dur] = simparse(simIdTest);

idPassFail = strcmp(idTest, id);
fPassFail = isequal(fTest, f);
tauPassFail = isequal(tauTest, tau);
durPassFail = isequal(durTest, dur);

errorSimparse = [~idPassFail, ~fPassFail, ~tauPassFail, ~durPassFail];

return