cardano-ledger-test-9.9.9.9: Testing harness, tests and benchmarks for Shelley style cardano ledgers
Safe HaskellSafe-Inferred
LanguageHaskell2010

Test.Cardano.Ledger.Constrained.Conway.TxBodySpec

Synopsis

Documentation

subMap ∷ (Ord k, IsNormalType v, HasSpec fn k, HasSpec fn v) ⇒ Specification fn (Map k v, Map k v) Source #

subMapSubDependsOnSuper ∷ (Ord k, IsNormalType v, HasSpec fn k, HasSpec fn v) ⇒ Term fn (Map k v) → Term fn (Map k v) → Pred fn Source #

subMapSuperDependsOnSub ∷ (Ord k, IsNormalType v, HasSpec fn k, HasSpec fn v) ⇒ Term fn (Map k v) → Term fn (Map k v) → Pred fn Source #

putPrettyPrettyA t ⇒ [Char] → t → IO () Source #

test1IO () Source #

test2IO () Source #

bodyspec ∷ ∀ era fn. (EraSpecTxOut era fn, EraSpecCert era fn) ⇒ UTxO era → CertsEnv era → CertState era → Specification fn (ShelleyTxBody era, Map (TxIn (EraCrypto era)) (TxOut era), TxIn (EraCrypto era)) Source #

seqToListIsConwayUniv fn ⇒ HasSpec fn t ⇒ Specification fn (Seq t, [t]) Source #

testUTxO ∷ ∀ era. (Era era, HasSpec ConwayFn (TxOut era)) ⇒ IO (Map (TxIn (EraCrypto era)) (TxOut era)) Source #

go ∷ ∀ era. (EraSpecTxOut era ConwayFn, EraSpecCert era ConwayFn, HasSpec ConwayFn (Tx era)) ⇒ IO () Source #

Exercise the bodyspec

sumCoin_ ∷ ∀ fn era. EraSpecTxOut era fn ⇒ Term fn [TxOut era] → Term fn Coin Source #

bodyspec2 ∷ ∀ era fn. (EraSpecTxOut era fn, EraSpecCert era fn) ⇒ CertsEnv era → CertState era → Specification fn (ShelleyTxBody era, Map (TxIn (EraCrypto era)) (TxOut era), TxIn (EraCrypto era)) Source #

bazEraTxOut era ⇒ TxOut era → TxOut era Source #

go2 ∷ ∀ era. (EraSpecTxOut era ConwayFn, EraSpecCert era ConwayFn, HasSpec ConwayFn (Tx era)) ⇒ IO () Source #