blob: b317de8651c8b2e557788f8f60ba694f6f58d91c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
|
\documentclass{article}
\usepackage{axiom}
\begin{document}
\title{\$SPAD/src/input pollevel.input}
\author{The Axiom Team}
\maketitle
\begin{abstract}
\end{abstract}
\eject
\tableofcontents
\eject
\section{License}
<<license>>=
--Copyright The Numerical Algorithms Group Limited 1996.
@
<<*>>=
<<license>>
-- This file tests variables moving to the correct level within
-- polynomial towers.
)clear all
f(y : UP(x, POLY INT)): UP(x, POLY INT) == x * y
f(x)
)clear all
y := operator 'y
eq1 := D(y x,x,2) - x*y(x)=0
seriesSolve(eq1,y,x=0,[0,a])
eq2 := D(y x,x) - x*cos(y x) - exp(x)
seriesSolve(eq2,y,x=0,y(0) = 0)
)clear all
p : UP(x, POLY INT) := x
u := (z*x)
u * p
@
\eject
\begin{thebibliography}{99}
\bibitem{1} nothing
\end{thebibliography}
\end{document}
|
