feat: export EraBoundTime, EpochSlotLength and change cost model …

…representation to `[Int64]` from `[Natural]`

src/Maestro/Types/V1/General.hs

@@ -8,6 +8,8 @@ module Maestro.Types.V1.General
   , EraSummary (..)
   , EraParameters (..)
   , EraBound (..)
+  , EraBoundTime (..)
+  , EpochSlotLength (..)
     -- * Types for @/protocol-parameters@ endpoint
   , ProtocolVersion (..)
   , MemoryCpuWith (..)
@@ -26,6 +28,7 @@ module Maestro.Types.V1.General
 import           Control.Monad           (unless, when)
 import           Data.Aeson              (FromJSON (parseJSON), toEncoding,
                                           toJSON, withText)
+import           Data.Int                (Int64)
 import           Data.Ratio              (denominator, numerator, (%))
 import           Data.Text               (Text)
 import qualified Data.Text               as Txt
@@ -171,7 +174,7 @@ data MemoryCpuWith i = MemoryCpuWith
   deriving (FromJSON, ToJSON) via CustomJSON '[FieldLabelModifier '[StripPrefix "memoryCpuWith", LowerFirst]] (MemoryCpuWith i)
 
 -- | A cost model is a vector of coefficients that are used to compute the execution units required to execute a script. Its specifics depend on specific versions of the Plutus interpreter it is used with.
-newtype CostModel = CostModel [Natural]
+newtype CostModel = CostModel [Int64]
   deriving (Eq, Show)
   deriving newtype (ToJSON, FromJSON)