function [Inew]=Euclid(trans,rot,I)
%implement the uclidean group
%trans =2-vector in percentages of l1 and l2
%rot =scalar in degrees
rot=rot*pi/180;
[l1,l2]=size(I);
[X2,X1]=meshgrid(1:l2,1:l1);
X1t=X1-trans(1)*l1/100;X2t=X2-trans(2)*l2/100;
mid1=l1/2;mid2=l2/2;
X1t=X1t-mid1;X2t=X2t-mid2;
Y1=mid1+cos(rot).*X1t+sin(rot).*X2t;
Y2=mid2-sin(rot).*X1t+cos(rot).*X2t;
Inew=fastint(I,Y1-X1,Y2-X2);