blob: 0237cc05aaec4ad2042ba9e7fc73e60fd9c11ef5 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
//page 89
//Example 3.15
clc;
clear;
close;
disp('Differentiation operator D is defined as:');
D = zeros(4,4);
x = poly(0,"x");
for i= 1:4
t= i-1;
f = derivat(x^t);
printf('(Df%d)(x) = ',i);
disp(f);
if ~(i == 1) then
D(i-1,i) = i-1;
end
end
disp('Matrix of D in ordered basis is:');
disp(D,'[D] = ');
//end
|
