TITLE: Testing Gifs > with(mvcal): >op(arrows); proc(vector1,vector2) local v1,v2,u1,u2; v1 := vector1[1]; v2 := vector1[2]; u1 := vector2[1]; u2 := vector2[2]; plot({[0,0,v1,v2],[v1,v2,4/5*v1-1/10*v2,4/5*v2+1/10*v1], [v1,v2,4/5*v1+1/10*v2,4/5*v2-1/10*v1],[0,0,u1,u2], [u1,u2,4/5*u1-1/10*u2,4/5*u2+1/10*u1], [u1,u2,4/5*u1+1/10*u2,4/5*u2-1/10*u1]}) end > gif(arrows([1,1], [-1,2]),`junkar.gif`); >