module Hydra.Cardano.Api.Network ( Network (..), networkIdToNetwork, ) where import Cardano.Api qualified as Api import Cardano.Ledger.BaseTypes (Network (..)) networkIdToNetwork :: Api.NetworkId -> Network networkIdToNetwork :: NetworkId -> Network networkIdToNetwork NetworkId Api.Mainnet = Network Mainnet networkIdToNetwork (Api.Testnet NetworkMagic _) = Network Testnet