let I be Program of SCM+FSA; :: thesis: for a being Int-Location holds not a in dom I
let a be Int-Location ; :: thesis: not a in dom I
A1: dom I c= NAT by RELAT_1:def 18;
assume a in dom I ; :: thesis: contradiction
then reconsider a = a as Element of NAT by A1;
a = a ;
hence contradiction by SCMFSA_2:59; :: thesis: verum