Theorem diaord 37067

Description: The partial isomorphism A for a lattice 𝐾 is order-preserving in the region under co-atom 𝑊. Part of Lemma M of [Crawley] p. 120 line 28. (Contributed by NM, 26-Nov-2013.)

Hypotheses

Ref	Expression
dia11.b	⊢ 𝐵 = (Base‘𝐾)
dia11.l	⊢ ≤ = (le‘𝐾)
dia11.h	⊢ 𝐻 = (LHyp‘𝐾)
dia11.i	⊢ 𝐼 = ((DIsoA‘𝐾)‘𝑊)

Assertion

Ref	Expression
diaord	⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑋 ≤ 𝑊) ∧ (𝑌 ∈ 𝐵 ∧ 𝑌 ≤ 𝑊)) → ((𝐼‘𝑋) ⊆ (𝐼‘𝑌) ↔ 𝑋 ≤ 𝑌))

Proof of Theorem diaord

Dummy variable 𝑓 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		dia11.b	. . . . 5 ⊢ 𝐵 = (Base‘𝐾)
2		dia11.l	. . . . 5 ⊢ ≤ = (le‘𝐾)
3		dia11.h	. . . . 5 ⊢ 𝐻 = (LHyp‘𝐾)
4		eqid 2800	. . . . 5 ⊢ ((LTrn‘𝐾)‘𝑊) = ((LTrn‘𝐾)‘𝑊)
5		eqid 2800	. . . . 5 ⊢ ((trL‘𝐾)‘𝑊) = ((trL‘𝐾)‘𝑊)
6		dia11.i	. . . . 5 ⊢ 𝐼 = ((DIsoA‘𝐾)‘𝑊)
7	1, 2, 3, 4, 5, 6	diaval 37052	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑋 ≤ 𝑊)) → (𝐼‘𝑋) = {𝑓 ∈ ((LTrn‘𝐾)‘𝑊) ∣ (((trL‘𝐾)‘𝑊)‘𝑓) ≤ 𝑋})
8	7	3adant3 1163	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑋 ≤ 𝑊) ∧ (𝑌 ∈ 𝐵 ∧ 𝑌 ≤ 𝑊)) → (𝐼‘𝑋) = {𝑓 ∈ ((LTrn‘𝐾)‘𝑊) ∣ (((trL‘𝐾)‘𝑊)‘𝑓) ≤ 𝑋})
9	1, 2, 3, 4, 5, 6	diaval 37052	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑌 ∈ 𝐵 ∧ 𝑌 ≤ 𝑊)) → (𝐼‘𝑌) = {𝑓 ∈ ((LTrn‘𝐾)‘𝑊) ∣ (((trL‘𝐾)‘𝑊)‘𝑓) ≤ 𝑌})
10	9	3adant2 1162	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑋 ≤ 𝑊) ∧ (𝑌 ∈ 𝐵 ∧ 𝑌 ≤ 𝑊)) → (𝐼‘𝑌) = {𝑓 ∈ ((LTrn‘𝐾)‘𝑊) ∣ (((trL‘𝐾)‘𝑊)‘𝑓) ≤ 𝑌})
11	8, 10	sseq12d 3831	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑋 ≤ 𝑊) ∧ (𝑌 ∈ 𝐵 ∧ 𝑌 ≤ 𝑊)) → ((𝐼‘𝑋) ⊆ (𝐼‘𝑌) ↔ {𝑓 ∈ ((LTrn‘𝐾)‘𝑊) ∣ (((trL‘𝐾)‘𝑊)‘𝑓) ≤ 𝑋} ⊆ {𝑓 ∈ ((LTrn‘𝐾)‘𝑊) ∣ (((trL‘𝐾)‘𝑊)‘𝑓) ≤ 𝑌}))
12		eqid 2800	. . . 4 ⊢ (Atoms‘𝐾) = (Atoms‘𝐾)
13	1, 2, 12, 3, 4, 5	trlord 36589	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑋 ≤ 𝑊) ∧ (𝑌 ∈ 𝐵 ∧ 𝑌 ≤ 𝑊)) → (𝑋 ≤ 𝑌 ↔ ∀𝑓 ∈ ((LTrn‘𝐾)‘𝑊)((((trL‘𝐾)‘𝑊)‘𝑓) ≤ 𝑋 → (((trL‘𝐾)‘𝑊)‘𝑓) ≤ 𝑌)))
14		ss2rab 3875	. . 3 ⊢ ({𝑓 ∈ ((LTrn‘𝐾)‘𝑊) ∣ (((trL‘𝐾)‘𝑊)‘𝑓) ≤ 𝑋} ⊆ {𝑓 ∈ ((LTrn‘𝐾)‘𝑊) ∣ (((trL‘𝐾)‘𝑊)‘𝑓) ≤ 𝑌} ↔ ∀𝑓 ∈ ((LTrn‘𝐾)‘𝑊)((((trL‘𝐾)‘𝑊)‘𝑓) ≤ 𝑋 → (((trL‘𝐾)‘𝑊)‘𝑓) ≤ 𝑌))
15	13, 14	syl6rbbr 282	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑋 ≤ 𝑊) ∧ (𝑌 ∈ 𝐵 ∧ 𝑌 ≤ 𝑊)) → ({𝑓 ∈ ((LTrn‘𝐾)‘𝑊) ∣ (((trL‘𝐾)‘𝑊)‘𝑓) ≤ 𝑋} ⊆ {𝑓 ∈ ((LTrn‘𝐾)‘𝑊) ∣ (((trL‘𝐾)‘𝑊)‘𝑓) ≤ 𝑌} ↔ 𝑋 ≤ 𝑌))
16	11, 15	bitrd 271	1 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑋 ≤ 𝑊) ∧ (𝑌 ∈ 𝐵 ∧ 𝑌 ≤ 𝑊)) → ((𝐼‘𝑋) ⊆ (𝐼‘𝑌) ↔ 𝑋 ≤ 𝑌))

Syntax hints:   → wi 4   ↔ wb 198   ∧ wa 385   ∧ w3a 1108   = wceq 1653   ∈ wcel 2157  ∀wral 3090  {crab 3094   ⊆ wss 3770   class class class wbr 4844  ‘cfv 6102  Basecbs 16183  lecple 16273  Atomscatm 35283  HLchlt 35370  LHypclh 36004  LTrncltrn 36121  trLctrl 36178  DIsoAcdia 37048

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1891  ax-4 1905  ax-5 2006  ax-6 2072  ax-7 2107  ax-8 2159  ax-9 2166  ax-10 2185  ax-11 2200  ax-12 2213  ax-13 2378  ax-ext 2778  ax-rep 4965  ax-sep 4976  ax-nul 4984  ax-pow 5036  ax-pr 5098  ax-un 7184  ax-riotaBAD 34973

This theorem depends on definitions:  df-bi 199  df-an 386  df-or 875  df-3or 1109  df-3an 1110  df-tru 1657  df-ex 1876  df-nf 1880  df-sb 2065  df-mo 2592  df-eu 2610  df-clab 2787  df-cleq 2793  df-clel 2796  df-nfc 2931  df-ne 2973  df-nel 3076  df-ral 3095  df-rex 3096  df-reu 3097  df-rmo 3098  df-rab 3099  df-v 3388  df-sbc 3635  df-csb 3730  df-dif 3773  df-un 3775  df-in 3777  df-ss 3784  df-nul 4117  df-if 4279  df-pw 4352  df-sn 4370  df-pr 4372  df-op 4376  df-uni 4630  df-iun 4713  df-iin 4714  df-br 4845  df-opab 4907  df-mpt 4924  df-id 5221  df-xp 5319  df-rel 5320  df-cnv 5321  df-co 5322  df-dm 5323  df-rn 5324  df-res 5325  df-ima 5326  df-iota 6065  df-fun 6104  df-fn 6105  df-f 6106  df-f1 6107  df-fo 6108  df-f1o 6109  df-fv 6110  df-riota 6840  df-ov 6882  df-oprab 6883  df-mpt2 6884  df-1st 7402  df-2nd 7403  df-undef 7638  df-map 8098  df-proset 17242  df-poset 17260  df-plt 17272  df-lub 17288  df-glb 17289  df-join 17290  df-meet 17291  df-p0 17353  df-p1 17354  df-lat 17360  df-clat 17422  df-oposet 35196  df-ol 35198  df-oml 35199  df-covers 35286  df-ats 35287  df-atl 35318  df-cvlat 35342  df-hlat 35371  df-llines 35518  df-lplanes 35519  df-lvols 35520  df-lines 35521  df-psubsp 35523  df-pmap 35524  df-padd 35816  df-lhyp 36008  df-laut 36009  df-ldil 36124  df-ltrn 36125  df-trl 36179  df-disoa 37049

This theorem is referenced by:  dia11N  37068  dia2dimlem10  37093  dibord  37179