A Maple egy fejlett matematikai problémamegoldó és programozói szoftver.
-
xDJCx #589
Lehet a nargs változóval ellenőrizni a paraméterek számát. Az args változó pedig az átadott paramétereket listában adja vissza.
Az alábbi eljárás 3 bemenő szám paraméter esetén azok összegét adja vissza, 2 paraméter esetén azok különbségét, egyébként pedig figyelmeztető szöveget ir ki és NULL-t ad vissza.
Az andmap(type,...) parancssal egy parancsban lehet az összes bemenő paraméterre a tipusvizsgalatot elvegezni, és ezek logikai eredményeinek és kapcsolatát adja vissza.
szamok:=proc(A,B,C)
if nargs=3 and andmap(type,[args],numeric) then
return A+B+C;
elif nargs=2 and andmap(type,[args],numeric) then
return A-B;
else print("Ervenytelen bemeno adatok!");return NULL;
end if;
end proc;