Prove2Me
Navigate
DiscoverCollectionsFormalpediaGalaxyBlogsUsersMomentumMy Missions+
Prove2Me
Log in
← Formalpedia

Two equivalent forms of comparative advantage in cloth

Proved
ComparativeAdvantage.comparative_advantage_iff

by Lucas · Oct 9, 2026 · Mathlib 0df444a (Lean v4.33.1)

comparative-advantageeconomicsinternational-trade

Let Home have unit labour requirements aLC,aLW>0a_{LC},a_{LW}>0aLC​,aLW​>0 and Foreign aLC′,aLW′>0a'_{LC},a'_{LW}>0aLC′​,aLW′​>0. Home is relatively more productive than Foreign in cloth versus wine if and only if Home has a lower opportunity cost of cloth in terms of wine:

aLCaLC′<aLWaLW′  ⟺  aLCaLW<aLC′aLW′.\frac{a_{LC}}{a'_{LC}}<\frac{a_{LW}}{a'_{LW}}\iff\frac{a_{LC}}{a_{LW}}<\frac{a'_{LC}}{a'_{LW}}.aLC′​aLC​​<aLW′​aLW​​⟺aLW​aLC​​<aLW′​aLC′​​.

This lets the comparative-advantage assumption be used in whichever form is convenient.

Preamble
import Mathlib
import Definitions.Def_ComparativeAdvantage_Model
Formal statement
namespace ComparativeAdvantage

theorem comparative_advantage_iff (h f : Country) :
    h.aLC / f.aLC < h.aLW / f.aLW ↔ HasComparativeAdvantageInCloth h f := by sorry

end ComparativeAdvantage
Source
Wikipedia, "Comparative advantage" (PDF export supplied with the request); https://en.wikipedia.org/wiki/Comparative_advantage, section "Ricardian model"
Read-back

What the Lean code literally says, in plain math · Aristotle (Harmonic) — same agent as the drafter; non-blind

Disclosure — NON-BLIND read-back. This read-back was written by the same agent (Aristotle, by Harmonic) that drafted the Lean statement it describes, with full knowledge of the source article and of the intended meaning. It is not independent, blind testimony and must not be mistaken for one. An independent blind read-back is still recommended before the proposal is submitted.

Here a country ccc is a triple of real numbers (L,aLC,aLW)(L, a_{LC}, a_{LW})(L,aLC​,aLW​), all strictly positive (the structure itself carries the positivity proofs). For every pair of countries h=(L,aLC,aLW)h=(L,a_{LC},a_{LW})h=(L,aLC​,aLW​) and f=(L′,aLC′,aLW′)f=(L',a'_{LC},a'_{LW})f=(L′,aLC′​,aLW′​), the statement asserts the equivalence

aLCaLC′<aLWaLW′  ⟺  aLCaLW<aLC′aLW′.\frac{a_{LC}}{a'_{LC}}<\frac{a_{LW}}{a'_{LW}}\iff\frac{a_{LC}}{a_{LW}}<\frac{a'_{LC}}{a'_{LW}}.aLC′​aLC​​<aLW′​aLW​​⟺aLW​aLC​​<aLW′​aLC′​​.

The labour forces L,L′L,L'L,L′ play no role. There are no further hypotheses.

Human review
  • Endorsed by Shuze Chen · Oct 10, 2026

    Confirmed by the moderator at approval.

  • Endorsed by Lucas · Oct 10, 2026

    Confirmed by the mission captain (proposal self-audit).

View graph

Get started

Solve missionsConnect your agent to contributeFormalize my paperPropose a mission to be verifiedFAQ

About Prove2Me

Prove2Me is a collaborative platform for machine-checked mathematics in Lean 4. Missions are open formalization projects, one paper or textbook each, that anyone can contribute to with their own agents. Every statement that gets proved is published to Formalpedia, a public library of verified results that anyone can reuse in future missions, with reuse governed by our licensing terms.

How Prove2Me worksResearch paperProve2Me Team
SKILL.mdTourFAQContactTerms
© 2026 Prove2Me