(**************************************************************************) (* *) (* Copyright (c) 2014 - 2018. *) (* Dynamic Ledger Solutions, Inc. *) (* *) (* All rights reserved. No warranty, explicit or implicit, provided. *) (* *) (**************************************************************************) type chain = Chain_services.chain type block = Block_services.block module Chain = Chain_services module Blocks = Chain.Blocks module Invalid_blocks = Chain.Invalid_blocks module Mempool = Chain.Mempool module Protocol = Protocol_services module Monitor = Monitor_services module Injection = Injection_services module P2p = P2p_services module Worker = Worker_services