function ob = fsol(Lo,la,x0,y0,z0,or,tp) % function ob = fsol(Lo,la,x0,y0,z0,or,tp) % Lo = longueur % la = largeur % x0 = position en x % y0 = position en y % z0 = position en z % or = orientation % tp = type (1=surf;2=surfl) [x,y]=meshgrid(0:Lo/5:Lo,0:la/5:la); z=0*x; switch tp case 1 switch or case 1 ob=surf(z+x0,x+y0,y+z0); case 2 ob=surf(x+x0,z+y0,y+z0); case 3 ob=surf(x+x0,y+y0,z+z0); end case 2 switch or case 1 ob=surfl(z+x0,x+y0,y+z0); case 2 ob=surfl(x+x0,z+y0,y+z0); case 3 ob=surfl(x+x0,y+y0,z+z0); end end %© by Cédric Blaser / 27.11.2001