ellipsoid

Elliptic Hyperboloid of 1 Sheet (y-axis)

Elliptic Hyperboloid of 1 Sheet (x-axis)

Elliptic Hyperboloid of 1 Sheet (z-axis)

a =

b =

Hyperbolic Paraboloid (z-axis)

c =

Elliptic Paraboloid (x-axis)

Elliptic Paraboloid (y-axis)

Elliptic Paraboloid (z-axis)

Elliptic Hyperboloid of 2 Sheets (x-axis)

Elliptic Hyperboloid of 2 Sheets (y-axis)

Elliptic Hyperboloid of 2 Sheets (z-axis)

Elliptic Cone (x-axis)

Elliptic Cone (y-axis)

Elliptic Cone (z-axis)

Hyperbolic Paraboloid (x-axis)

Hyperbolic Paraboloid (y-axis)

a = 2 (slider from -8 to 8, step 0.1)
b = 3 (slider from -8 to 8, step 0.1)
c = 1 (slider from -8 to 8, step 0.1)
text1: "\frac{x^2}{(" + (LaTeX[a]) + ")^2}+\frac{y^2}{(" + LaTeX[b] + ")^2}+\frac{z^2}{(" + LaTeX[c] + ")^2}=1"
f = false
g = false
text2: "-\frac{x^2}{(" + (LaTeX[a]) + ")^2}+\frac{y^2}{(" + LaTeX[b] + ")^2}-\frac{z^2}{(" + LaTeX[c] + ")^2}=1"
h = false
i = false
inputBox1 = Textfield(a)
inputBox2 = Textfield(b)
HyperbolicParaboloidZ = Sequence(CurveCartesian[i, j, i^(2) / a^(2) - j^(2) / b^(2), i, -11, 11], j, -11, 11, 0.1)
u = false
text5: "z=\frac{x^2}{(" + (LaTeX[a]) + ")^2}-\frac{y^2}{(" + LaTeX[b] + ")^2}"
Ellipsoid = Sequence(CurveCartesian[((a * cos(i)) * cos(j)), (b * sin(i)), ((c * cos(i)) * sin(j)), i, 0, 6.28319], j, 0, 6.28319, 0.1)
EllipticHyperboloid2SheetsY = Sequence(CurveCartesian[((a * tan(t)) * cos(s)), (b * sec(t)), ((c * tan(t)) * sin(s)), t, 0, 6.28319], s, 0, 6.28319, 0.1)
EllipticParaboloidZ = Sequence(CurveCartesian[(t * cos(s)), (t * sin(s)), t^(2), t, -6, 6], s, 0, 6.28, 0.1)
EllipticParaboloidY = Sequence(CurveCartesian[(t * cos(s)), t^(2), (t * sin(s)), t, -6, 6], s, 0, 6.28, 0.1)
EllipticParaboloidX = Sequence(CurveCartesian[t^(2), (t * cos(s)), (t * sin(s)), t, -6, 6], s, 0, 6.28, 0.1)
HyperbolicParaboloidY = Sequence(CurveCartesian[i, i^(2) / a^(2) - j^(2) / b^(2), j, i, -11, 11], j, -11, 11, 0.1)
HyperbolicParaboloidX = Sequence(CurveCartesian[i^(2) / a^(2) - j^(2) / b^(2), i, j, i, -11, 11], j, -11, 11, 0.1)
EllipticConeX = Sequence(CurveCartesian[(a * s), ((b * s) * sin(t)), ((c * s) * cos(t)), t, -6.28, 6.28], s, -6.28, 6.28, 0.1)
EllipticConeY = Sequence(CurveCartesian[((a * s) * sin(t)), (b * s), ((c * s) * cos(t)), t, -6.28, 6.28], s, -6.28, 6.28, 0.1)
inputBox3 = Textfield(c)
d = true
e = false
j = false
k = false
l = false
m = false
n = false
o = false
p = false
q = false
r = false
text7: "y=\frac{x^2}{(" + (LaTeX[a]) + " )^2}-\frac{z^2}{(" + LaTeX[c] + " )^2}"
text8: "x=\frac{y^2}{(" + (LaTeX[b]) + " )^2}-\frac{z^2}{(" + LaTeX[c] + " )^2}"
text9: "\frac{x^2}{(" + (LaTeX[a]) + " )^2}-\frac{y^2}{( " + LaTeX[b] + ")^2}-\frac{z^2}{(" + LaTeX[c] + " )^2}=1"
text10: "-\frac{x^2}{(" + (LaTeX[a]) + " )^2}-\frac{y^2}{( " + LaTeX[b] + ")^2}+\frac{z^2}{(" + LaTeX[c] + " )^2}=1"
text11: "z=\frac{x^2}{(" + (LaTeX[a]) + ")^2}+\frac{y^2}{(" + LaTeX[b] + ")^2}"
text12: "y=\frac{x^2}{(" + (LaTeX[a]) + " )^2}+\frac{z^2}{( " + LaTeX[c] + ")^2}"
text13: "x=\frac{y^2}{(" + (LaTeX[b]) + " )^2}+\frac{z^2}{(" + LaTeX[c] + " )^2}"
text6: "\frac{x^2}{(" + (LaTeX[a]) + ")^2}=\frac{y^2}{(" + LaTeX[b] + " )^2}+\frac{z^2}{(" + LaTeX[c] + " )^2}"
text4: "\frac{y^2}{(" + (LaTeX[b]) + ")^2}=\frac{x^2}{(" + LaTeX[a] + ")^2}+\frac{z^2}{(" + LaTeX[c] + ")^2}"
text3: "\frac{z^2}{(" + (LaTeX[c]) + ")^2}=\frac{x^2}{( " + LaTeX[a] + ")^2}+\frac{y^2}{(" + LaTeX[b] + " )^2}"
text14: "-\frac{x^2}{( " + (LaTeX[a]) + " )^2}+\frac{y^2}{( " + LaTeX[b] + " )^2}+\frac{z^2}{( " + LaTeX[c] + " )^2}=1"
text15: "\frac{x^2}{( " + (LaTeX[a]) + " )^2}-\frac{y^2}{(" + LaTeX[b] + "  )^2}+\frac{z^2}{( " + LaTeX[c] + " )^2}=1"
text16: "\frac{x^2}{( " + (LaTeX[a]) + " )^2}+\frac{y^2}{( " + LaTeX[b] + " )^2}-\frac{z^2}{( " + LaTeX[c] + " )^2}=1"
EllipticConeZ = Sequence(CurveCartesian[((a * s) * cos(t)), ((b * s) * sin(t)), (c * s), t, -6.28, 6.28], s, -6.28, 6.28, 0.05)
EllipticHyperboloid2SheetsX = Sequence(CurveCartesian[(a * sec(t)), ((b * tan(t)) * cos(s)), ((c * tan(t)) * sin(s)), t, 0, 6.28319], s, 0, 6.28319, 0.05)
EllipticHyperboloid1SheetZ = Sequence(CurveCartesian[((a * sec(t)) * cos(s)), ((b * sec(t)) * sin(s)), (c * tan(t)), t, -6.28319, 6.28319], s, 0, 6.28319, 0.05)
EllipticHyperboloid1SheetY = Sequence(CurveCartesian[((a * sec(t)) * cos(s)), (c * tan(t)), ((b * sec(t)) * sin(s)), t, -6.28319, 6.28319], s, 0, 6.28319, 0.05)
EllipticHyperboloid1SheetX = Sequence(CurveCartesian[(a * tan(t)), ((b * sec(t)) * cos(s)), ((c * sec(t)) * sin(s)), t, -6.28319, 6.28319], s, 0, 6.28319, 0.05)
EllipticHyperboloid2SheetsZ = Sequence(CurveCartesian[((a * tan(t)) * cos(s)), ((b * tan(t)) * sin(s)), (c * sec(t)), t, 0, 6.28319], s, 0, 6.28319, 0.05)