% to be deleted
% new macro: gtIndexSelectLines

function linekept=gtKeepLine(keeplist,line)

  linekept.id=line.id(keeplist);
  linekept.pairid=line.pairid(keeplist);
  linekept.aid=line.aid(keeplist);
  linekept.bid=line.bid(keeplist);
  linekept.theta=line.theta(keeplist);
  linekept.eta=line.eta(keeplist);
  linekept.omega=line.omega(keeplist);
  linekept.int=line.int(keeplist);
  linekept.bbxs=line.bbxs(keeplist);
  linekept.bbys=line.bbys(keeplist);

  linekept.ca=line.ca(keeplist,:);
  linekept.cb=line.cb(keeplist,:);
  linekept.dir=line.dir(keeplist,:);
  linekept.pl=line.pl(keeplist,:);

  linekept.thetatype=line.thetatype(keeplist);
  linekept.hkl=line.hkl(keeplist,:);
  %linekept.lRv=line.lRv(:,:,keeplist);

end