Parameterdarstellung
restart: with(linalg): `(* Parameterdarstellung *)`: fx(t):= ;# (* Funktion eingeben *) fy(t):= ;# (* Funktion eingeben *) fz(t):= ;# (* Funktion eingeben *) vektorf:=vector([fx(t),fy(t),fz(t)]) ; n:= ; `(* n-te Ableitung *)`; for i from 1 to 3 do diff(vektorf[i],t$n): od;