function unscootched = unscootch(scootched, orig_dday, scootch_sec);
%
unscootched = scootched;

diffsec = 86400*(scootched - orig_dday);
scootchi = find( (abs(diffsec) > scootch_sec) & (diffsec > scootch_sec));
if (~isemptys(scootchi))
   unscootched(scootchi) = orig_dday(scootchi) + scootch_sec/86400;
end
scootchi = find( (abs(diffsec) > scootch_sec) & (diffsec < - scootch_sec));
if (~isemptys(scootchi))
   unscootched(scootchi) = orig_dday(scootchi) - scootch_sec/86400;
end




