diff options
| author | dos-reis <gdr@axiomatics.org> | 2013-05-18 06:52:11 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2013-05-18 06:52:11 +0000 |
| commit | 0611af2a9349c640402fded93ddc53f641af9967 (patch) | |
| tree | 6ae1e25b47382ea2d3083c83d8cbecc4368619f9 /src/algebra/view3D.spad.pamphlet | |
| parent | 979b28507f84eff5c739879f4b15e595eeab00f9 (diff) | |
| download | open-axiom-0611af2a9349c640402fded93ddc53f641af9967.tar.gz | |
Use members, not parts
Diffstat (limited to 'src/algebra/view3D.spad.pamphlet')
| -rw-r--r-- | src/algebra/view3D.spad.pamphlet | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/view3D.spad.pamphlet b/src/algebra/view3D.spad.pamphlet index 9d8daed2..4f78a67a 100644 --- a/src/algebra/view3D.spad.pamphlet +++ b/src/algebra/view3D.spad.pamphlet @@ -504,7 +504,7 @@ ThreeDimensionalViewport(): Exports == Implementation where for pt in lpts repeat insert!(dimension pt,s) #s > 1 => error "All points should have the same dimension" - (n := first parts s) < 3 => error "Dimension of points should be greater than 2" + (n := first members s) < 3 => error "Dimension of points should be greater than 2" sendI(VIEW,viewport.fun)$Lisp sendI(VIEW,makeVIEW3D)$Lisp sendSTR(VIEW,viewport.title)$Lisp |