We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 33b7ff0 commit 0707414Copy full SHA for 0707414
src/Ledger/PParams.lagda
@@ -149,6 +149,22 @@ record PParams : Type where
149
drepDeposit : Coin
150
drepActivity : Epoch
151
\end{code}
152
+\emph{Security group}
153
+\begin{code}
154
+SecurityGroupParams : PParams → ℕ × ℕ × ℕ × ℕ × ExUnits × ℕ × ℕ × ℚ × ℕ × ℕ
155
+SecurityGroupParams pp = maxBlockSize
156
+ , maxTxSize
157
+ , maxHeaderSize
158
+ , maxValSize
159
+ , maxBlockExUnits
160
+ , a
161
+ , b
162
+ , minFeeRefScriptCoinsPerByte
163
+ , coinsPerUTxOByte
164
+ , govActionDeposit
165
+ where
166
+ open PParams pp
167
+\end{code}
168
\end{AgdaMultiCode}
169
\caption{Protocol parameter definitions}
170
\label{fig:protocol-parameter-declarations}
0 commit comments