ParEllipse Definition
# Generic point on a Parametric ellipse, center [c[1],c[2]])
ParEllipse:=proc(c,d,t):
[ c[1]+d[1]*(t+1/t)/2 , c[2]+d[2]*(t-1/t)/(2*I)
]:
end:
# with axes d[1], d[2], and parameter t
# It is a parametrization of (x-c[1])^2/d[1]^2+(y-c[2])^2/d[2]^2=1
# c and d are lists of length 2, and t is a variable
# Recall that I is the Maple symbol for the square root of -1