let N be with_non-empty_elements set ; :: thesis: for A being AMI-Struct of N
for s being State of A
for I being NAT -defined FinPartState of holds s,s +* I equal_outside NAT
let A be AMI-Struct of N; :: thesis: for s being State of A
for I being NAT -defined FinPartState of holds s,s +* I equal_outside NAT
let s be State of A; :: thesis: for I being NAT -defined FinPartState of holds s,s +* I equal_outside NAT
let I be NAT -defined FinPartState of ; :: thesis: s,s +* I equal_outside NAT
dom I c= NAT by RELAT_1:def 18;
hence s,s +* I equal_outside NAT by FUNCT_7:31; :: thesis: verum