function d = dir8dif(d1,d2)
%
% dir8dif: returns number of increments from d1 to d2
%    d = dir8dif(d1,d2)

d = rem(d2+8-d1,8);
