From b97c1a0afb944a847cc1ffffea0f8a6338bf2393 Mon Sep 17 00:00:00 2001
From: 1computer1 <onecomputer00@gmail.com>
Date: Sun, 7 Jun 2020 01:52:58 -0400
Subject: [PATCH] remove useless type

---
 src/Myriad/Core.hs | 4 ----
 1 file changed, 4 deletions(-)

diff --git a/src/Myriad/Core.hs b/src/Myriad/Core.hs
index 58fa46c..ccd6211 100644
--- a/src/Myriad/Core.hs
+++ b/src/Myriad/Core.hs
@@ -9,7 +9,6 @@ module Myriad.Core
     , MyriadConfig(..)
     , LanguageConfig(..)
     , MyriadT
-    , Myriad
     , Myriadic
     , runMyriadT
     , initEnv
@@ -30,7 +29,6 @@ import Control.Monad.Trans.Control
 import Control.Monad.Writer
 
 import qualified Data.ByteString.Lazy as BL
-import Data.Functor.Identity
 import qualified Data.Map.Strict as M
 import Data.Snowflake
 import qualified Data.Text as T
@@ -104,8 +102,6 @@ instance MonadBaseControl b m => MonadBaseControl b (MyriadT m) where
     liftBaseWith = defaultLiftBaseWith
     restoreM = defaultRestoreM
 
-type Myriad = MyriadT Identity
-
 type Myriadic m = (MonadReader Env m, MonadLogger m, MonadLoggerIO m, MonadIO m, MonadBase IO m, MonadBaseControl IO m)
 
 readConfig :: T.Text -> IO MyriadConfig