Let 𝑏∈{𝖴𝗇𝗂𝗍,𝖡𝗈𝗈𝗅,𝖨𝗇𝗍,𝖲𝗍𝗋𝗂𝗇𝗀}. The ambient local algebra and its positive and negative sublanguages are 𝑇::=𝑏∣𝛼∣⊥∣⊤∣𝑇∨𝑇∣𝑇∧𝑇∣𝑇→𝑇∣𝜇𝛼.𝑇,𝑃::=⊥∣𝑏+∣𝛼+∣𝑃∨𝑃∣𝑁→𝑃∣𝜇𝛼.𝑃,𝑁::=⊤∣𝑏−∣𝛼−∣𝑁∧𝑁∣𝑃→𝑁∣𝜇𝛼.𝑁. The four atoms are primitive nullary heads. A general lambda-lifted scheme is [Δ]𝑇; a polar scheme is [Δ−]𝑃+, with negative environment entries. For some type substitution 𝜌, scheme subsumption is [Δ]𝑇≤∀[Δ′]𝑇′⟺dom(Δ)⊆dom(Δ′),Δ′(𝑥)≤𝖺𝜌(Δ(𝑥)),𝜌(𝑇)≤𝖺𝑇′, where the middle condition ranges over 𝑥∈dom(Δ). The declarative rules are
Π(̂𝑥)=𝑆
Π⊢0̂𝑥:𝑆
Var-Let
𝛼∉𝖥𝖵(Π)
Π⊢0𝑥:[𝑥:𝛼]𝛼
Var-Lam
Π⊢0𝑒:[Δ]𝑇
Π⊢0𝜆𝑥.𝑒:[Δ𝑥](Δ(𝑥)→𝑇)
Abs
Π⊢0𝑒1:[Δ](𝑇1→𝑇2)Π⊢0𝑒2:[Δ]𝑇1
Π⊢0𝑒1𝑒2:[Δ]𝑇2
App
Π⊢0𝑒1:[Δ1]𝑇1Π,̂𝑥:[Δ1]𝑇1⊢0𝑒2:[Δ2]𝑇2
Π⊢0𝗅𝖾𝗍̂𝑥=𝑒1𝗂𝗇𝑒2:[Δ1∧Δ2]𝑇2
Let
Π⊢0():[]𝖴𝗇𝗂𝗍
Unit
𝑞∈{𝗍𝗋𝗎𝖾,𝖿𝖺𝗅𝗌𝖾}
Π⊢0𝑞:[]𝖡𝗈𝗈𝗅
Bool
Π⊢0𝑒0:[Δ]𝖡𝗈𝗈𝗅Π⊢0𝑒1:[Δ]𝑇Π⊢0𝑒2:[Δ]𝑇
Π⊢0𝗂𝖿𝑒0𝗍𝗁𝖾𝗇𝑒1𝖾𝗅𝗌𝖾𝑒2:[Δ]𝑇
If
Π⊢0𝑒:𝑆𝑆≤∀𝑆′
Π⊢0𝑒:𝑆′
Sub
No record encoding transfers a theorem to this calculus. The decisive decomposer equations are 𝗌𝗎𝖻𝖡0((𝑁1→𝑃1)≤𝖺(𝑃2→𝑁2))={𝑃2≤𝖺𝑁1,𝑃1≤𝖺𝑁2},𝗌𝗎𝖻𝖡0((𝑃1∨𝑃2)≤𝖺𝑁)={𝑃1≤𝖺𝑁,𝑃2≤𝖺𝑁},𝗌𝗎𝖻𝖡0(𝑃≤𝖺(𝑁1∧𝑁2))={𝑃≤𝖺𝑁1,𝑃≤𝖺𝑁2},𝗌𝗎𝖻𝖡0(⊥≤𝖺𝑁)=∅,𝗌𝗎𝖻𝖡0(𝑃≤𝖺⊤)=∅,𝗌𝗎𝖻𝖡0(𝑏+≤𝖺𝑏−)=∅. The two 𝜇-cases unfold one side; unequal rigid heads are undefined. Atomic rules apply [𝑁∧𝛼/𝛼−,𝛼/𝛼+]to𝛼≤𝖺𝑁,[𝛼/𝛼−,𝑃∨𝛼/𝛼+]to𝑃≤𝖺𝛼, with the guarded recursive actions (19.3). The recursive work list is 𝖡0(𝐻;∅)=𝗂𝖽,𝖡0(𝐻;𝑐,𝐶)=𝖡0(𝐻;𝐶)𝑐∈𝐻,𝖡0(𝐻;𝛼≤𝖺𝑁,𝐶)=𝖡0(𝜃𝐻;𝜃𝐶)∘𝜃,𝜃=𝜃𝛼≤𝖺𝑁,𝖡0(𝐻;𝑃≤𝖺𝛼,𝐶)=𝖡0(𝜃𝐻;𝜃𝐶)∘𝜃,𝜃=𝜃𝑃≤𝖺𝛼,𝖡0(𝐻;𝑐,𝐶)=𝖡0(𝐻∪{𝑐};𝗌𝗎𝖻𝖡0(𝑐),𝐶)𝗌𝗎𝖻𝖡0(𝑐)defined. The reflexive atomic case is deleted before the two elimination equations. The syntax-tree function is partial. The finite local automaton procedure ̂𝖡0 visits positive–negative state pairs, realizes atomic actions by graph merging, and is the terminating solver used by theorem 19.13. Equations (19.8)–(19.12) give the complete structural definition of 𝖯0. Nonrecursive atomic instance preservation is lemma 19.6; guarded recursive preservation is lemma 19.7.