aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/view3D.spad.pamphlet
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2010-08-15 06:37:37 +0000
committerdos-reis <gdr@axiomatics.org>2010-08-15 06:37:37 +0000
commit48d0edb7ca718e2336c0e3d2417ec541d8008077 (patch)
treedbc115407dcad45287169ee5ad0b7e85897dcc6e /src/algebra/view3D.spad.pamphlet
parentf6a007e3df81c872452d5a271fbd5dabfa514cc1 (diff)
downloadopen-axiom-48d0edb7ca718e2336c0e3d2417ec541d8008077.tar.gz
* algebra/float.spad.pamphlet (Float): Tidy.
* algebra/limitps.spad.pamphlet (ElementaryFunctionSign): Likewise. * algebra/view2D.spad.pamphlet (TwoDimensionalViewport): Likewise. * algebra/view2D.spad.pamphlet (ThreeDimensionalViewport): Likewise.
Diffstat (limited to 'src/algebra/view3D.spad.pamphlet')
-rw-r--r--src/algebra/view3D.spad.pamphlet3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/algebra/view3D.spad.pamphlet b/src/algebra/view3D.spad.pamphlet
index 22b6d1cd..d1602fe1 100644
--- a/src/algebra/view3D.spad.pamphlet
+++ b/src/algebra/view3D.spad.pamphlet
@@ -691,6 +691,7 @@ ThreeDimensionalViewport(): Exports == Implementation where
[ theta_sf, phi_sf, scale_sf, scaleX_sf, scaleY_sf, scaleZ_sf,
deltaX_sf, deltaY_sf ]
viewport.viewpoint
+ viewport.viewpoint
viewpoint (viewport:%, viewpt:V):Void ==
viewport.viewpoint := viewpt
@@ -871,6 +872,8 @@ ThreeDimensionalViewport(): Exports == Implementation where
sendI(VIEW,0$I)$Lisp -- no more types of things to write
getI(VIEW)$Lisp -- acknowledge
Filename
+ "" -- FIXME: We should be indicating failure
+ "" -- FIXME: We should be indicating failure
perspective (viewport,onOff) ==
if onOff = "on" then viewport.perspective.perspectiveField := yes