Metamath Proof Explorer


Theorem ofsubge0

Description: Function analogue of subge0 . (Contributed by Mario Carneiro, 24-Jul-2014)

Ref Expression
Assertion ofsubge0 ( ( 𝐴𝑉𝐹 : 𝐴 ⟶ ℝ ∧ 𝐺 : 𝐴 ⟶ ℝ ) → ( ( 𝐴 × { 0 } ) ∘r ≤ ( 𝐹f𝐺 ) ↔ 𝐺r𝐹 ) )

Proof

Step Hyp Ref Expression
1 simp2 ( ( 𝐴𝑉𝐹 : 𝐴 ⟶ ℝ ∧ 𝐺 : 𝐴 ⟶ ℝ ) → 𝐹 : 𝐴 ⟶ ℝ )
2 1 ffvelrnda ( ( ( 𝐴𝑉𝐹 : 𝐴 ⟶ ℝ ∧ 𝐺 : 𝐴 ⟶ ℝ ) ∧ 𝑥𝐴 ) → ( 𝐹𝑥 ) ∈ ℝ )
3 simp3 ( ( 𝐴𝑉𝐹 : 𝐴 ⟶ ℝ ∧ 𝐺 : 𝐴 ⟶ ℝ ) → 𝐺 : 𝐴 ⟶ ℝ )
4 3 ffvelrnda ( ( ( 𝐴𝑉𝐹 : 𝐴 ⟶ ℝ ∧ 𝐺 : 𝐴 ⟶ ℝ ) ∧ 𝑥𝐴 ) → ( 𝐺𝑥 ) ∈ ℝ )
5 2 4 subge0d ( ( ( 𝐴𝑉𝐹 : 𝐴 ⟶ ℝ ∧ 𝐺 : 𝐴 ⟶ ℝ ) ∧ 𝑥𝐴 ) → ( 0 ≤ ( ( 𝐹𝑥 ) − ( 𝐺𝑥 ) ) ↔ ( 𝐺𝑥 ) ≤ ( 𝐹𝑥 ) ) )
6 5 ralbidva ( ( 𝐴𝑉𝐹 : 𝐴 ⟶ ℝ ∧ 𝐺 : 𝐴 ⟶ ℝ ) → ( ∀ 𝑥𝐴 0 ≤ ( ( 𝐹𝑥 ) − ( 𝐺𝑥 ) ) ↔ ∀ 𝑥𝐴 ( 𝐺𝑥 ) ≤ ( 𝐹𝑥 ) ) )
7 0cn 0 ∈ ℂ
8 fnconstg ( 0 ∈ ℂ → ( 𝐴 × { 0 } ) Fn 𝐴 )
9 7 8 mp1i ( ( 𝐴𝑉𝐹 : 𝐴 ⟶ ℝ ∧ 𝐺 : 𝐴 ⟶ ℝ ) → ( 𝐴 × { 0 } ) Fn 𝐴 )
10 1 ffnd ( ( 𝐴𝑉𝐹 : 𝐴 ⟶ ℝ ∧ 𝐺 : 𝐴 ⟶ ℝ ) → 𝐹 Fn 𝐴 )
11 3 ffnd ( ( 𝐴𝑉𝐹 : 𝐴 ⟶ ℝ ∧ 𝐺 : 𝐴 ⟶ ℝ ) → 𝐺 Fn 𝐴 )
12 simp1 ( ( 𝐴𝑉𝐹 : 𝐴 ⟶ ℝ ∧ 𝐺 : 𝐴 ⟶ ℝ ) → 𝐴𝑉 )
13 inidm ( 𝐴𝐴 ) = 𝐴
14 10 11 12 12 13 offn ( ( 𝐴𝑉𝐹 : 𝐴 ⟶ ℝ ∧ 𝐺 : 𝐴 ⟶ ℝ ) → ( 𝐹f𝐺 ) Fn 𝐴 )
15 c0ex 0 ∈ V
16 15 fvconst2 ( 𝑥𝐴 → ( ( 𝐴 × { 0 } ) ‘ 𝑥 ) = 0 )
17 16 adantl ( ( ( 𝐴𝑉𝐹 : 𝐴 ⟶ ℝ ∧ 𝐺 : 𝐴 ⟶ ℝ ) ∧ 𝑥𝐴 ) → ( ( 𝐴 × { 0 } ) ‘ 𝑥 ) = 0 )
18 eqidd ( ( ( 𝐴𝑉𝐹 : 𝐴 ⟶ ℝ ∧ 𝐺 : 𝐴 ⟶ ℝ ) ∧ 𝑥𝐴 ) → ( 𝐹𝑥 ) = ( 𝐹𝑥 ) )
19 eqidd ( ( ( 𝐴𝑉𝐹 : 𝐴 ⟶ ℝ ∧ 𝐺 : 𝐴 ⟶ ℝ ) ∧ 𝑥𝐴 ) → ( 𝐺𝑥 ) = ( 𝐺𝑥 ) )
20 10 11 12 12 13 18 19 ofval ( ( ( 𝐴𝑉𝐹 : 𝐴 ⟶ ℝ ∧ 𝐺 : 𝐴 ⟶ ℝ ) ∧ 𝑥𝐴 ) → ( ( 𝐹f𝐺 ) ‘ 𝑥 ) = ( ( 𝐹𝑥 ) − ( 𝐺𝑥 ) ) )
21 9 14 12 12 13 17 20 ofrfval ( ( 𝐴𝑉𝐹 : 𝐴 ⟶ ℝ ∧ 𝐺 : 𝐴 ⟶ ℝ ) → ( ( 𝐴 × { 0 } ) ∘r ≤ ( 𝐹f𝐺 ) ↔ ∀ 𝑥𝐴 0 ≤ ( ( 𝐹𝑥 ) − ( 𝐺𝑥 ) ) ) )
22 11 10 12 12 13 19 18 ofrfval ( ( 𝐴𝑉𝐹 : 𝐴 ⟶ ℝ ∧ 𝐺 : 𝐴 ⟶ ℝ ) → ( 𝐺r𝐹 ↔ ∀ 𝑥𝐴 ( 𝐺𝑥 ) ≤ ( 𝐹𝑥 ) ) )
23 6 21 22 3bitr4d ( ( 𝐴𝑉𝐹 : 𝐴 ⟶ ℝ ∧ 𝐺 : 𝐴 ⟶ ℝ ) → ( ( 𝐴 × { 0 } ) ∘r ≤ ( 𝐹f𝐺 ) ↔ 𝐺r𝐹 ) )