Matemaatika ja statistika instituut
Matemaatika eriala
Margus Lillemäe
Numbriline meetod Caputo
tuletisega diferentsiaalvõrrandi
lahendamiseks
Bakalaureusetöö (9 EAP)
Juhendaja: prof Arvet Pedas
TARTU 2016
lahendamiseks
Bakalaureusetöö
Margus Lillemäe
Lühikokkuvõte. Bakalaureusetöös esitatakse numbriline meetod Caputo tuleti-
sega diferentsiaalvõrrandi lahendamiseks. Seega alguses tuuakse sisse mõningaid
murrulistetuletistegaseotudomadusi.Pealemeetodikirjeldustrakendatakse mee-
todit konkreetsete näidete korral. Lõpus esitatakse vastavad tabelid ja joonised
vaadeldud meetodilsaadud tulemuste kirjeldamiseks.
CERCS teaduseriala: P130 Funktsioonid, dierentsiaalvõrrandid
Märksõnad:Cauhyülesanded,funktsioonidelähendamine,kollokatsioonimeeto-
did, murdtuletised, splainid.
Numerial method for solving a dierential equation with
the Caputo derivative
Bahelor's thesis
Margus Lillemäe
Abstrat:Theobjetiveofthisbahelor'sthesisistopresentanumerialmethod
tosolveadierentialequationwhihhastheCaputoderivative.Atrstarebrought
some attributes of the frational derivative. After that the method is applied to
onrete examples. At the end are appropriate tables and guresto help desribe
the method's results.
CERCS researh speialisation: P130 Funtions, dierentialequations
Key words. Cauhy problems, approximation of funtions, olloation method,
frationalderivatives, splines.
Sissejuhatus . . . 4
1 Gammafunktsioon . . . 5
2 RiemannLiouville'i integraal ja murruline tuletis . . . 7
3 Caputo murruline tuletis . . . 12
4 Murrulise tuletisega diferentsiaalvõrrandi lahendamine . . . 16
5 Splain-kollokatsioonimeetodikirjeldus . . . 18
6 Cauhy ülesande lähislahendi leidmine . . . 22
7 Näiteid Caputo tuletisega Cauhy ülesande lahendamisest . . . . 28
Kirjandus . . . 31
Lisa . . . 32
Käesolev bakalaureusetöö käsitleb mõningaid murruliste tuletistega seotud oma-
dusi ning algtingimusega diferentsiaalvõrrandi ligikaudset lahendamist juhul, kui
võrrandisesinevotsitav funktsioononCaputo
α
-ndatjärku murrulinetuletis,kusα ∈ (0, 1)
. Kahe konkreetse näite korral saadud numbrilised tulemused näitavad meetodi abilsaadudlähislahendi küllaltsuurt täpsust.Bakalaureusetööesimesedkolmpeatükkionreferatiivsed,mispõhiliselttugine-
vadtöödele[2℄,[4℄ja[5℄.Peatükisnelitoodudülesandelahendamisegaseotudmee-
todikirjelduspärinebartiklist[6℄.Peatükis5esitatudsplain-kollokatsioonimeetodi
kirjelduselolialuseksmonograaa[1℄.Töönäideteosasolentoonud samadnäited,
mistöös [8℄, et oleksvõimalikvõrrelda erinevate meetodite abilsaadud tulemusi.
EsimesespeatükistoomesissematemaatiliseanalüüsikursustestEulerigamma-
ja beetafunktsiooni omadused.
Teises peatükis esitame Riemann-Liouville'i integraali ja Riemann-Liouville'i
tuletisedenitsioonidkoos mõningate omadustega.
Kolmandas peatükis deneerime Caputomurrulist järkutuletise.
Neljandas peatükis esitame Caputotuletisega diferentsiaalvõrrandija esitame
sellise ülesande numbrilise lahendamise skeemi.
Viiendas peatükis kirjeldame töös rakendatavat splain-kollokatsioonimeetodit.
KuuendaspeatükisarvutameväljalähislahendiCaputotuletisegadiferentsiaal-
võrrandile.
Viimases peatükis rakendame töös kirjeldatud meetodit konkreetsete näidete
korral.Lõpuks meesitamevastavadtabelidjajoonisedvaadeldudmeetodilsaadud
tulemuste kirjeldamiseks.
Selles peatükis esitame matemaatilise analüüsi kursusest tuntud Euleri gamma-
ja beetafunktsiooni omadusi. Neid läheb vaja käesoleva töö järgnevates osades.
Seejuures tugineme G.Kangro õpikutele[3℄ja [4℄.
Denitsioon 1.1. Parameetrist
α
sõltuvat päratutintegraaliΓ(α) :=
Z ∞ 0
e −t t α−1dt
nimetatakse gammafunktsiooniks.
Näitame, etpäratu integraal
Z ∞ 0
e −t t α−1dt
(1.1)
koondub,kui
α > 0
.Olgu
α > 0
. Kirjutameintegraali(1.1) kahe integraalisummana:Z ∞ 0
e −t t α−1dt = Z 1
0
e −t t α−1dt + Z ∞
1
e −t t α−1dt
. (1.2)
Võrduse (1.2) parema poole esimene liidetav on juhul
α < 1
punkti0
ümbrusestõkestamata. Kuna
e −1
t 1−α 6 e −t
t 1−α < 1
t 1−α , t ∈ (0, 1],
siismatemaatiliseanalüüsikursusesttuntudintegraalidevõrdluslausepõhjalinteg-
raal
Z 1 0
e −t t α−1dt
koondub.Uurime nüüd võrduse (1.2) parema pooleteist liidetavat
Z ∞ 1
e −t t α−1dt.
(1.3)
Paneme tähele, et
t→∞ lim e −t t α+1 = 0.
Seega leidubparameetrist
α
sõltuv konstantM
, etigat > 1
korral−t α+1
e −t t α−1 6 Mt −2 .
Sellest võrratusest järeldub integraalide võrdluslause põhjal, et päratu integraal
(1.3) koondub. Kunavõrduse (1.2) paremapoolemõlemadliidetavadkoonduvad,
siiskoondub ka vasak pool.
Järgmisena tuletame gammafunktsiooni taandamisvalemi. Olgu
α > 0
. Ositiintegreerides saame, et
Γ(α + 1) = Z ∞
0
e −t t αdt = −e −t t α
∞ 0 + α
Z ∞ 0
e −t t α−1dt = α Z ∞
0
e −t t α−1dt
.
Seega gammafunktsioonidenitsioonipõhjal
Γ(α + 1) = αΓ(α)
igaα > 0
korral. (1.4)Taandamisvalemitkorduvalt rakendades leiame,et kui
n ∈ N
jaα > n − 1
,siisΓ(α + 1) = α(α − 1) · · · (α − n + 1)Γ(α − n + 1).
Seega, pidadessilmas võrdust
Γ(1) = Z ∞
0
e −tdt = 1,
saame (võttes eelnevastaandamisvalemis
α = n
)Γ(n + 1) = n!
igan ∈ N 0 korral. (1.5)
Deneerime nüüd beetafunktsiooni.
Denitsioon 1.2. Parameetritest
a, b ∈ (0, ∞)
sõltuvatpäratutintegraaliB
(a, b) :=
Z 1 0
t a−1 (1 − t) b−1dt
nimetatakse beetafunktsiooniks.
Gammafunktsioonija beetafunktsioonivahel kehtibseos
B
(a, b) = Γ(a + b)
Γ(a)Γ(b) , a, b > 1,
(1.6)milletõestus onesitatud G.Kangro õpikus [4,247249℄.
tuletis
Caputo murrulise tuletisedeneerimiseks on vaja kõigepealt sisse tuua Riemann-
Liouville'i integraali ja tuletise, millele lisaks toome välja mõned kasulikud oma-
dused. Järgnev esitus tuginebtöödel[2℄, [5℄ja [7℄.
Olgu
D
operaator, mis seab lõigus[a, b]
(a, b ∈ R
,a < b
) diferentseeruvale funktsioonilef
vastavusse tema tuletisef ′:
(Df )(t) = f ′ (t), t ∈ [a, b].
(2.1)Olgu
J α operaator,misteisendablõigus[a, b]
integreeruvafunktsioonif
funktsioo-
niks
(J α f )
, mis onmääratud valemiga(J α f )(t) =
Z t a
f (τ)
dτ, t ∈ [a, b]
(2.2)Iga
n ∈ N
korralhakkame kasutamasümboleidD njaJ a ntähistamaksoperaatorite
D
jaJ a n
-kordset rakendamist:D 1 = D, J a 1 = J a ,
D n = DD n−1 , J a n = J a J a n−1 .
Deneerime
D 0 = I
jaJ a 0 = I
,kusI
on ühikoperaator,s.oI(f)(t) = f(t)
.Teoreem 2.1 (vt nt [3, lk 367℄). Olgu
f : [a, b] → R
pidev funktsioon ja olguF : [a, b] → R
, kusF (t) = Z t
a
f (τ)
dτ, t ∈ [a, b].
Siis funktsioon
F
on diferentseeruv, kusjuuresF ′ = f.
Olgu funktsioon
f
pidev lõigus[a, b]
. Siisteoreemi 2.1põhjalDJ a f = f,
seega iga
n ∈ N
korralD n J a n f = D n−1 DJ a J a n−1 f = D n−1 IJ a n−1 f = D n−1 J a n−1 f,
(2.3)millest matemaatiliseinduktsioonimeetodiabiljäreldub, et
n n
seega operaator
D n onoperaatoriJ a n vasakpoolne pöördoperaator.
Olgu
a, b ∈ R
,a < b
, ning olgun ∈ N
. Tähistamelõigus[a, b] n
korda pidevaltdiferentseeruvatefunktsioonide hulgasümboliga
C n [a, b]
.MekirjutameC 0 [a, b] :=
C[a, b]
.Lause 2.2. Olgu
m, n ∈ N
,m > n
, jaf ∈ C n [a, b]
. Siis(D n f )(t) = D m J a m−n f
(t), t ∈ [a, b].
Tõestus. Valemi(2.4) põhjaliga
t ∈ [a, b]
korralf (t) = D m−n J a m−n f
(t),
seega
(D n f) (t) = D n D m−n J a m−n f
(t) = D m J a m−n f (t).
Lause 2.3 (vt nt [7,lk 221-224℄). Olgu
f
lõigus[a, b]
integreeruv funktsioon. Siis igam ∈ N
korral kehtib valem(J a n f)(t) = 1 (n − 1)!
Z t a
(t − τ ) n−1 f (τ)
dτ, t ∈ [a, b].
Märkus 2.1. Eelmist valemit tuntakse Cauhyvalemi nime all.
Järgmine denitsioonionüks viis deneeridaüldistatumat integraali.
Denitsioon 2.1. Olgu
α > 0
. OperaatoritRL J a α
hulgalC[a, b]
, misondeneeri-tud võrdusega
( RL J a α f)(t) = 1 Γ(α)
Z t a
(t − τ) α−1 f (τ)
dτ, t ∈ [a, b],
nimetatakseRiemannLiouville'i
α
-järkuintegraaloperaatoriks.FunktsiooniRL J a α f
nimetatakse funktsiooni
f
Riemann-Liouville'iα
-järku integraaliks.Järgnevas deneerime
RL J a 0 = I, kus I
onühikoperaator.
Kui
α ∈ N
, siis seose (1.5) põhjalRL J a α = J a α
.Edaspidises tähistame sümboliga
⌈α⌉
vähimat täisarvu, mis on suurem võivõrdne arvuga
α ∈ R
.Lause 2.4 (vt nt [5, lk 37℄). Olgu
α, β > 0
jaf ∈ C[a, b]
. Siisα β α+β
Denitsioon 2.2. Olgu
α > 0
jam := ⌈α⌉
. Olgu funktsioonf ∈ C[a, b]
selline,et
RL J a m−α f ∈ C m [a, b]. SiisoperaatoritRL D a α
,mis ondeneeritud valemiga
( RL D a α f) (t) = D m RL J a m−a f
(t) (t ∈ [a, b])
nimetatakseRiemann-Liouville'i
α
-järkudiferentsiaaloperaatoriks.FunktsiooniRL D a α f
nimetatakse funktsiooni
f
Riemann-Liouville'iα
-järku tuletiseks.Järgnevas deneerime
RL D a 0 = I, kusI
on ühikoperaator.
Panemetähele, etkui
α ∈ N
, siism = ⌈α⌉ = α
ja( RL D a α f) (t) = D m RL J a m−α f
(t) = D m RL J a m−m f (t)
= D m RL J a 0 f
(t) = (D m If) (t)
= (D m f ) (t), t ∈ [a, b].
Teiste sõnadega,
α = m ∈ N
korral operaatorRL D a m
ühtib tavalisem
-järku dife-rentsiaaloperaatoriga
D m.
Lause 2.5. Olgu
α > 0
,a, b ∈ R , f ∈ C[a, b]
. Siis( RL D a α ( RL J a α f)) (t) = f (t), t ∈ [a, b].
Tõestus. Olgu
α > 0, m := ⌈α⌉, a, b ∈ R , f ∈ C[a, b]
. Siis denitsiooni 2.2 põhjal( RL D a α ( RL J a α f)) (t) = D m RL J a m−α ( RL J a α f )
(t), (t ∈ [a, b]).
Lause 2.4ja seose (2.4) abil
( RL D a α ( RL J a α f)) (t) = D m RL J a m−α ( RL J a α f ) (t)
= (D m RL J a m f ) (t)
= (If) (t) = f(t), t ∈ [a, b].
Lause 2.6. Olgu
α, β > 0
,a, b ∈ R
. Kuiψ ∈ C[a, b]
jaf = RL J a α+β ψ
, siisRL D a α RL D a β f
(t) = RL D α+β a f
(t), t ∈ [a, b].
(2.6)Tõestus. Kui
α = 0
võiβ = 0
, siisväide(2.6) kehtib. Olguα, β > 0
jam := ⌈α⌉
ning
n := ⌈β⌉
.Kuiψ ∈ C[a, b]
jaf = RL J a α+β ψ
,siis denitsiooni2.2põhjalRL D α a RL D a β f
(t) = RL D α a RL D β a RL J a α+β ψ (t)
= D m J m−α D n J n−β J α+β ψ
(t), t ∈ [a, b].
D m RL J a m−α D n RL J a n−β RL J a α+β ψ
(t) = D m RL J a m−α D n RL J a n+α ψ (t)
= D m RL J a m−α (D n RL J a RL n J a α ψ) (t)
= D m RL J a m−α (D n RL J a RL n J a α ψ) (t)
= D m RL J a m−α RL J a α ψ (t)
= (D m RL J a m ψ ) (t)
= (D m J a m ψ) (t)
= ψ(t), t ∈ [a, b].
Seega
RL D α a RL D β a f
(t) = ψ(t), t ∈ [a, b].
Kuna
f = RL J a α+β ,
siis
RL D a α+β f = ψ.
Järelikult
RL D a α RL D a β f
(t) = RL D α+β a f
(t), t ∈ [a, b].
Järgnevasnäitesnäemeühtpõhjust,etmiksonRiemann-Liouville'imurrulisele
tuletiselelisaksdeneeritudCaputomurrulinetuletis.Nimeltselgub,etRiemann-
Liouville'imurrulinetuletis konstandist eipruugi alatiolla
0
.Näide 2.1. Olgu
a, b ∈ R
,α > 0
jam := ⌈α⌉
. Olguf (t) = c
, kust ∈ [a, b]
jac ∈ R
. Leiame selleα
-ndat järku Riemann-Liouville'ituletise.Olgu algul
α = m ∈ N
. Siis Riemann-Liouville'iα
-ndat järku tuletise denit-sioonijärel tehtud tähelepaneku tõttu
( RL D α a f ) (t) = (D m f )(t) = 0, t ∈ [a, b].
Olgu nüüd
α 6∈ N
. Siisdenitsioonidest 2.1ja 2.2järeldub, et( RL D a α f ) (t) = D m RL J a m−α f (t)
= D m
1 Γ(m − α)
Z t a
(t − τ) m−α−1 c
dτ
= c
Γ(m − α)(m − α) D m (−(t − τ) m−α )
τ=t τ=a
!
= c
Γ(m − α)(m − α) D m [(t − a) m−α ], t ∈ [a, b].
D m [(t − a) m−α ] = (m − α)(m − α − 1) · · · (m − α − (m − 1))(t − a) m−α−m
= (m − α)(m − α − 1) · · · (1 − α)(t − a) −α , t ∈ [a, b],
siisvalemi (1.4)
(m − 1)
-kordse rakendamise teel saameΓ(m − α) = (m − α − 1)Γ(m − α − 1)
= . . . .
= (m − α − 1) · · · (1 − α)Γ(1 − α)
Seega saame,et
α 6∈ N
korral( RL D a α f ) (t) = c(t − a) −α
Γ(1 − α) , t ∈ [a, b],
misei olevõrdne nulliga kui
c 6= 0
.Selles peatükis toome sisse Caputo murrulisetuletise. Järgnev esitus tugineb põ-
hiliselt töödel [2℄ ja [5℄.
Olgu
α > 0
,m := ⌈α⌉
,a, b ∈ R
,f ∈ C m−1 [a, b]
. Tähistame(m − 1)
-järkuTaylori polünoomifunktsioonist
f
sümboligaT m−1 [f ; a]
:(T m−1 [f ; a]) (t) =
m−1
X
k=0
f (k) (a)
k! (t − a) k .
(3.1)Denitsioon3.1. Olgu
α > 0
,m := ⌈α⌉
,a, b ∈ R
.Olgufunktsioonf ∈ C m−1 [a, b]
selline, et
RL J a m−α (f − T m−1 [f; a])) ∈ C m [a, b]. Siis operaatoritC D a α
, mison de-
neeritud võrdusega
( C D a α f )(t) = ( RL D a α (f − T m−1 [f ; a])) (t) (t ∈ [a, b])
nimetatakse Caputo
α
-järku diferentsiaaloperaatoriks.FunktsiooniC D a α f nimeta-
takse funktsiooni
f
Caputoα
-järku tuletiseks.Järgnevas deneerime
C D 0 a = I, kus I
onühikoperaator.
Paneme tähele, et kui
α = m ∈ N
, siis operaatorC D a 0
ühtib tavalisem
-järkudiferentsiaaloperaatoriga
D m.Tõepoolest, selliseljuhul
( C D α a f ) (t) = ( RL D a α (f − T m−1 [f; a])) (t)
= ( RL D α a (f)(t) − ( RL D a α T m−1 [f ; a])) (t)
= (D m f) (t) − D m (T m−1 [f, a]) (t)
= (D m f) (t), t ∈ [a, b],
sest
m
-järkutuletis(m − 1)
-järkupolünoomist onnull.Panemekatähele, et
( C D a RL α J a α f )(t) = f (t)
(3.2)Tõepoolest, denitsiooni3.1 põhjalsaame
( C D a RL α J a α f)(t) = ( RL D a α ( RL J a α f − T m−1 [ RL J a α f; a])) (t)
= ( RL D a α ( RL J a α f)) (t)
− ( RL D a α (T m−1 [ RL J a α f ; a])) (t).
( RL D a α ( RL J a α f)) (t) = ( RL D a RL α J a α f) (t)
= (If ) (t)
= f(t).
Denitsiooni2.1põhjal
( RL J a α f ) (a) = 1 Γ(α)
Z a a
(a − τ ) α−1 f(τ )
dτ
= 1
Γ(α) 0
= 0.
Seega
(T m−1 [ RL J a α f ; a]) (t) = 0.
Näitest 2.1järeldub, et
( RL D a α (T m−1 [ RL J a α f ; a])) = 0.
Järgmist lauset kasutatakse kirjanduses tihti denitsioonina.
Lause 3.1. Olgu
α > 0
,m := ⌈α⌉
,a, b ∈ R
,f ∈ C m [a, b]
. Siis( C D α a f )(t) = RL J a m−α D m f
(t), t ∈ [a, b].
Tõestus. Olgualgul
α = m ∈ N
.SiiseelnevaarutelualuselCaputom
-järkudife-rentsiaaloperaatorühtibtavalise
m
-järkudiferentsiaaloperaatoriga.Lisakseelmise peatüki põhjalsaame, etI = RL J a 0 = RL J a m−α ,
kus
I
onühikoperaator.Seegakehtibväideerijuhulα = m ∈ N
.Olgunüüdα 6∈ N
. Siis( C D α a f )(t) = ( RL D α a (f − T m−1 [f; a])) (t)
= D m RL J a m−α (f − T m−1 [f; a]) (t)
= d m dt m
Z t a
(t − τ) m−α−1
Γ(m − α) (f (τ ) − T m−1 [f ; a](τ ))
dτ.
u = f (τ) − T m−1 [f ; a](τ),
du = D (f (τ) − T m−1 [f ; a](τ))
dτ,
d
v = (t − τ ) m−α−1
Γ(m − α)
dτ, v = − (t − τ ) m−α Γ(m − α + 1) ,
saame
Z t a
(t − τ) m−α−1
Γ(m − α) (f (τ) − T m−1 [f; a](τ ))
dτ
= − (t − τ ) m−α
Γ(m − α + 1) (f(τ ) − T m−1 [f; a](τ ))
τ=t
τ=a
+ 1
Γ(m − α + 1) Z t
a
(D(f(τ ) − T m−1 [f; a])(τ))(t − τ ) m−αdτ
= 1
Γ(m − α + 1) Z t
a
(D(f(τ ) − T m−1 [f ; a])(τ ))(t − τ) m−αdτ.
Seega
RL J a m−α (f − T m−1 [f ; a]) = RL J a m−α+1 D(f − T m−1 [f; a]).
Kui integreerida avaldist
RL J a m−α (f − T m−1 [f; a])ositim
korda, siis
( RL J a m−α (f − T m−1 [f; a]))(t) = ( RL J a 2m−α D m (f − T m−1 [f ; a]))(t)
= ( RL J a RL m J a m−α D m (f − T m−1 [f ; a]))(t)
= (J a RL m J a m−α D m f )(t), t ∈ [a, b].
Järelikult
( RL D a α (f − T m−1 [f ; a]))(t) = (D m RL J a m−α (f − T m−1 [f ; a]))(t)
= (D m J a RL m J a m−α D m f)(t)
= ( RL J a m−α D m f )(t), t ∈ [a, b].
Järgnev näidetoobväljaoluliseerinevuseCaputo
a
-ndatjärku murrulisetule-tise ja Riemann-Liouville'i
a
-järku murrulise tuletisevahel.Näide 3.1. Olgu
a, b ∈ R
,α > 0
jam := ⌈α⌉
. Olguf(t) = c
, kuit ∈ [a, b]
jac ∈ R
. Denitsiooni3.1ja lause 3.1põhal saame( C D α a f )(t) = ( RL J a m−α D m f )(t)
= 1
Γ(m − α) Z t
a
(t − τ ) m−α−1 c (m) dτ
= 1
Γ(m − α) Z t
a
(t − τ ) m−α−1 0
dτ
= 1
Γ(m − α) Z t
a
0
dτ = 0.
Teisitiõeldes,Caputo
a
-ndat järku tuletiskonstandist on null.lahendamine
Selles peatükis toodud materjalpärineb artiklist [6℄.
Olgu
α ∈ (0, 1)
. Soovime leida Caputo murrulise tuletisega lineaarse Cauhyülesande
(
C D 0 α y(t) + p(t)y(t) = q(t), t ∈ [0, b],
y(0) = y 0 ,
(4.1)lahendit
y = y(t)
lõigul[0, b]
. Järgnevas tähistamez = C D α 0 y
. Valemist (3.2)järeldub
y = RL J 0 α z + c, c ∈ R .
Denitsioonist2.1 saame
( RL J 0 α z) (t) = 1 Γ(α)
Z t 0
(t − s) α−1 z(s)
ds, t ∈ [0, b].
Kuna
y(0) = y 0,siis
y 0 = ( RL J 0 α z) (0) + c
= 0 + c
= c.
Seega
y = RL J 0 α z + y 0 .
(4.2)Asetame avaldise (4.2) diferentsiaalvõrrandisse
C D α 0 y + p(t)y = q:
C D α 0 RL J 0 α z + y 0
(t) + p(t) ( RL J 0 α z) (t) + y 0
= q(t).
Võrdusest (3.2)ja näite 3.1 tõttujäreldub siit,et
z(t) + p(t) Γ(α)
Z t 0
(t − s) α−1 z(s)
ds = q(t) − y 0 p(t),
ehk
z(t) +
Z t p(t)
Γ(α) (t − s) α−1 z(s)
ds = q(t) − y 0 p(t)
(4.3)K(t, s) = p(t)
Γ(α) (t − s) α−1 , g(t) = q(t) − y 0 p(t),
saame võrrandi (4.3) kirjutada kujul
z(t) + Z t
0
K(t, s)z(s)
ds = g(t), 0 6 t 6 b.
(4.4)Viimane onVolterra tüüpi integraalvõrrand, kusotsitavaks on
z
. Lahendades võr-rand (4.4) saame leida suuruse
z
võrduses (4.2). Ülesande (4.1) lahendiy
leidavõrduse (4.2) abil. Antud töös vaatleme ühte ligikaudset meetodit võrrandi (4.4)
lahendamiseks ning seejärel ülesande (4.1) lähislahendi leidmisekskujul (4.2).
Siin peatükis esitatud splain-kollokatsioonimeetodikirjeldusel on aluseks monog-
raaa [1℄.
VaatlemeVolterra integraalvõrranditkujul
z(x) + Z x
0
K(x, s)z(s)
ds = g(x), 0 6 x 6 b,
(5.1)kus
K
jag
onantudfunktsioonid.Jaotameigan ∈ N
korrallõigu[0, b] n
osalõigukssõlmpunktidega
0 = x (n) 0 < x (n) 1 < · · · < x (n) n = b.
Tähistagu
∆ n sõlmpunktide hulka,s.t
∆ n = n
x (n) 0 , x (n) 1 , . . . , x (n) n−1 , x (n) n o .
Hulka
∆ n nimetatakse lõigul[0, b]
antud võrguks.Võru onühtlane, kui
x (n) i = i · h, i = 0, 1, . . . , n, h = b
n .
Võrk
∆ n jagablõigu [0, b]
osahulkadeks
σ 0 = [x (n) 0 , x (n) 1 ], σ j = (x (n) j , x (n) j+1 ], j = 1, . . . , n − 1.
Valime
m
(m ∈ N
)kollokatsiooniparameetritη 1 , . . . , η m selliselt,et
0 6 η 1 < · · · < η m 6 1.
Seejärel deneerimekollokatsioonipunktid valemiga
x (n) jk = x (n) j + η k h j ,
(5.2)kus
h j = x (n) j+1 − x (n) j , j = 0, 1, . . . , n − 1, k = 1, . . . , m.
Võrrandi(5.1)lähislahendit
z n (x)
otsimepolünomiaalsetesplainide(tükiti(m−
1)
-järkupolünoomide) ruumistS m−1 (−1) (∆ n ) =
w : [0, b] → R , w(x)
∈ π m−1 , j = 0, 1, . . . , n − 1
,
kus
π m−1 on kõigi ülimalt (m − 1)
-järku polünoomide hulk. Paneme tähele, et
w ∈ S m−1 (−1) võib ollakatkev punktidesx (n) j , j = 1, . . . , n − 1
.
j = 1, . . . , n − 1
.Lähislahendi
z n (x)
leidmiseks asetame ta algvõrrandisse (5.1) otsitavaz(x)
asemele ning nõuame, et võrrand oleks rahuldatud kollokatsioonipunktides
x (n) jk,
j = 0, 1, . . . , n − 1
,k = 1, . . . , m
:
z n (x (n) jk ) + Z x (n) jk
0
K (x (n) jk , s)z n (s)
ds = g(x (n) jk ),
j = 0, 1, . . . , n − 1, k = 1, . . . , m.
(5.3)
Seosed (5.3) võime integraaliaditiivsusetõttu kirjutada kujul
z n (x (n) 0k ) + Z x (n) 0k
x (n) 0
K(x (n) 0k , s)z n (s)
ds = g(x (n) 0k ), k = 1, . . . , m;
(5.4)
z n (x (n) jk ) +
j−1
X
i=0
Z x (n) i+1 x (n) i
K (x (n) jk , s)z n (s)
ds + Z x (n) jk
x (n) j
K(x (n) jk , s)z n (s)
ds = g(x (n) jk ), j = 1, . . . , n − 1; k = 1, . . . , m.
(5.5)
Järgnevasannamevõrranditele(5.4)ja(5.5)teisekuju.Selleksteemeintegraalides
Z x (n) i+1 x (n) i
K(x (n) jk , s)z n (s)
ds
ja
Z x (n) jk x (n) j
K(x (n) jk , s)z n (s)
ds
vastavaltmuutujatevahetused
s = x (n) i + h i τ
jas = x (n) j + h j τ.
Siisesimeseljuhuld
s = h idτ
ja teisel juhul ds = h jdτ
ning seega
Z x (n) i+1
τ
ning seegaZ x (n) i+1
x (n) i
K(x (n) jk , s)z n (s)
ds = h i
Z 1 0
K (x (n) jk , x i + h i τ)z n (x (n) i + h i τ)
dτ
ja
Z x (n) jk
(n) K (x (n) jk , s)z n (s) ds = h j
Z η k
K (x (n) jk , x (n) j + h j τ )z n (x (n) j + h j τ)
dτ.
Toome nüüd sisse
(m − 1)
-järku Lagrange'i fundamentaalpolünoomidL k (τ )
, misvastavad kollokatsiooniparameetritele
0 6 η 1 < · · · < η m 6 1
:L k (τ ) =
m
Y
l=1, l6=k
τ − η l
η k − η l , τ ∈ [0, 1], k = 0, 1, . . . , m.
(5.6)Siis
z n (x (n) i + h i τ ) =
m
X
k=1
z n (x (n) i + η k h i )L k (τ ), x (n) i + h i τ ∈ σ i , i = 0, . . . , n − 1.
(5.7)
Tähistame
Z jk (n) = z n (x (n) jk ) = z n (x (n) j + h j η k ), j = 0, 1, . . . , n − 1, k = 1, . . . , m.
Siissaame seosed (5.4) ja (5.5) esitadakujul
Z 0k (n) + h 0 Z η k
0
(K(x (n) 0k , x (n) 0 + h 0 τ )
m
X
l=1
Z 0l (n) L l (τ))
dτ = g(x (n) 0k ),
Z jk (n) +
j−1
X
i=0
h i
Z 1 0
(K(x (n) jk , x (n) i + h i τ )
m
X
l=1
Z il (n) L l (τ))
dτ
+ h j Z η k
0
(K(x (n) jk , x (n) j + h j τ )
m
X
l=1
Z jl (n) L l (τ))
dτ = g(x (n) jk ),
kus
j = 1, . . . , n − 1
;k = 1, . . . , m
, millest saame lõpuks suurusteZ jk (n) (j = 0, . . . , n − 1, k = 1, . . . , m
) suhtes võrrandisüsteemi
Z 0k (n) + h 0 m
X
l=1
Z η k
0
(K(x (n) 0k , x (n) 0 + h 0 τ )L l (τ ))
dτ
Z 0l (n) = g(x (n) 0k ),
(5.8)Z jk (n) +
j−1
X
i=0
h i m
X
l=1
Z 1 0
(K(x (n) jk , x (n) i + h i τ )L l (τ ))
dτ
Z il (n)
+ h j m
X
l=1
Z η k
0
(K (x (n) jk , x (n) j + h j τ )L l (τ ))
dτ
Z jl (n) = g(x (n) jk ),
(5.9)
kus
j = 1, . . . , n − 1
;k = 1, . . . , m
.Võrrandisüsteemi (5.9) võime lahendada järgmiselt. Võttes
j = 0
, saame li-neaarvõrrandite süsteemi
Z 0k (n) (k = 1, . . . , m
) suhtes:
Z 0k (n) + h 0 m
X Z η k
(K(x (n) 0k , x (n) 0 + h 0 τ )L l (τ ))
dτ
Z 0l (n) = g(x (n) 0k ), k = 1, . . . , m.
Lahendades selle süsteemileiamesuurused
Z 01 (n) , . . . , Z 0m (n).Kasutades saadud suu-
rusi kirjutame lineaarvõrrandite süsteemi(5.9) välja
j = 1
korral:Z 1k (n) + h 1
m
X
l=1
Z η k
0
(K(x (n) 1k , x (n) 1 + h 1 τ )L l (τ ))
dτ
Z 1l (n)
= g(x (n) 1k ) − h 0 m
X
l=1
Z 1 0
(K(x (n) 1k , x (n) 0 + h 0 τ )L l (τ ))
dτ
Z 0l (n) , k = 1, . . . , m.
Lahendades selle süsteemi, leiame suurused
Z 11 (n) , . . . , Z 1m (n). Jätkates analoogiliselt
leiameZ 21 (n) , . . . , Z 2m (n) , . . . , Z n−1,1 (n) , . . . , Z n−1,m (m) .OllesleidnudkõiksuurusedZ jk (n)(j =
0, . . . , n− 1, k = 1, . . . , m
)saamevõrrandi(5.1)lähislahendiz n (x)
väärtusedkohal
x = x (n) i + h i τ
, kus τ ∈ [0, 1]
,leida valemi (5.7) abil.
Z jk (n)(j =
0, . . . , n− 1, k = 1, . . . , m
)saamevõrrandi(5.1)lähislahendiz n (x)
väärtusedkohal
x = x (n) i + h i τ
, kus τ ∈ [0, 1]
,leida valemi (5.7) abil.
Oletame, et olemeleidnud võrrandi
z(t) + Z t
0
K(t, s)z(s)
ds = g(t), 0 6 t 6 b.
lähislahendi
z n (t)
eelmisespeatükiskirjeldatudsplain-kollokatsioonimeetodikaudum = 2
korral, s.t kasutades kahte kollokatsiooniparameetritη 1 ja η 2, 0 6 η 1 <
0 6 η 1 <
η 2 6 1
.See tähendab, etmeilon leitudsuurusedZ jk (n) = z n (x jk )
,j = 0, . . . , n − 1
,k = 1, 2
.Leiame ülesande (4.1)lahendiley(t) = ( RL J 0 α z) (t) + y 0
lähislahendi kujul
y n (t) = ( RL J 0 α z n ) (t) + y 0 , t ∈ [0 b], 0 < α < 1.
Riemann-Liouville'i
α
-ndat järku integraalidenitsiooni alusel(vt (5.7))y n (t) = 1 Γ(α)
Z t 0
(t − τ ) α−1 z n (τ )
dτ + y 0 .
(6.1)Oletame, et
t ∈ σ i (i = 1, . . . , n − 1
). Siis
Z t
0
(t − τ ) α−1 z n (τ )
dτ =
i−1
X
j=0 2
X
k=1
Z jk (n) Z x j+1
x j
(t − τ) α−1 L k
τ − x j
h j
d
τ +
2
X
k=1
Z ik (n) Z t
x i
(t − τ ) α−1 L k
τ − x i h i
d
τ.
(6.2)
Kui
t ∈ σ 0, siis
Z t 0
(t − τ ) α−1 z n (τ )
dτ =
2
X
k=1
Z 0k (n) Z t
x 0
(t − τ) α−1 L k
τ − x 0
h 0
d
τ.
(6.3)täpselt väljaarvutada. Tõepoolest, esiteks leiame, et
Z x j+1
x j
(t − τ ) α−1 L 1
τ − x j h j
d
τ = Z x j+1
x j
(t − τ) α−1
τ−x j
h j − η 2
η 1 − η 2
d
τ
= 1
η 1 − η 2
1 h j
Z x j+1
x j
(t − τ) α−1 τ
dτ
− x j
h j
Z x j+1
x j
(t − τ ) α−1dτ
− η 2
Z x j+1
x j
(t − τ) α−1dτ
= 1
η 1 − η 2
1 h j
Z x j+1
x j
(t − τ) α−1 τ
dτ
− x j
h j
+ η 2
· Z x j+1
x j
(t − τ ) α−1dτ
(6.4)
Integraali
Z x j+1
x j
(t − τ ) α−1 τ
dτ
leiame ositiintegreerimiseabil. Olgu
u = τ,
du =
dτ,
d
v = (t − τ ) α−1dτ, v = − (t − τ) α
α ,
siis
Z x j+1
x j
(t − τ) α−1 τ
dτ = − τ (t − τ ) α α
x j+1
x j
− Z x j+1
x j
− (t − τ) α α
d
τ
= − x j+1 (t − x j+1 ) α
α + x j (t − x j ) α
α − (t − τ) α+1 α(α + 1)
x j+1
x j
= x j (t − x j ) α − x j+1 (t − x j+1 ) α
α + (t − x j ) α+1 − (t − x j+1 ) α+1
α(α + 1) .
Integraali
R x j+1
x j (t − τ) α−1
dτ
puhulZ x j+1
x j
(t − τ ) α−1dτ = − (t − τ) α α
x j+1
x j
= (t − x j ) α − (t − x j+1 ) α
.
Z x j+1
x j
(t − τ) α−1 L 1
τ − x j h j
d
τ = 1 η 1 − η 2
1 h j
x j (t − x j ) α − x j+1 (t − x j+1 ) α α
+ (t − x j ) α+1 − (t − x j+1 ) α+1 α(α + 1)
− x j
h j
+ η 2
· (t − x j ) α − (t − x j+1 ) α α
! .
(6.5)
Teiseks saame,et
Z x j+1
x j
(t − τ) α−1 L 2
τ − x j
h j
d
τ = Z x j+1
x j
(t − τ) α−1
τ−x j
h j − η 1
η 2 − η 1 dτ
= 1
η 2 − η 1
1 h j
Z x j+1
x j
(t − τ ) α−1 τ
dτ
− x j h j
Z x j+1
x j
(t − τ) α−1dτ − η 1 Z x j+1
x j
(t − τ ) α−1dτ
= 1
η 2 − η 1 1
h j
Z x j+1
x j
(t − τ ) α−1 τ
dτ
− x j
h j
+ η 1
Z x j+1
x j
(t − τ) α−1dτ
.
(6.6)
Analoogiliseltleiame
Z x j+1
x j
(t − τ) α−1 L 2
τ − x j
h j
d
τ = 1 η 2 − η 1
1 h j
x j (t − x j ) α − x j+1 (t − x j+1 ) α α
+ (t − x j ) α+1 − (t − x j+1 ) α+1 α(α + 1)
− x j
h j
+ η 1
· (t − x j ) α − (t − x j+1 ) α α
! .
(6.7)
Z t x i
(t − τ) α−1 L 1
τ − x i
h i
d
τ = Z t
x i
(t − τ ) α−1
τ−x i
h i − η 2
η 1 − η 2
d
τ
= 1
η 1 − η 2
1 h i
Z t x i
(t − τ ) α−1 τ
dτ
− x i
h i
Z t x i
(t − τ) α−1dτ − η 2
Z t i
(t − τ) α−1dτ
= 1
η 1 − η 2
1 h i
Z t x i
(t − τ ) α−1 τ
dτ
− x i
h i
+ η 2
· Z t
i
(t − τ ) α−1dτ
.
(6.8)
Integraali
Z t x i
(t − τ) α−1 τ
dτ
leiame ositiintegreerimiseabil võttes
u = τ,
du =
dτ,
d
v = (t − τ ) α−1dτ, v = − (t − τ) α
α .
Siis
Z t x i
(t − τ) α−1 τ
dτ = − τ(t − τ) α α
t x i
− Z t
x i
− (t − τ) α α
d
τ
= x i (t − x i ) α
α − (t − τ ) α+1 α(α + 1)
t
x i
= x i (t − x i ) α
α + (t − x i ) α+1 α(α + 1) .
Integraali
R t
x i (t − τ ) α−1
dτ
korral kehtibZ t
x i
(t − τ) α−1dτ = − (t − τ ) α α
t x i
= (t − x i ) α
α .
Z t x i
(t − τ ) α−1 L 1
τ − x i h i
d
τ = 1 η 1 − η 2
1 h i
x i (t − x i ) α
α + (t − x i ) α+1 α(α + 1)
− x i
h i
+ η 2
· (t − x i ) α α
!
(6.9)Neljandaks leiame, et
Z t x i
(t − τ) α−1 L 2
τ − x i
h i
d
τ = Z t
x i
(t − τ ) α−1
τ−x i
h i − η 1
η 2 − η 1
d
τ
= 1
η 2 − η 1
1 h i
Z t x i
(t − τ ) α−1 τ
dτ
− x i
h i
Z t x i
(t − τ) α−1dτ − η 1
Z t i
(t − τ) α−1dτ
= 1
η 2 − η 1 1
h i Z t
x i
(t − τ ) α−1 τ
dτ
− x i
h i
+ η 1
Z t i
(t − τ ) α−1dτ
(6.10)
Analoogiliseltintegraali (6.8) arvutuskäigule saame
Z t x i
(t − τ) α−1 L 2
τ − x i h i
d
τ = 1 η 2 − η 1
1 h i
x i (t − x i ) α
α + (t − x i ) α+1 α(α + 1)
− x i
h i + η 1
· (t − x i ) α α
! .
(6.11)
y n (t) = 1
(η 1 − η 2 )Γ(α + 1)
" i−1 X
j=0
Z j1 (n)
x j (t − x j ) α − x j+1 (t − x j+1 ) α h j
+ (t − x j ) α+1 − (t − x j+1 ) α+1 (α + 1)h j
− x j
h j
+ η 2
· (t − x j ) α − (t − x j+1 ) α
− Z j2 (n)
x j (t − x j ) α − x j+1 (t − x j+1 ) α h j
+ (t − x j ) α+1 − (t − x j+1 ) α+1 (α + 1)h j
− x j
h j
+ η 1
· (t − x j ) α − (t − x j+1 ) α !
+ Z i1 (n)
x i (t − x i ) α
h j + (t − x i ) α+1 (α + 1)h j −
x j
h j + η 2
· (t − x i ) α
− Z i2 (n)
x i (t − x i ) α h j
+ (t − x i ) α+1 (α + 1)h j
− x j
h j
+ η 1
· (t − x i ) α ) #
+ y 0 ,
(6.12)
mille abil saame arvutada ülesande (4.1) lähislahendi
y n (t)
väärtuseidt ∈ [0, b]
korral,kus
t ∈ σ i,i = 1, . . . , n − 1
.Kui i = 0
,s.tkui t ∈ σ 0,siisseoste (6.1),(6.3),
(6.8)-(6.11) aluseljõuame lõpuks valemini
y n (t) = 1
(η 1 − η 2 )Γ(α + 1)
"
Z 01 (n)
x 0 (t − x 0 ) α h 0
+ (t − x 0 ) α+1 (α + 1)h 0
− x 0
h 0
+ η 2
· (t − x 0 ) α
− Z 02 (n)
x 0 (t − x 0 ) α h 0
+ (t − x 0 ) α+1 (α + 1)h 0
− x 0
h 0
+ η 1
· (t − x 0 ) α #
+ y 0 .
(6.13)
lahendamisest
Selles peatükis lahendame kaks konkreeset Cauhy ülesannet peatükkides 4-6kir-
jeldatud meetodil. Täpsemalt on näidetes arvutatud vaadeldava ülesande lähisla-
hendi
y n mitmesuguste n
väärtuste korral, y n erinevust täpsest lahendist y
(viga
y n −y
)ningvigadesuhteid (misiseloomustavadvaadeldavameetodikoonduvuskii-
rust). Lisaks vastavates tabelites toodud tulemustele on tulemusi iseloomustatud
y
(vigay n −y
)ningvigadesuhteid (misiseloomustavadvaadeldavameetodikoonduvuskii- rust). Lisaks vastavates tabelites toodud tulemustele on tulemusi iseloomustatudkaarvuti pooltjoonestatud graakuteabil.Ülesannete lahendamiselonkasutatud
autori pooltSilabi keskkonnas kirjutatud programme, misonantud lisas.
Näide 7.1. VaatlemeCauhy ülesannet
C D 0.5 0 y(t) + y(t) = t 2 + 2
Γ( 5 2 ) t 3 2 , t ∈ [0, 10], y(0) = 0,
milletäpne lahendon (vt[5℄)
y(t) = t 2 , t ∈ [0, 10].
Olgu aluseks ühtlane võrk
∆ n = {x (n) 0 , . . . , x n n }
, kusx (n) i = i · h, i = 0, 1, . . . , n, h = 10 n .
Rakendame meetoditkuisõlmpunktide arv on
n = 2, 4, 8, 16, 32, 64, 128
,ja ksee-rime kollokatsiooniparameetrid
η 1 ja η 2 järgmiselt:
η 1 = 1
3 , η 2 = 2 3 .
Võrgupunktide
x (n) i (i = 0, . . . , n
)kaududeneerimepunktidX ij (n),i = 0, . . . , n−1
;
j = 0, . . . , 10
,järgmiselt:
i = 0, . . . , n−1
;j = 0, . . . , 10
,järgmiselt:X ij (n) = x (n) i + j · (x (n) i+1 − x (n) i )
10 , i = 0, . . . , n − 1, j = 0, . . . , 10.
Vea
max t∈[0,10] |y n (t) − y(t)|
lähenditǫ n arvutamejärgmiselt:
ǫ n = max
i=0,...,n−1 max
j=0,...,10 |y(X ij (n) ) − y n (X ij (n) )|, i = 0, . . . , n − 1.
S n = ǫ n
ǫ 2n
.
Järgmine tabel iseloomustab vigaerinevate
n
korral.n
ǫ n S n
2 1.9763234 4,152
4 0.4759944 4,111
8 0.1157813 4,064
16 0.0284894 4,022
32 0.0070826 3,993
64 0.0017736 3,978
128 0.0004459
Tabelilnäeme,etmeetodonsuhteliseltkiirekoondumisegaantud näitekorral.
Järgmisena toodud graakud
n = 4, 32, 128
korral lõigus[0, 1]
kinnitavadmeetodikoonduvust.
0 0.1 0.2 0.3 0.4 0.5 0.6 0.7 0.8 0.9 1
0 1
0.2 0.4 0.6 0.8
0.1 0.3 0.5 0.7 0.9
n = 4
0 0.1 0.2 0.3 0.4 0.5 0.6 0.7 0.8 0.9 1
0 1
0.2 0.4 0.6 0.8
0.1 0.3 0.5 0.7 0.9
n = 32
0 0.1 0.2 0.3 0.4 0.5 0.6 0.7 0.8 0.9 1 0
1
0.2 0.4 0.6 0.8
0.1 0.3 0.5 0.7 0.9
n = 128
Järgmine näide, millele merakendamemeetodit, pärineb K.Väljako bakalau-
reusetööst[8℄.
Näide 7.2. VaatlemeCauhy ülesannet
C D 2/3 0 y(t) + t 1/4 y(t) = t + 5t 1/4 + Γ(7/4)
Γ(13/12) t 1/12 , t ∈ [0, 10], y(0) = 5,
milletäpne lahendon (vt[8℄)
y(t) = t 3/4 + 5, t ∈ [0, 10].
Olgu,nagu eelmisesnäites, ühtlanevõrk
∆ n.Rakendame meetoditkuisõlmpunk-
tide arv on
n = 2, 4, 8, 16, 32, 64, 128
,ja kseerime kollokatsioonipunktidη 1 ja η 2
järgmiselt:
η 1 = 1
3 , η 2 = 2 3 .
Võrgupunktide
x (n) i (i = 0, . . . , n
)kaududeneerimepunktidX ij (n),i = 0, . . . , n−1
;
j = 0, . . . , 10
,analoogiliselteelmiselenäitele, järgmiselt:
i = 0, . . . , n−1
;j = 0, . . . , 10
,analoogiliselteelmiselenäitele, järgmiselt:X ij (n) = x (n) i + j · (x (n) i+1 − x (n) i )
10 , i = 0, . . . , n − 1, j = 0, . . . , 10.
Samuti analoogiliselt eelmisele näitele arvutame
max t∈[0,10] |y n (t) − y(t)|
lähenditǫ n järgmiselt:
ǫ n = max max |y(X ij (n) ) − y n (X ij (n) )|, i = 0, . . . , n − 1.
S n = ǫ n
ǫ 2n
.
Järgminetabel iseloomustabviga erinevate
n
korral.n
ǫ n S n
2 0.0473157 1,499
4 0.0315556 1,520
8 0.0207599 1,565
16 0.0132678 1,609
32 0.0082480 1,640
64 0.0050299 1,659
128 0.0030324
Eelmise näitegavõrreldes näeme, et meetod on antud näites aeglasema koon-
duvusega. Järgmisena esitame arvuti joonestatud graakud
n = 4, 32, 128
korrallõigus
[0, 0.5]
.0 0.05 0.1 0.15 0.2 0.25 0.3 0.35 0.4 0.45 0.5
5 5.2 5.4
5.1 5.3 5.5
5.05 5.15 5.25 5.35 5.45
n = 4
0 0.05 0.1 0.15 0.2 0.25 0.3 0.35 0.4 0.45 0.5
5 5.2 5.4
5.1 5.3 5.5
5.05 5.15 5.25 5.35 5.45
n = 32
0 0.05 0.1 0.15 0.2 0.25 0.3 0.35 0.4 0.45 0.5 5
5.2 5.4
5.1 5.3 5.5
5.05 5.15 5.25 5.35 5.45
n = 128
Graakud kinnitavadmeetodi koonduvust.
Peatükis vaadatud näidete alusel saame järeldada,et töös kirjeldatud meetod
koondub.
[1℄ H. Brunner, P. J. vander Houwen, The Numerial Solution of Volterra Equa-
tions, North-Holland, Amsterdamn, 1986.
[2℄ K. Diethelm, The Analysis of Frational Dierential Equations: An
Appliation-Oriented Exposition Using Dierential Operators of Caputo Type,
Springer, London, 2010.
[3℄ G. Kangro, Matemaatiline analüüs I. Teine, parandatud ja täiendatud trükk,
Valgus, Tallinn, 1982.
[4℄ G. Kangro,Matemaatiline Analüüs II osa, Valgus,Tallinn,1968.
[5℄ A. M. Laanemaa, Laplae'i teisenduse kasutamine diferentsiaalvõrrandite la-
hendamisel, Tartu, 2015.
[6℄ A.Pedas,E.Tamme,Splineolloationmethodsforlinearmulti-termfrational
dierentialequations,JournalofComputationalandAppliedMathematis,vol.
236, no. 2,pp. 167176, 2011.
[7℄ A. Pedas, G.Vainikko,Harilikud diferentsiaalvõrrandid: teooria, näiteid, üles-
andeid, Tartu Ülikool,Tartu, 2011.
[8℄ K.Väljako,Murrulisedtuletised jaCaputotuletisega lineaarsediferentsiaalvõr-
randi lahendamine, Tartu Ülikool,Tartu, ilmumas2016.
Peatükis 7näidete lahendamiselkasutatud Silabi programm:
l //kustutab konsoolis oleva
lear //kustutab eelmised andmed
format(10); //mitu komakohta
//
−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−
//Parameetrid
//
−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−
//Lõik[0,b℄
b=10; //[0,b℄
// Alfa
−
ndat järku Caputo tuletisa=0.5; //alfa
//sõlmede arv
n=16;
//Kollokatsiooniparameetrid muutmiseks
Eta=zeros(1,2);
Eta(1)=1/3;
Eta(2)=2/3;
//
−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−
//Näited
//
−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−
//näide 1
//
//algtingimused y(x0) =y0
x0=0;
y0=0;
a=1/2; //mis järku Caputo tuletis
funtion f=vaba(x)
f=x^2+( 2.*( x.^(3/2) ) )/gamma(5/2);
endfuntion
p=1;
endfuntion
//lahend
funtion y= lahend(x)
y=x.^2;
endfuntion
//näide 2
////algtingimused y(x0) =y0
//x0=0;
//y0=5;
//a=2/3; //mis järku Caputo tuletis
//
//funtion f=vaba(x)
// f=x ...
// +5*(x^(1/4))+(gamma((7/4))*(x^(1/12)))/gamma((13/12));
//endfuntion
//
//funtion p=kordaja(x)
// p=x^(1/4);
//endfuntion
//
////lahend
//funtion y= lahend(x)
// y=x.^(3/4)+5;
//endfuntion
//
−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−
//Edasi tuleb splain
−
kollokatsioonimeetod//
−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−
//teoreetiliste arutluste käigus saadud
funtion g=vabauld(x,a)
g=vaba(x)
−
kordaja(x)*y0;endfuntion
K= (kordaja(x)*(x
−
s)^(a−
1))/(gamma(a));endfuntion
//defineerime võrgu
//Võrgu punktide maatriks
vX=zeros(1,n+1);
r=1 //r> = 1, r=1 annab ühtlase võrgu
//A n n a n ette võrgu
for i=0:n
vX(i+1)= b*((i/n)^r);
end
//lõikude pikkused:
pikkused=zeros(1,n);
for i=0:1:(n
−
1)pikkused(i+1)=vX(i+2)
−
vX(i+1);end
//kollokatsiooniparameetrite kasutamine
X=zeros(2,n); //punktide x_ij maatriks
//määran ära võrgu x_ij
for i=1:2
for j=1:n
X(i ,j) =vX(j) +Eta(i)*pikkused(j );
end
end
funtion f=Lagrange1(x)
f= ( x
−
Eta(2) )/( Eta(1)−
Eta(2) )endfuntion
funtion f=Lagrange2(x)
f= ( x
−
Eta(1) )/( Eta(2)−
Eta(1) )endfuntion
//arvutame natuke teistmoodi varasemast (nagu töös)
A=zeros(2,2);
=zeros(2*n,1);
//maatriks A
A(1,1)=pikkused(1)*integrate('t u u m( X(1 ,1) ,...
vX(1)+pikkused(1)*s)*Lagrange1(s)','s' , 0 , Eta(1) );
A(1,2)=pikkused(1)*integrate('t u u m( X(1 ,1) ,...
vX(1)+pikkused(1)*s)*Lagrange2(s)','s' , 0 , Eta(1) );
A(2,1)=pikkused(1)*integrate('t u u m( X(2 ,1) ,...
vX(1)+pikkused(1)*s)*Lagrange1(s)','s' , 0 , Eta(2) );
A(2,2)=pikkused(1)*integrate('t u u m( X(2 ,1) ,...
vX(1)+pikkused(1)*s)*Lagrange2(s)','s' , 0 , Eta(2) );
A=A+ eye(2,2);
//maatriks B
B (1)=vabauld( X(1,1) );
B (2)=vabauld( X(2,1) );
//maatriks C
C=linsolve(A,
−
B);//täidame
(1)=C(1);
(2)=C(2);
//algul lähme ridapidi , siis veerupidi
for r=2:n; //veeru nr on 2v
−
1A=zeros (2 ,2);
B=zeros (2 ,1);
for v=1:n //rea nr on 2r
−
1if v< r then
B (1)=B(1)
−
...pikkused(v)*integrate('t u u m( X(1,r ) ,...
vX(v) +pikkused(v)*s)*Lagrange1(s)','s ' ,...
0 , 1 )*(2*v
−
1);B (1)=B(1)
−
...pikkused(v)*integrate('t u u m( X(1,r ) ,...
vX(v) +pikkused(v)*s)*Lagrange2(s)','s ' ,...
0 , 1 )*(2*v);
B (2)=B(2)
−
...pikkused(v)*integrate('t u u m( X(2,r ) ,...
vX(v) +pikkused(v)*s)*Lagrange1(s)','s ' ,...
0 , 1 )*(2*v
−
1);B (2)=B(2)