วิธีทำ 2 ขั้นตอน รันตามลำดับในหนึ่งเซสชัน ทุกขั้นถูกรันกับเอนจินจริง และเอาต์พุตด้านล่างคือสิ่งที่มันให้
Plot3D[Im[ArcSin[(x + I y) ^ 4]], {x, -2, 2}, {y, -2, 2}, Mesh -> None, PlotStyle -> Directive[Yellow, Specularity[White, 20], Opacity[0.8]], ExclusionsStyle -> {None, Red}]-Graphics3D-ParametricPlot3D[{{4 + (3 + Cos[v])Sin[u], 4 + (3 + Cos[v])Cos[u], 4 + Sin[v]}, {8 + (3 + Cos[v])Cos[u], 3 + Sin[v], 4 + (3 + Cos[v])Sin[u]}}, {u, 0, 2Pi}, {v, 0, 2Pi}, PlotStyle -> {Red, Green}]-Graphics3D-สูตรงานทั้งหมด · เอกสารอ้างอิงฟังก์ชัน · ใช้สิ่งนี้จากไคลเอนต์ MCP