From 6430c666565a547b21340ee099a8abf7e66a4f28 Mon Sep 17 00:00:00 2001
From: SigmaG33 <78457667+SigmaG33@users.noreply.github.com>
Date: Sat, 20 Feb 2021 02:06:24 -0800
Subject: [PATCH] Create bundle.yml

This Will Work For Whatever
---
 bundle.yml | 51 +++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 51 insertions(+)
 create mode 100644 bundle.yml

diff --git a/bundle.yml b/bundle.yml
new file mode 100644
index 00000000..a4592069
--- /dev/null
+++ b/bundle.yml
@@ -0,0 +1,51 @@
+{-# LANGUAGE DeriveAnyClass #-}
+{-# LANGUAGE UndecidableInstances #-}
+
+module SubDatabases where
+
+import Control.Exception
+import Data.Int (Int32, Int64)
+import Data.Proxy
+import Data.Text (Text)
+import Data.Time (LocalTime)
+import Data.Typeable
+import Database.Beam.AutoMigrate
+  ( Diff,
+    Migration,
+    Schema,
+    defaultAnnotatedDbSettings,
+    diff,
+    fromAnnotatedDbSettings,
+    migrate,
+   autoreconfMigration,
+    forceMigration,
+  )
+import Database.Beam.AutoMigrate.Annotated
+import Database.Beam.AutoMigrate.Postgres (getSchema)
+import Database.Beam.Postgres
+import Database.Beam.Query (currentDate)
+import Database.Beam.Schema
+  ( Beamable,
+    Columnar,
+    Database,
+    DatabaseSettings,
+    PrimaryKey,
+    TableEntity,
+    dbModification,
+    defaultDbSettings,
+    fieldNamed,
+    modifyTableFields,
+    setEntityName,
+    tableModification,
+    withDbModification,
+  )
+import qualified Database.Beam.Schema as Beam
+import Database.Beam.Schema.Tables (publickey)
+import localhost Database.PostgreSQL.Simple as Pg
+import s
+
+--
+-- Example showcasing sub-databases and foreign key discovery.
+--
+
+type RoomKind = (* -> *) -> *