fix docs to reflect changes to certs rule

Author: williamdemeo

build-tools/static/md/mkdocs/includes/links.md

@@ -6,9 +6,9 @@
 [Auxiliary POOL transition system]: Ledger.Conway.Specification.Certs.md#auxiliary-pool-transition-system
 [Calculation of Fees for Reference Scripts]: Ledger.Conway.Specification.Fees.md#sec:calculation-of-fees
 [Cardano Staking: How To Stake ADA]: https://www.ledger.com/academy/cardano-staking-how-to-stake-ada
-[CERT]: Ledger.Conway.Specification.Certs.md#certs-rules
-[CERTS]: Ledger.Conway.Specification.Certs.md#certs-rules
-[CERTS rules]: Ledger.Conway.Specification.Certs.md#certs-rules
+[CERT]: Ledger.Conway.Specification.Certs.md#sec:the-certs-transition-system
+[CERTS]: Ledger.Conway.Specification.Certs.md#sec:the-certs-transition-system
+[CERTS rules]: Ledger.Conway.Specification.Certs.md#sec:the-certs-transition-system
 [CHAIN]: Ledger.Conway.Specification.Chain.md#chain-transition-system
 [DELEG]: Ledger.Conway.Specification.Certs.md#auxiliary-deleg-transition-system
 [ENACT]: Ledger.Conway.Specification.Enact.md#enact-transition-system

src/Ledger/Conway/Specification/Certs.lagda.md

@@ -504,7 +504,7 @@ data _⊢_⇀⦇_,GOVCERT⦈_ : CertEnv → GState → DCert → GState → Type
       ⟦ e , pp , vs , wdrls , cc ⟧ ⊢ ⟦ dReps , ccKeys ⟧ ⇀⦇ ccreghot c mc ,GOVCERT⦈ ⟦ dReps , ❴ c , mc ❵ ∪ˡ ccKeys ⟧
 ```
 
-## The <span class="AgdaDatatype">CERTS</span> Transition System
+## The <span class="AgdaDatatype">CERTS</span> Transition System {#sec:the-certs-transition-system}
 
 This section culminates in the definition of the `CERTS`{.AgdaDatatype} transition
 system by bundling previously defined pieces together into a
@@ -532,19 +532,27 @@ data _⊢_⇀⦇_,CERT⦈_  : CertEnv → CertState → DCert → CertState →
       Γ ⊢ ⟦ stᵈ , stᵖ , stᵍ ⟧ ⇀⦇ dCert ,CERT⦈ ⟦ stᵈ , stᵖ , stᵍ' ⟧
 ```
 
-### The <span class="AgdaFunction">CERTBASE</span> Function
+### The <span class="AgdaFunction">PRE-CERT</span> Transition Rule
 
-Here we define the `CERTBASE`{.AgdaFunction} function which handles the following
+Here we define the `PRE-CERT`{.AgdaDatatype} transition rule.  This rule is applied
+at the start of the `CERTS`{.AgdaDatatype} transition rule and handles the following
 important housekeeping tasks:
 
 +  check the correctness of withdrawals and ensure that withdrawals only
    happen from credentials that have delegated their voting power;
 
-+  set the rewards of the credentials that withdrew funds to zero;
-
-+  and set the activity timer of all `DRep`{.AgdaInductiveConstructor}s that voted
++  set the activity timer of all `DRep`{.AgdaInductiveConstructor}s that voted
    to `drepActivity`{.AgdaField} epochs in the future.
 
++  set the rewards of the credentials that withdrew funds to zero.
+
+Regarding the second item, if there is a new governance proposal to vote on in this transaction,
+then expiry for all `DReps`{.AgdaInductiveConstructor} will be increased by
+the number of dormant epochs.  However, the `PRE-CERT`{.AgdaDatatype} transition occurs in
+`LEDGER`{.AgdaDatatype} *before* the `GOV`{.AgdaDatatype} rule, so it cannot validate
+any governance proposal.  This is not a problem since the entire transaction will
+fail if the proposal is not accepted in the `GOV`{.AgdaDatatype} rule.
+
 <!--
 ```agda
 open GovVote using (voter)
@@ -565,14 +573,22 @@ data _⊢_⇀⦇_,PRE-CERT⦈_ : CertEnv → CertState → ⊤ → CertState →
       ⟦ e , pp , vs , wdrls , cc ⟧ ⊢ ⟦ ⟦ voteDelegs , stakeDelegs , rewards ⟧ , stᵖ , ⟦ dReps , ccHotKeys ⟧ ⟧
       ⇀⦇ _ ,PRE-CERT⦈
       ⟦ ⟦ voteDelegs , stakeDelegs , constMap wdrlCreds 0 ∪ˡ rewards ⟧ , stᵖ , ⟦ refreshedDReps , ccHotKeys ⟧ ⟧
+```
 
+### The <span class="AgdaFunction">POST-CERT</span> Transition Rule
+
+The `POST-CERT`{.AgdaFunction} transition rule is applied at the end of the
+`CERTS`{.AgdaDatatype} rule and it ensures that only valid registered
+`DReps`{.AgdaInductiveConstructor} are included in the final `CertState`{.AgdaRecord}.
+
+```agda
 data _⊢_⇀⦇_,POST-CERT⦈_ : CertEnv → CertState → ⊤ → CertState → Type where
 
   CERT-post :
     ⟦ e , pp , vs , wdrls , cc ⟧
     ⊢ ⟦ ⟦ voteDelegs , stakeDelegs , rewards ⟧ , stᵖ , stᵍ ⟧
       ⇀⦇ _ ,POST-CERT⦈
-      ⟦ ⟦ voteDelegs ∣^ (  mapˢ vDelegCredential (dom (GState.dreps stᵍ)) ∪ fromList (vDelegNoConfidence ∷ vDelegAbstain ∷ []) )
+      ⟦ ⟦ voteDelegs ∣^ (  mapˢ vDelegCredential (dom (DRepsOf stᵍ)) ∪ fromList (vDelegNoConfidence ∷ vDelegAbstain ∷ []) )
         , stakeDelegs , rewards ⟧ , stᵖ , stᵍ ⟧
 
 _⊢_⇀⦇_,CERTS⦈_  : CertEnv → CertState  → List DCert  → CertState  → Type