ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  op1stg GIF version

Theorem op1stg 6055
Description: Extract the first member of an ordered pair. (Contributed by NM, 19-Jul-2005.)
Assertion
Ref Expression
op1stg ((𝐴𝑉𝐵𝑊) → (1st ‘⟨𝐴, 𝐵⟩) = 𝐴)

Proof of Theorem op1stg
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 opeq1 3712 . . . 4 (𝑥 = 𝐴 → ⟨𝑥, 𝑦⟩ = ⟨𝐴, 𝑦⟩)
21fveq2d 5432 . . 3 (𝑥 = 𝐴 → (1st ‘⟨𝑥, 𝑦⟩) = (1st ‘⟨𝐴, 𝑦⟩))
3 id 19 . . 3 (𝑥 = 𝐴𝑥 = 𝐴)
42, 3eqeq12d 2155 . 2 (𝑥 = 𝐴 → ((1st ‘⟨𝑥, 𝑦⟩) = 𝑥 ↔ (1st ‘⟨𝐴, 𝑦⟩) = 𝐴))
5 opeq2 3713 . . . 4 (𝑦 = 𝐵 → ⟨𝐴, 𝑦⟩ = ⟨𝐴, 𝐵⟩)
65fveq2d 5432 . . 3 (𝑦 = 𝐵 → (1st ‘⟨𝐴, 𝑦⟩) = (1st ‘⟨𝐴, 𝐵⟩))
76eqeq1d 2149 . 2 (𝑦 = 𝐵 → ((1st ‘⟨𝐴, 𝑦⟩) = 𝐴 ↔ (1st ‘⟨𝐴, 𝐵⟩) = 𝐴))
8 vex 2692 . . 3 𝑥 ∈ V
9 vex 2692 . . 3 𝑦 ∈ V
108, 9op1st 6051 . 2 (1st ‘⟨𝑥, 𝑦⟩) = 𝑥
114, 7, 10vtocl2g 2753 1 ((𝐴𝑉𝐵𝑊) → (1st ‘⟨𝐴, 𝐵⟩) = 𝐴)
Colors of variables: wff set class
Syntax hints:  wi 4  wa 103   = wceq 1332  wcel 1481  cop 3534  cfv 5130  1st c1st 6043
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-io 699  ax-5 1424  ax-7 1425  ax-gen 1426  ax-ie1 1470  ax-ie2 1471  ax-8 1483  ax-10 1484  ax-11 1485  ax-i12 1486  ax-bndl 1487  ax-4 1488  ax-13 1492  ax-14 1493  ax-17 1507  ax-i9 1511  ax-ial 1515  ax-i5r 1516  ax-ext 2122  ax-sep 4053  ax-pow 4105  ax-pr 4138  ax-un 4362
This theorem depends on definitions:  df-bi 116  df-3an 965  df-tru 1335  df-nf 1438  df-sb 1737  df-eu 2003  df-mo 2004  df-clab 2127  df-cleq 2133  df-clel 2136  df-nfc 2271  df-ral 2422  df-rex 2423  df-v 2691  df-sbc 2913  df-un 3079  df-in 3081  df-ss 3088  df-pw 3516  df-sn 3537  df-pr 3538  df-op 3540  df-uni 3744  df-br 3937  df-opab 3997  df-mpt 3998  df-id 4222  df-xp 4552  df-rel 4553  df-cnv 4554  df-co 4555  df-dm 4556  df-rn 4557  df-iota 5095  df-fun 5132  df-fv 5138  df-1st 6045
This theorem is referenced by:  ot1stg  6057  ot2ndg  6058  1stconst  6125  algrflemg  6134  mpoxopn0yelv  6143  mpoxopoveq  6144  xpmapenlem  6750  1stinl  6966  1stinr  6968  mulpipq  7203  suplocexprlemlub  7555  aprcl  8431  frecuzrdgg  10219  qredeu  11812  qnumdenbi  11904  upxp  12478  uptx  12480  txmetcnp  12724
  Copyright terms: Public domain W3C validator