Documentation

protocolInfoBinary :: forall m blk1 blk2. ( CanHardFork '[blk1, blk2], Monad m) => ProtocolInfo m blk1 -> EraParams -> ( ConsensusConfig ( BlockProtocol blk1) -> PartialConsensusConfig ( BlockProtocol blk1)) -> ( LedgerConfig blk1 -> PartialLedgerConfig blk1) -> ProtocolInfo m blk2 -> EraParams -> ( ConsensusConfig ( BlockProtocol blk2) -> PartialConsensusConfig ( BlockProtocol blk2)) -> ( LedgerConfig blk2 -> PartialLedgerConfig blk2) -> ProtocolInfo m ( HardForkBlock '[blk1, blk2]) Source #