Anonymous

>                           with(geom3d)
> print();
[Archimedean, AreCollinear, AreConcurrent, AreConjugate, AreCoplanar, 

  AreDistinct, AreParallel, ArePerpendicular, AreSkewLines, DefinedAs, 

  DirectionRatios, Equation, FindAngle, FixedPoint, GlideReflect, 

  GlideReflection, GreatDodecahedron, GreatIcosahedron, 

  GreatRhombicuboctahedron, GreatRhombiicosidodecahedron, 

  GreatStellatedDodecahedron, HarmonicConjugate, HexakisIcosahedron, 

  HexakisOctahedron, InRadius, IsArchimedean, IsEquilateral, IsFacetted, 

  IsOnObject, IsQuasi, IsRegular, IsRightTriangle, IsStellated, IsTangent, 

  MidRadius, NormalVector, OnSegment, ParallelVector, 

  PentagonalHexacontahedron, PentagonalIcositetrahedron, PentakisDodecahedron, 

  QuasiRegularPolyhedron, RadicalCenter, RadicalLine, RadicalPlane, 

  RegularPolyhedron, RhombicDodecahedron, RhombicTriacontahedron, 

  RotatoryReflect, RotatoryReflection, ScrewDisplace, ScrewDisplacement, 

  SmallRhombicuboctahedron, SmallRhombiicosidodecahedron, 

  SmallStellatedDodecahedron, SnubCube, SnubDodecahedron, 

  StereographicProjection, StretchRotate, TangentPlane, TetrakisHexahedron, 

  TrapezoidalHexecontahedron, TrapezoidalIcositetrahedron, TriakisIcosahedron, 

  TriakisOctahedron, TriakisTetrahedron, TruncatedCuboctahedron, 

  TruncatedDodecahedron, TruncatedHexahedron, TruncatedIcosahedron, 

  TruncatedIcosidodecahedron, TruncatedOctahedron, TruncatedTetrahedron, 

  altitude, geom3d:-area, center, centroid, coordinates, cube, cuboctahedron, 

  detail, dilate, distance, dodecahedron, draw, dsegment, duality, faces, 

  facet, geom3d:-form, gtetrahedron, hexahedron, homology, homothety, 

  icosahedron, icosidodecahedron, incident, intersection, inverse, inversion, 

  line, midpoint, octahedron, parallel, parallelepiped, plane, point, polar, 

  pole, powerps, projection, geom3d:-radius, randpoint, reflect, reflection, 

  rotate, rotation, schlafli, segment, sides, sphere, stellate, tetrahedron, 

  tname, transform, translate, translation, transprod, triangle, vertices, 

  geom3d:-volume, xcoord, geom3d:-xname, ycoord, geom3d:-yname, zcoord, 

  geom3d:-zname]
>                  plan := 2 x + y - 2 z + 3 = 0
> print();
                     2 x + y - 2 z + 3 = 0
>                           2          2          2     
>           spher := (x - 6)  + (y - 5)  + (z - 4)  = 36
> print();
                     2          2          2     
              (x - 6)  + (y - 5)  + (z - 4)  = 36
>                       solve({plan, spher})
> print();
 /          /    2                           2       \         
{ x = RootOf\5 _Z  + (20 - 8 z) _Z + 80 + 5 z  - 40 z/, z = z, 
 \                                                             

               /    2                           2       \          \ 
  y = -2 RootOf\5 _Z  + (20 - 8 z) _Z + 80 + 5 z  - 40 z/ + 2 z - 3 }
                                                                   / 
>             plane(Q, plan); Equation(Q, [x, y, z]);
> print();
                     2 x + y - 2 z + 3 = 0
>            sphere(S, spher); Equation(S, [x, y, z]);
> print();
            2           2                2          
           x  - 12 x + y  - 10 y + 41 + z  - 8 z = 0
>            intersection(delta, Q, S); detail(delta);
Error, (in geom3d:-intersection) wrong type of arguments
Error, (in geom3d:-detail) unknown object:  delta
>                            detail(Q)
> print();
           name of the object:  Q

             form of the object:  plane3d

             equation of the plane:  2*x+y-2*z+3 = 0
>                            detail(S)
> print();
  name of the object:  S

    form of the object:  sphere3d

    name of the center:  center_S_2

    coordinates of the center:  [6, 5, 4]

    radius of the sphere:  6

    surface area of the sphere:  144*Pi

    volume of the sphere:  288*Pi

    equation of the sphere:  x^2-12*x+y^2-10*y+41+z^2-8*z = 0
>