diff options
| author | dos-reis <gdr@axiomatics.org> | 2011-08-10 23:30:02 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2011-08-10 23:30:02 +0000 |
| commit | 7c7d44f1dc284e4c4e231d97023aa87ecd5f8e44 (patch) | |
| tree | db90d375dde6576789ad23ae39dc5de66b148e57 /src/input/multKnot.input.pamphlet | |
| parent | e6b1636fe3b19b148f347f6b9f00642db83c5ddc (diff) | |
| download | open-axiom-7c7d44f1dc284e4c4e231d97023aa87ecd5f8e44.tar.gz | |
* algebra/float.spad.pamphlet (Float): Tidy.
* algebra/fortmac.spad.pamphlet (MachineInteger): Likewise.
* algebra/fspace.spad.pamphlet (FunctionSpace): Likewise.
* algebra/integer.spad.pamphlet (Integer): Likewise.
* algebra/mkfunc.spad.pamphlet (InputForm): Likewise.
* algebra/newpoly.spad.pamphlet (RecursivePolynomialCategory):
Likewise.
* input/knot.input.pamphlet: Likewise.
* input/knot2.input.pamphlet: Likewise.
* input/mult3d.input.pamphlet: Likewise.
* input/multKnot.input.pamphlet: Likewise.
* input/r21bugsbig.input.pamphlet: Likewise.
* input/tutchap2.input.pamphlet: Likewise.
Diffstat (limited to 'src/input/multKnot.input.pamphlet')
| -rw-r--r-- | src/input/multKnot.input.pamphlet | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/input/multKnot.input.pamphlet b/src/input/multKnot.input.pamphlet index c051a0fb..572cc9e1 100644 --- a/src/input/multKnot.input.pamphlet +++ b/src/input/multKnot.input.pamphlet @@ -23,8 +23,8 @@ torusInKnot(p,q,r) == b := 1 ab := a+b fac := 2*ab/(1.1*ab-sin(q*t)) - Title := concat("Torus Knot of Type (", concat(p::String, - concat(",", concat(q::String, ")")))) + Title := concat("Torus Knot of Type (", concat(string p, + concat(",", concat(string q, ")")))) Curve := curve(a*fac*cos(p*t), a*fac*sin(p*t), b*fac*cos(q*t)) r = 0 => draw(Curve, t=0..2*%pi, title == Title) draw(Curve, t=0..2*%pi, tubeRadius == r, title == Title, space == sp) |