• Keine Ergebnisse gefunden

TARTU  aeaaika ja aiika ii  aeaaika eia

N/A
N/A
Protected

Academic year: 2022

Aktie "TARTU  aeaaika ja aiika ii  aeaaika eia"

Copied!
42
0
0

Wird geladen.... (Jetzt Volltext ansehen)

Volltext

(1)

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

(2)

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.

(3)

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

(4)

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.

(5)

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 α−1

d

t

nimetatakse gammafunktsiooniks.

Näitame, etpäratu integraal

Z ∞ 0

e −t t α−1

d

t

(1.1)

koondub,kui

α > 0

.

Olgu

α > 0

. Kirjutameintegraali(1.1) kahe integraalisummana:

Z ∞ 0

e −t t α−1

d

t = Z 1

0

e −t t α−1

d

t + Z ∞

1

e −t t α−1

d

t

. (1.2)

Võrduse (1.2) parema poole esimene liidetav on juhul

α < 1

punkti

0

ümbruses

tõ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 α−1

d

t

koondub.Uurime nüüd võrduse (1.2) parema pooleteist liidetavat

Z ∞ 1

e −t t α−1

d

t.

(1.3)

Paneme tähele, et

t→∞ lim e −t t α+1 = 0.

Seega leidubparameetrist

α

sõltuv konstant

M

, etiga

t > 1

korral

−t α+1

(6)

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

. Ositi

integreerides saame, et

Γ(α + 1) = Z ∞

0

e −t t α

d

t = −e −t t α

∞ 0 + α

Z ∞ 0

e −t t α−1

d

t = α Z ∞

0

e −t t α−1

d

t

.

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 −t

d

t = 1,

saame (võttes eelnevastaandamisvalemis

α = n

)

Γ(n + 1) = n!

iga

n ∈ N 0

korral. (1.5)

Deneerime nüüd beetafunktsiooni.

Denitsioon 1.2. Parameetritest

a, b ∈ (0, ∞)

sõltuvatpäratutintegraali

B

(a, b) :=

Z 1 0

t a−1 (1 − t) b−1

d

t

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℄.

(7)

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 funktsioonile

f

vastavusse tema tuletise

f

:

(Df )(t) = f (t), t ∈ [a, b].

(2.1)

Olgu

J α

operaator,misteisendablõigus

[a, b]

integreeruvafunktsiooni

f

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ümboleid

D n

ja

J a n

tähistamaksoperaatorite

D

ja

J 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

ja

J a 0 = I

,kus

I

on ühikoperaator,s.o

I(f)(t) = f(t)

.

Teoreem 2.1 (vt nt [3, lk 367℄). Olgu

f : [a, b] → R

pidev funktsioon ja olgu

F : [a, b] → R

, kus

F (t) = Z t

a

f (τ)

d

τ, t ∈ [a, b].

Siis funktsioon

F

on diferentseeruv, kusjuures

F = f.

Olgu funktsioon

f

pidev lõigus

[a, b]

. Siisteoreemi 2.1põhjal

DJ a f = f,

seega iga

n ∈ N

korral

D 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

(8)

seega operaator

D n

onoperaatori

J a n

vasakpoolne pöördoperaator.

Olgu

a, b ∈ R

,

a < b

, ning olgu

n ∈ N

. Tähistamelõigus

[a, b] n

korda pidevalt

diferentseeruvatefunktsioonide hulgasümboliga

C n [a, b]

.Mekirjutame

C 0 [a, b] :=

C[a, b]

.

Lause 2.2. Olgu

m, n ∈ N

,

m > n

, ja

f ∈ 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]

korral

f (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 iga

m ∈ 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

. Operaatorit

RL J a α

hulgal

C[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.Funktsiooni

RL 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õhjal

RL J a α = J a α

.

Edaspidises tähistame sümboliga

⌈α⌉

vähimat täisarvu, mis on suurem või

võrdne arvuga

α ∈ R

.

Lause 2.4 (vt nt [5, lk 37℄). Olgu

α, β > 0

ja

f ∈ C[a, b]

. Siis

α β α+β

(9)

Denitsioon 2.2. Olgu

α > 0

ja

m := ⌈α⌉

. Olgu funktsioon

f ∈ C[a, b]

selline,

et

RL J a m−α f ∈ C m [a, b]

. Siisoperaatorit

RL 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.Funktsiooni

RL D a α f

nimetatakse funktsiooni

f

Riemann-Liouville'i

α

-järku tuletiseks.

Järgnevas deneerime

RL D a 0 = I

, kus

I

on ühikoperaator.

Panemetähele, etkui

α ∈ N

, siis

m = ⌈α⌉ = α

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 operaator

RL D a m

ühtib tavalise

m

-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]

ja

f = RL J a α+β ψ

, siis

RL 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

ja

m := ⌈α⌉

ning

n := ⌈β⌉

.Kui

ψ ∈ C[a, b]

ja

f = RL J a α+β ψ

,siis denitsiooni2.2põhjal

RL 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].

(10)

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

ja

m := ⌈α⌉

. Olgu

f (t) = c

, kus

t ∈ [a, b]

ja

c ∈ 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].

(11)

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

.

(12)

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ärku

Taylori polünoomifunktsioonist

f

sümboliga

T 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

.Olgufunktsioon

f ∈ C m−1 [a, b]

selline, et

RL J a m−α (f − T m−1 [f; a])) ∈ C m [a, b]

. Siis operaatorit

C 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.Funktsiooni

C 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 operaator

C D a 0

ühtib tavalise

m

-järku

diferentsiaaloperaatoriga

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).

(13)

( 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

.SiiseelnevaarutelualuselCaputo

m

-järkudife-

rentsiaaloperaatorühtibtavalise

m

-järkudiferentsiaaloperaatoriga.Lisakseelmise peatüki põhjalsaame, et

I = 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

τ.

(14)

u = f (τ) − T m−1 [f ; a](τ),

d

u = 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])

ositi

m

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.

(15)

Näide 3.1. Olgu

a, b ∈ R

,

α > 0

ja

m := ⌈α⌉

. Olgu

f(t) = c

, kui

t ∈ [a, b]

ja

c ∈ 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)

= 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.

(16)

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ähistame

z = 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)

d

s, 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)

d

s = q(t) − y 0 p(t),

ehk

z(t) +

Z t p(t)

Γ(α) (t − s) α−1 z(s)

d

s = q(t) − y 0 p(t)

(4.3)

(17)

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)

d

s = 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) lahendi

y

leida

võ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).

(18)

Siin peatükis esitatud splain-kollokatsioonimeetodikirjeldusel on aluseks monog-

raaa [1℄.

VaatlemeVolterra integraalvõrranditkujul

z(x) + Z x

0

K(x, s)z(s)

d

s = g(x), 0 6 x 6 b,

(5.1)

kus

K

ja

g

onantudfunktsioonid.Jaotameiga

n ∈ N

korrallõigu

[0, b] n

osalõiguks

sõ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) ruumist

S m−1 (−1) (∆ n ) =

w : [0, b] → R , w(x)

∈ π m−1 , j = 0, 1, . . . , n − 1

,

(19)

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 punktides

x (n) j

,

j = 1, . . . , n − 1

.

Lähislahendi

z n (x)

leidmiseks asetame ta algvõrrandisse (5.1) otsitava

z(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)

d

s = 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)

d

s = 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)

d

s + Z x (n) jk

x (n) j

K(x (n) jk , s)z n (s)

d

s = 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)

d

s

ja

Z x (n) jk x (n) j

K(x (n) jk , s)z n (s)

d

s

vastavaltmuutujatevahetused

s = x (n) i + h i τ

ja

s = x (n) j + h j τ.

Siisesimeseljuhul

d

s = h i

d

τ

ja teisel juhul d

s = h j

d

τ

ning seega

Z x (n) i+1

x (n) i

K(x (n) jk , s)z n (s)

d

s = 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)

d

s = h j

Z η k

K (x (n) jk , x (n) j + h j τ )z n (x (n) j + h j τ)

d

τ.

(20)

Toome nüüd sisse

(m − 1)

-järku Lagrange'i fundamentaalpolünoomid

L k (τ )

, mis

vastavad 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 suuruste

Z 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.

(21)

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 leiame

Z 21 (n) , . . . , Z 2m (n) , . . . , Z n−1,1 (n) , . . . , Z n−1,m (m)

.Ollesleidnudkõiksuurused

Z jk (n)

(

j =

0, . . . , n− 1, k = 1, . . . , m

)saamevõrrandi(5.1)lähislahendi

z n (x)

väärtusedkohal

x = x (n) i + h i τ

, kus

τ ∈ [0, 1]

,leida valemi (5.7) abil.

(22)

Oletame, et olemeleidnud võrrandi

z(t) + Z t

0

K(t, s)z(s)

d

s = g(t), 0 6 t 6 b.

lähislahendi

z n (t)

eelmisespeatükiskirjeldatudsplain-kollokatsioonimeetodikaudu

m = 2

korral, s.t kasutades kahte kollokatsiooniparameetrit

η 1

ja

η 2

,

0 6 η 1 <

η 2 6 1

.See tähendab, etmeilon leitudsuurused

Z jk (n) = z n (x jk )

,

j = 0, . . . , n − 1

,

k = 1, 2

.Leiame ülesande (4.1)lahendile

y(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)

(23)

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 − τ ) α−1

d

τ

− η 2

Z x j+1

x j

(t − τ) α−1

d

τ

= 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 − τ ) α−1

d

τ

(6.4)

Integraali

Z x j+1

x j

(t − τ ) α−1 τ

d

τ

leiame ositiintegreerimiseabil. Olgu

u = τ,

d

u =

d

τ,

d

v = (t − τ ) α−1

d

τ, 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

τ

puhul

Z x j+1

x j

(t − τ ) α−1

d

τ = − (t − τ) α α

x j+1

x j

= (t − x j ) α − (t − x j+1 ) α

.

(24)

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 − τ) α−1

d

τ − η 1 Z x j+1

x j

(t − τ ) α−1

d

τ

= 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 − τ) α−1

d

τ

.

(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)

(25)

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 − τ) α−1

d

τ − η 2

Z t i

(t − τ) α−1

d

τ

= 1

η 1 − η 2

1 h i

Z t x i

(t − τ ) α−1 τ

d

τ

− x i

h i

+ η 2

· Z t

i

(t − τ ) α−1

d

τ

.

(6.8)

Integraali

Z t x i

(t − τ) α−1 τ

d

τ

leiame ositiintegreerimiseabil võttes

u = τ,

d

u =

d

τ,

d

v = (t − τ ) α−1

d

τ, 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 kehtib

Z t

x i

(t − τ) α−1

d

τ = − (t − τ ) α α

t x i

= (t − x i ) α

α .

(26)

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 − τ) α−1

d

τ − η 1

Z t i

(t − τ) α−1

d

τ

= 1

η 2 − η 1 1

h i Z t

x i

(t − τ ) α−1 τ

d

τ

− x i

h i

+ η 1

Z t i

(t − τ ) α−1

d

τ

(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)

(27)

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äärtuseid

t ∈ [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)

(28)

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

kaarvuti 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 }

, kus

x (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

)kaududeneerimepunktid

X ij (n)

,

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.

(29)

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]

kinnitavadmeetodi

koonduvust.

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

(30)

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

)kaududeneerimepunktid

X ij (n)

,

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.

(31)

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

korral

lõ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

(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.

(33)

[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.

(34)

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 tuletis

a=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

(35)

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

(36)

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);

(37)

=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

1

A=zeros (2 ,2);

B=zeros (2 ,1);

for v=1:n //rea nr on 2r

1

if 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)

...

Referenzen

ÄHNLICHE DOKUMENTE

In einer ganzen Klasse oder einer Fördergruppe könnte ein Wettbewerb veranstaltet werden, indem jedes Kind dasselbe Spielfeld und dieselbe Buchstabenanweisung erhält; Gewinner ist,

Sofern noh niht vorhanden, füge das neue Element als Blatt. so ein, dass die Suhbaumeigenshaft erfüllt ist,

• Leicht, falls der Fehler eine nicht abgefangene exeption auslöste :-). • Schwer, falls das Programm stumm in eine Endlos-Schleife

[r]

T eises peatükis käsitletakse F redholmi teist liiki integraalvõrrandi lahendi ole-.. masolu, ühesust

Lösung: Es gibt keine solhe positive ganze Zahl. Beweis: Denn für jede positive ganze Zahl n beweist die Umfomung

Es gibt eine konkret berehenbare Zahl w , so dass gilt: Jede ungerade Zahl n ≥ w kann als eine Summe aus drei Primzahlen geshrieben werden. Winogradow selbst konnte keinen Wert für

Dann gibt es für einen Streifen 6 , für einen anderen Streifen 5 und für den.. dritten Streifen