:: AMISTD_1 semantic presentation
theorem Th1: :: AMISTD_1:1
theorem Th2: :: AMISTD_1:2
theorem Th3: :: AMISTD_1:3
theorem Th4: :: AMISTD_1:4
canceled;
theorem Th5: :: AMISTD_1:5
canceled;
theorem Th6: :: AMISTD_1:6
canceled;
theorem Th7: :: AMISTD_1:7
canceled;
theorem Th8: :: AMISTD_1:8
canceled;
theorem Th9: :: AMISTD_1:9
canceled;
theorem Th10: :: AMISTD_1:10
canceled;
theorem Th11: :: AMISTD_1:11
Lemma60:
for N being with_non-empty_elements set
for S being non empty non void IC-Ins-separated steady-programmed definite AMI-Struct of N
for il being Instruction-Location of S
for I being Element of the Instructions of S
for f being FinPartState of S st f = il .--> I holds
f is autonomic
theorem Th12: :: AMISTD_1:12
theorem Th13: :: AMISTD_1:13
:: deftheorem Def1 AMISTD_1:def 1 :
canceled;
:: deftheorem Def2 AMISTD_1:def 2 :
canceled;
:: deftheorem Def3 defines jump-only AMISTD_1:def 3 :
:: deftheorem Def4 defines jump-only AMISTD_1:def 4 :
:: deftheorem Def5 defines NIC AMISTD_1:def 5 :
E77:
now
let N be
with_non-empty_elements set ;
let S be non
empty non
void IC-Ins-separated definite realistic AMI-Struct of
N;
let i be
Element of the
Instructions of
S;
let l be
Instruction-Location of
S;
let s be
State of
S;
let f be
FinPartState of
S;
assume E36:
f = (IC S),
l --> l,
i
;
set t =
s +* f;
E37:
IC S <> l
by AMI_1:48;
E39:
dom f = {(IC S),l}
by , FUNCT_4:65;
then E40:
IC S in dom f
by TARSKI:def 2;
E41:
IC (s +* f) =
f . (IC S)
by , FUNCT_4:14
.=
l
by , , FUNCT_4:66
;
l in dom f
by , TARSKI:def 2;
then (s +* f) . l =
f . l
by FUNCT_4:14
.=
i
by , , FUNCT_4:66
;
hence
IC (Following (s +* f)) in NIC i,
l
by ;
end;
:: deftheorem Def6 defines JUMP AMISTD_1:def 6 :
:: deftheorem Def7 defines SUCC AMISTD_1:def 7 :
theorem Th14: :: AMISTD_1:14
theorem Th15: :: AMISTD_1:15
:: deftheorem Def8 defines <= AMISTD_1:def 8 :
theorem Th16: :: AMISTD_1:16
:: deftheorem Def9 defines InsLoc-antisymmetric AMISTD_1:def 9 :
:: deftheorem Def10 defines standard AMISTD_1:def 10 :
theorem Th17: :: AMISTD_1:17
theorem Th18: :: AMISTD_1:18
theorem Th19: :: AMISTD_1:19
Lemma164:
for a, b being set holds dom ((NAT --> a) +* (NAT .--> b)) = NAT \/ {NAT }
set III = {[1,0],[0,0]};
definition
let N be
with_non-empty_elements set ;
func STC c1 -> strict AMI-Struct of
a1 means :
Def11:
:: AMISTD_1:def 11
( the
carrier of
it = NAT \/ {NAT } & the
Instruction-Counter of
it = NAT & the
Instruction-Locations of
it = NAT & the
Instruction-Codes of
it = {0,1} & the
Instructions of
it = {[0,0],[1,0]} & the
Object-Kind of
it = (NAT --> {[1,0],[0,0]}) +* (NAT .--> NAT ) & ex
f being
Function of
product the
Object-Kind of
it,
product the
Object-Kind of
it st
( ( for
s being
Element of
product the
Object-Kind of
it holds
f . s = s +* (NAT .--> (succ (s . NAT ))) ) & the
Execution of
it = ([1,0] .--> f) +* ([0,0] .--> (id (product the Object-Kind of it))) ) );
existence
ex b1 being strict AMI-Struct of N st
( the carrier of b1 = NAT \/ {NAT } & the Instruction-Counter of b1 = NAT & the Instruction-Locations of b1 = NAT & the Instruction-Codes of b1 = {0,1} & the Instructions of b1 = {[0,0],[1,0]} & the Object-Kind of b1 = (NAT --> {[1,0],[0,0]}) +* (NAT .--> NAT ) & ex f being Function of product the Object-Kind of b1, product the Object-Kind of b1 st
( ( for s being Element of product the Object-Kind of b1 holds f . s = s +* (NAT .--> (succ (s . NAT ))) ) & the Execution of b1 = ([1,0] .--> f) +* ([0,0] .--> (id (product the Object-Kind of b1))) ) )
uniqueness
for b1, b2 being strict AMI-Struct of N st the carrier of b1 = NAT \/ {NAT } & the Instruction-Counter of b1 = NAT & the Instruction-Locations of b1 = NAT & the Instruction-Codes of b1 = {0,1} & the Instructions of b1 = {[0,0],[1,0]} & the Object-Kind of b1 = (NAT --> {[1,0],[0,0]}) +* (NAT .--> NAT ) & ex f being Function of product the Object-Kind of b1, product the Object-Kind of b1 st
( ( for s being Element of product the Object-Kind of b1 holds f . s = s +* (NAT .--> (succ (s . NAT ))) ) & the Execution of b1 = ([1,0] .--> f) +* ([0,0] .--> (id (product the Object-Kind of b1))) ) & the carrier of b2 = NAT \/ {NAT } & the Instruction-Counter of b2 = NAT & the Instruction-Locations of b2 = NAT & the Instruction-Codes of b2 = {0,1} & the Instructions of b2 = {[0,0],[1,0]} & the Object-Kind of b2 = (NAT --> {[1,0],[0,0]}) +* (NAT .--> NAT ) & ex f being Function of product the Object-Kind of b2, product the Object-Kind of b2 st
( ( for s being Element of product the Object-Kind of b2 holds f . s = s +* (NAT .--> (succ (s . NAT ))) ) & the Execution of b2 = ([1,0] .--> f) +* ([0,0] .--> (id (product the Object-Kind of b2))) ) holds
b1 = b2
end;
:: deftheorem Def11 defines STC AMISTD_1:def 11 :
for
N being
with_non-empty_elements set for
b2 being
strict AMI-Struct of
N holds
(
b2 = STC N iff ( the
carrier of
b2 = NAT \/ {NAT } & the
Instruction-Counter of
b2 = NAT & the
Instruction-Locations of
b2 = NAT & the
Instruction-Codes of
b2 = {0,1} & the
Instructions of
b2 = {[0,0],[1,0]} & the
Object-Kind of
b2 = (NAT --> {[1,0],[0,0]}) +* (NAT .--> NAT ) & ex
f being
Function of
product the
Object-Kind of
b2,
product the
Object-Kind of
b2 st
( ( for
s being
Element of
product the
Object-Kind of
b2 holds
f . s = s +* (NAT .--> (succ (s . NAT ))) ) & the
Execution of
b2 = ([1,0] .--> f) +* ([0,0] .--> (id (product the Object-Kind of b2))) ) ) );
Lemma176:
for N being with_non-empty_elements set
for i being Instruction of (STC N)
for s being State of (STC N) st InsCode i = 1 holds
(Exec i,s) . (IC (STC N)) = succ (IC s)
theorem Th20: :: AMISTD_1:20
theorem Th21: :: AMISTD_1:21
theorem Th22: :: AMISTD_1:22
theorem Th23: :: AMISTD_1:23
Lemma180:
for z being natural number
for N being with_non-empty_elements set
for l being Instruction-Location of (STC N)
for i being Element of the Instructions of (STC N) st l = z & InsCode i = 1 holds
NIC i,l = {(z + 1)}
Lemma184:
for N being with_non-empty_elements set
for i being Element of the Instructions of (STC N) holds JUMP i is empty
theorem Th24: :: AMISTD_1:24
definition
let N be
with_non-empty_elements set ;
let S be non
empty non
void IC-Ins-separated definite standard AMI-Struct of
N;
let k be
natural number ;
func il. c2,
c3 -> Instruction-Location of
a2 means :
Def12:
:: AMISTD_1:def 12
ex
f being
Function of
NAT ,the
Instruction-Locations of
N st
(
f is
bijective & ( for
m,
n being
Element of
NAT holds
(
m <= n iff
f . m <= f . n ) ) &
it = f . S );
existence
ex b1 being Instruction-Location of S ex f being Function of NAT ,the Instruction-Locations of S st
( f is bijective & ( for m, n being Element of NAT holds
( m <= n iff f . m <= f . n ) ) & b1 = f . k )
uniqueness
for b1, b2 being Instruction-Location of S st ex f being Function of NAT ,the Instruction-Locations of S st
( f is bijective & ( for m, n being Element of NAT holds
( m <= n iff f . m <= f . n ) ) & b1 = f . k ) & ex f being Function of NAT ,the Instruction-Locations of S st
( f is bijective & ( for m, n being Element of NAT holds
( m <= n iff f . m <= f . n ) ) & b2 = f . k ) holds
b1 = b2
by ;
end;
:: deftheorem Def12 defines il. AMISTD_1:def 12 :
theorem Th25: :: AMISTD_1:25
theorem Th26: :: AMISTD_1:26
:: deftheorem Def13 defines locnum AMISTD_1:def 13 :
theorem Th27: :: AMISTD_1:27
theorem Th28: :: AMISTD_1:28
theorem Th29: :: AMISTD_1:29
theorem Th30: :: AMISTD_1:30
:: deftheorem Def14 defines + AMISTD_1:def 14 :
theorem Th31: :: AMISTD_1:31
theorem Th32: :: AMISTD_1:32
theorem Th33: :: AMISTD_1:33
:: deftheorem Def15 defines NextLoc AMISTD_1:def 15 :
theorem Th34: :: AMISTD_1:34
theorem Th35: :: AMISTD_1:35
theorem Th36: :: AMISTD_1:36
theorem Th37: :: AMISTD_1:37
theorem Th38: :: AMISTD_1:38
theorem Th39: :: AMISTD_1:39
theorem Th40: :: AMISTD_1:40
:: deftheorem Def16 defines sequential AMISTD_1:def 16 :
theorem Th41: :: AMISTD_1:41
theorem Th42: :: AMISTD_1:42
theorem Th43: :: AMISTD_1:43
:: deftheorem Def17 defines closed AMISTD_1:def 17 :
:: deftheorem Def18 defines really-closed AMISTD_1:def 18 :
:: deftheorem Def19 defines para-closed AMISTD_1:def 19 :
theorem Th44: :: AMISTD_1:44
theorem Th45: :: AMISTD_1:45
theorem Th46: :: AMISTD_1:46
:: deftheorem Def20 defines lower AMISTD_1:def 20 :
theorem Th47: :: AMISTD_1:47
theorem Th48: :: AMISTD_1:48
theorem Th49: :: AMISTD_1:49
theorem Th50: :: AMISTD_1:50
:: deftheorem Def21 defines LastLoc AMISTD_1:def 21 :
theorem Th51: :: AMISTD_1:51
theorem Th52: :: AMISTD_1:52
theorem Th53: :: AMISTD_1:53
theorem Th54: :: AMISTD_1:54
theorem Th55: :: AMISTD_1:55
E220:
now
let N be
with_non-empty_elements set ;
let S be non
empty non
void halting IC-Ins-separated definite standard AMI-Struct of
N;
set F =
(il. S,0) .--> (halt S);
E36:
dom ((il. S,0) .--> (halt S)) = {(il. S,0)}
by CQC_LANG:5;
then E37:
card (dom ((il. S,0) .--> (halt S))) = 1
by CARD_1:79;
(il. S,0) .--> (halt S) is
lower FinPartState of
S
by ;
then E39:
LastLoc ((il. S,0) .--> (halt S)) =
il. S,
((card ((il. S,0) .--> (halt S))) -' 1)
by
.=
il. S,
((card (dom ((il. S,0) .--> (halt S)))) -' 1)
by PRE_CIRC:21
.=
il. S,0
by , BINARITH:51
;
hence
((il. S,0) .--> (halt S)) . (LastLoc ((il. S,0) .--> (halt S))) = halt S
by CQC_LANG:6;
let l be
Instruction-Location of
S;
assume
((il. S,0) .--> (halt S)) . l = halt S
;
assume
l in dom ((il. S,0) .--> (halt S))
;
hence
l = LastLoc ((il. S,0) .--> (halt S))
by , , TARSKI:def 1;
end;
:: deftheorem Def22 defines halt-ending AMISTD_1:def 22 :
:: deftheorem Def23 defines unique-halt AMISTD_1:def 23 :