let N be with_zero set ; :: thesis: for S being non empty with_non-empty_values IC-Ins-separated weakly_standard AMI-Struct over N
for l being Element of NAT holds l -' (0,S) = l

let S be non empty with_non-empty_values IC-Ins-separated weakly_standard AMI-Struct over N; :: thesis: for l being Element of NAT holds l -' (0,S) = l
let l be Element of NAT ; :: thesis: l -' (0,S) = l
thus l -' (0,S) = il. (S,(locnum (l,S))) by NAT_D:40
.= l by Def5 ; :: thesis: verum