function [errorH1, errorH2, errorL1] = testgetifo

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

load ./refData/getifoData5May2004.mat

CordntH1 = getifo('H1');
CordntH2 = getifo('H2');
CordntL1 = getifo('L1');

VH1 = isequal(CordntLho.V,CordntH1.V);
WH1 = isequal(CordntLho.V,CordntH1.V);
LATH1 = isequal(CordntLho.LAT,CordntH1.LAT);
CODECH1 = isequal(CordntLho.CODEC,CordntH1.CODEC);
LONGH1 = isequal(CordntLho.LONG,CordntH1.LONG);
WGS84H1 = isequal(CordntLho.WGS84,CordntH1.WGS84);
RH1 = isequal(CordntLho.R,CordntH1.R);

errorH1 = [~VH1, ~WH1, ~LATH1, ~CODECH1, ~LONGH1, ~WGS84H1, ~RH1];

VH2 = isequal(CordntLho.V,CordntH2.V);
WH2 = isequal(CordntLho.V,CordntH2.V);
LATH2 = isequal(CordntLho.LAT,CordntH2.LAT);
CODECH2 = isequal(CordntLho.CODEC,CordntH2.CODEC);
LONGH2 = isequal(CordntLho.LONG,CordntH2.LONG);
WGS84H2 = isequal(CordntLho.WGS84,CordntH2.WGS84);
RH2 = isequal(CordntLho.R,CordntH2.R);

errorH2 = [~VH2, ~WH2, ~LATH2, ~CODECH2, ~LONGH2, ~WGS84H2, ~RH2];

VL1 = isequal(CordntLlo.V,CordntL1.V);
WL1 = isequal(CordntLlo.V,CordntL1.V);
LATL1 = isequal(CordntLlo.LAT,CordntL1.LAT);
CODECL1 = isequal(CordntLlo.CODEC,CordntL1.CODEC);
LONGL1 = isequal(CordntLlo.LONG,CordntL1.LONG);
WGS84L1 = isequal(CordntLlo.WGS84,CordntL1.WGS84);
RL1 = isequal(CordntLlo.R,CordntL1.R);

errorL1 = [~VL1, ~WL1, ~LATL1, ~CODECL1, ~LONGL1, ~WGS84L1, ~RL1];

return