aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/d03agents.spad.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/d03agents.spad.pamphlet')
-rw-r--r--src/algebra/d03agents.spad.pamphlet3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/algebra/d03agents.spad.pamphlet b/src/algebra/d03agents.spad.pamphlet
index 3c7b57c4..53085713 100644
--- a/src/algebra/d03agents.spad.pamphlet
+++ b/src/algebra/d03agents.spad.pamphlet
@@ -88,8 +88,7 @@ d03AgentsPackage(): E == I where
v := variables(e := 4*first(p)*third(p)-(second(p))**2)
eq := subscriptedVariables(e)
noa:NOA :=
--- one?(# v) =>
- (# v) = 1 =>
+ one?(# v) =>
((first v) = X@Symbol) =>
[eq,[xstart],[xs::OCDF],empty()$LEDF,[xf::OCDF]]
[eq,[ystart],[ys::OCDF],empty()$LEDF,[yf::OCDF]]