let G1, G2 be non empty non void Circuit-like ManySortedSign ; for f, g being Function
for C1 being non-empty Circuit of G1
for C2 being non-empty Circuit of G2 st f,g form_embedding_of C1,C2 holds
for o1 being Gate of G1
for o2 being Gate of G2 st o2 = g . o1 holds
Den (o2,C2) = Den (o1,C1)
let f, g be Function; for C1 being non-empty Circuit of G1
for C2 being non-empty Circuit of G2 st f,g form_embedding_of C1,C2 holds
for o1 being Gate of G1
for o2 being Gate of G2 st o2 = g . o1 holds
Den (o2,C2) = Den (o1,C1)
let C1 be non-empty Circuit of G1; for C2 being non-empty Circuit of G2 st f,g form_embedding_of C1,C2 holds
for o1 being Gate of G1
for o2 being Gate of G2 st o2 = g . o1 holds
Den (o2,C2) = Den (o1,C1)
let C2 be non-empty Circuit of G2; ( f,g form_embedding_of C1,C2 implies for o1 being Gate of G1
for o2 being Gate of G2 st o2 = g . o1 holds
Den (o2,C2) = Den (o1,C1) )
assume that
f is one-to-one
and
g is one-to-one
and
A1:
f,g form_morphism_between G1,G2
and
the Sorts of C1 = the Sorts of C2 * f
and
A2:
the Charact of C1 = the Charact of C2 * g
; CIRCTRM1:def 12 for o1 being Gate of G1
for o2 being Gate of G2 st o2 = g . o1 holds
Den (o2,C2) = Den (o1,C1)
let o1 be Gate of G1; for o2 being Gate of G2 st o2 = g . o1 holds
Den (o2,C2) = Den (o1,C1)
let o2 be Gate of G2; ( o2 = g . o1 implies Den (o2,C2) = Den (o1,C1) )
assume A3:
o2 = g . o1
; Den (o2,C2) = Den (o1,C1)
dom g = the carrier' of G1
by A1;
hence
Den (o2,C2) = Den (o1,C1)
by A2, A3, FUNCT_1:13; verum