A Maple egy fejlett matematikai problémamegoldó és programozói szoftver.
-
xDJCx #604
A megadott képletben hibás volt az y -t számító rész, a + helyett / -kell, és a Return(M) is el volt gépelve, return(M) lenne a helyes, de itt nincs is szükség a return parancsra.
Az eljárás át lett alakítva úgy, hogy meg kell adni az eljárás hívásakor az eljárás által visszaadandó osztópont (pont-objektum) nevét. Ezzel a névvel lehet azután hivatkozni a létrejött objektumra.
Új típust a Maple TypeTools csomagja segítségével lehet létrehozni, a csomag AddType parancsával. A súgóban: ?AddType
restart;
with(geometry):
OP:=proc(M,A,B,p,q)
local x,y;
x:=(HorizontalCoord(A)*q+HorizontalCoord(B)*p)/(p+q);
y:=(VerticalCoord(A)*q+VerticalCoord(B)*p)/(p+q);
point(M,x,y);
M;
end proc;
point(A,3,8);
point(B,10, 6);
OP(osztópont,A, B,2,1);
detail(osztópont);
coordinates(osztópont);