diff --git a/.vs/DeskHubSharp/v15/.suo b/.vs/DeskHubSharp/v15/.suo
index a339b7b..54a069b 100644
Binary files a/.vs/DeskHubSharp/v15/.suo and b/.vs/DeskHubSharp/v15/.suo differ
diff --git a/DeskHubSharp.Models/Email.fs b/DeskHubSharp.Models/Email.fs
index 0733936..589dc59 100644
--- a/DeskHubSharp.Models/Email.fs
+++ b/DeskHubSharp.Models/Email.fs
@@ -1,6 +1,6 @@
 namespace DeskHubSharp.Models
 
-    type EmailModel(fromEmail: string, toEmail: string, password: string) = 
-            member x.FromEmail = "wjmiller2016@gmail.com"
-            member x.ToEmail = "wjmiller2016@gmail.com"
-            member x.Password = "password"
+    type EmailModel() = 
+            member this.FromEmail = "wjmiller2016@gmail.com"
+            member this.ToEmail = "wjmiller2016@gmail.com"
+            member this.Password = "password"
diff --git a/DeskHubSharp.Models/Error.fs b/DeskHubSharp.Models/Error.fs
new file mode 100644
index 0000000..19f1302
--- /dev/null
+++ b/DeskHubSharp.Models/Error.fs
@@ -0,0 +1,3 @@
+module Error
+
+// This file is to test out file IO and exceptions
\ No newline at end of file
diff --git a/DeskHubSharp.Models/Math.fs b/DeskHubSharp.Models/Math.fs
new file mode 100644
index 0000000..a30b875
--- /dev/null
+++ b/DeskHubSharp.Models/Math.fs
@@ -0,0 +1,9 @@
+module Math
+
+let addOne x = x + 1
+
+let square x = x * x
+
+let slash x = x / x
+
+let recursive x = 1 / x
\ No newline at end of file
diff --git a/DeskHubSharp.Models/Opener.fs b/DeskHubSharp.Models/Opener.fs
new file mode 100644
index 0000000..863e5d4
--- /dev/null
+++ b/DeskHubSharp.Models/Opener.fs
@@ -0,0 +1,15 @@
+module Opener
+
+open System.IO
+open System.Diagnostics
+
+let file =
+    try 
+        use file = File.OpenRead "config.xml"
+        Some <| file.Read
+    with
+        :? FileNotFoundException as ex ->
+        printfn "%s was not found. Does it exist?" ex.FileName
+        None
+        _ -> printfn "Error loading file..."
+        reraise()