aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/liouv.spad.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/liouv.spad.pamphlet')
-rw-r--r--src/algebra/liouv.spad.pamphlet3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/algebra/liouv.spad.pamphlet b/src/algebra/liouv.spad.pamphlet
index ee4bd756..4145f37f 100644
--- a/src/algebra/liouv.spad.pamphlet
+++ b/src/algebra/liouv.spad.pamphlet
@@ -95,8 +95,7 @@ LiouvillianFunction(R, F): Exports == Implementation where
isi x == kernel(opsi, x)
ici x == kernel(opci, x)
ierf x == (zero? x => 0; kernel(operf, x))
--- ili2 x == (one? x => INV; kernel(opli2, x))
- ili2 x == ((x = 1) => INV; kernel(opli2, x))
+ ili2 x == (one? x => INV; kernel(opli2, x))
integrand l == eval(first l, retract(second l)@K, third l)
integral(f:F, x:SE) == opint [eval(f, k:=kernel(x)$K, dummy), dummy, k::F]