diff --git a/.fantomasignore b/.fantomasignore
new file mode 100644
index 0000000..9b42106
--- /dev/null
+++ b/.fantomasignore
@@ -0,0 +1 @@
+.direnv/
diff --git a/PureGym/GeneratedClient.fs b/PureGym/GeneratedClient.fs
index 8110c6d..1b95858 100644
--- a/PureGym/GeneratedClient.fs
+++ b/PureGym/GeneratedClient.fs
@@ -19,214 +19,214 @@ open RestEase
 [<RequireQualifiedAccess>]
 module PureGymApi =
     /// Create a REST client. The input functions will be re-evaluated on every HTTP request to obtain the required values for the corresponding header properties.
-    let make (authHeader: unit -> string) (client: System.Net.Http.HttpClient) : IPureGymApi =
+    let make (authHeader : unit -> string) (client : System.Net.Http.HttpClient) : IPureGymApi =
         { new IPureGymApi with
-            member _.AuthHeader: string = authHeader ()
+            member _.AuthHeader : string = authHeader ()
 
-            member this.GetGyms(ct: CancellationToken option) =
+            member this.GetGyms (ct : CancellationToken option) =
                 async {
                     let! ct = Async.CancellationToken
 
                     let uri =
-                        System.Uri(
+                        System.Uri (
                             (match client.BaseAddress with
                              | null -> System.Uri "https://capi.puregym.com/api/"
                              | v -> v),
-                            System.Uri("v1/gyms/", System.UriKind.Relative)
+                            System.Uri ("v1/gyms/", System.UriKind.Relative)
                         )
 
                     let httpMessage =
-                        new System.Net.Http.HttpRequestMessage(
+                        new System.Net.Http.HttpRequestMessage (
                             Method = System.Net.Http.HttpMethod.Get,
                             RequestUri = uri
                         )
 
-                    do httpMessage.Headers.Add("Authorization", this.AuthHeader.ToString())
-                    do httpMessage.Headers.Add("User-Agent", "PureGym/1523 CFNetwork/1312 Darwin/21.0.0")
-                    let! response = client.SendAsync(httpMessage, ct) |> Async.AwaitTask
-                    let response = response.EnsureSuccessStatusCode()
+                    do httpMessage.Headers.Add ("Authorization", this.AuthHeader.ToString ())
+                    do httpMessage.Headers.Add ("User-Agent", "PureGym/1523 CFNetwork/1312 Darwin/21.0.0")
+                    let! response = client.SendAsync (httpMessage, ct) |> Async.AwaitTask
+                    let response = response.EnsureSuccessStatusCode ()
                     let! responseStream = response.Content.ReadAsStreamAsync ct |> Async.AwaitTask
 
                     let! jsonNode =
-                        System.Text.Json.Nodes.JsonNode.ParseAsync(responseStream, cancellationToken = ct)
+                        System.Text.Json.Nodes.JsonNode.ParseAsync (responseStream, cancellationToken = ct)
                         |> Async.AwaitTask
 
-                    return jsonNode.AsArray() |> Seq.map (fun elt -> Gym.jsonParse elt) |> List.ofSeq
+                    return jsonNode.AsArray () |> Seq.map (fun elt -> Gym.jsonParse elt) |> List.ofSeq
                 }
-                |> (fun a -> Async.StartAsTask(a, ?cancellationToken = ct))
+                |> (fun a -> Async.StartAsTask (a, ?cancellationToken = ct))
 
-            member this.GetMember(ct: CancellationToken option) =
+            member this.GetMember (ct : CancellationToken option) =
                 async {
                     let! ct = Async.CancellationToken
 
                     let uri =
-                        System.Uri(
+                        System.Uri (
                             (match client.BaseAddress with
                              | null -> System.Uri "https://capi.puregym.com/api/"
                              | v -> v),
-                            System.Uri("v1/member", System.UriKind.Relative)
+                            System.Uri ("v1/member", System.UriKind.Relative)
                         )
 
                     let httpMessage =
-                        new System.Net.Http.HttpRequestMessage(
+                        new System.Net.Http.HttpRequestMessage (
                             Method = System.Net.Http.HttpMethod.Get,
                             RequestUri = uri
                         )
 
-                    do httpMessage.Headers.Add("Authorization", this.AuthHeader.ToString())
-                    do httpMessage.Headers.Add("User-Agent", "PureGym/1523 CFNetwork/1312 Darwin/21.0.0")
-                    let! response = client.SendAsync(httpMessage, ct) |> Async.AwaitTask
-                    let response = response.EnsureSuccessStatusCode()
+                    do httpMessage.Headers.Add ("Authorization", this.AuthHeader.ToString ())
+                    do httpMessage.Headers.Add ("User-Agent", "PureGym/1523 CFNetwork/1312 Darwin/21.0.0")
+                    let! response = client.SendAsync (httpMessage, ct) |> Async.AwaitTask
+                    let response = response.EnsureSuccessStatusCode ()
                     let! responseStream = response.Content.ReadAsStreamAsync ct |> Async.AwaitTask
 
                     let! jsonNode =
-                        System.Text.Json.Nodes.JsonNode.ParseAsync(responseStream, cancellationToken = ct)
+                        System.Text.Json.Nodes.JsonNode.ParseAsync (responseStream, cancellationToken = ct)
                         |> Async.AwaitTask
 
                     return Member.jsonParse jsonNode
                 }
-                |> (fun a -> Async.StartAsTask(a, ?cancellationToken = ct))
+                |> (fun a -> Async.StartAsTask (a, ?cancellationToken = ct))
 
-            member this.GetGymAttendance(gymId: int, ct: CancellationToken option) =
+            member this.GetGymAttendance (gymId : int, ct : CancellationToken option) =
                 async {
                     let! ct = Async.CancellationToken
 
                     let uri =
-                        System.Uri(
+                        System.Uri (
                             (match client.BaseAddress with
                              | null -> System.Uri "https://capi.puregym.com/api/"
                              | v -> v),
-                            System.Uri(
+                            System.Uri (
                                 "v1/gyms/{gym_id}/attendance"
-                                    .Replace("{gym_id}", gymId.ToString() |> System.Web.HttpUtility.UrlEncode),
+                                    .Replace ("{gym_id}", gymId.ToString () |> System.Web.HttpUtility.UrlEncode),
                                 System.UriKind.Relative
                             )
                         )
 
                     let httpMessage =
-                        new System.Net.Http.HttpRequestMessage(
+                        new System.Net.Http.HttpRequestMessage (
                             Method = System.Net.Http.HttpMethod.Get,
                             RequestUri = uri
                         )
 
-                    do httpMessage.Headers.Add("Authorization", this.AuthHeader.ToString())
-                    do httpMessage.Headers.Add("User-Agent", "PureGym/1523 CFNetwork/1312 Darwin/21.0.0")
-                    let! response = client.SendAsync(httpMessage, ct) |> Async.AwaitTask
-                    let response = response.EnsureSuccessStatusCode()
+                    do httpMessage.Headers.Add ("Authorization", this.AuthHeader.ToString ())
+                    do httpMessage.Headers.Add ("User-Agent", "PureGym/1523 CFNetwork/1312 Darwin/21.0.0")
+                    let! response = client.SendAsync (httpMessage, ct) |> Async.AwaitTask
+                    let response = response.EnsureSuccessStatusCode ()
                     let! responseStream = response.Content.ReadAsStreamAsync ct |> Async.AwaitTask
 
                     let! jsonNode =
-                        System.Text.Json.Nodes.JsonNode.ParseAsync(responseStream, cancellationToken = ct)
+                        System.Text.Json.Nodes.JsonNode.ParseAsync (responseStream, cancellationToken = ct)
                         |> Async.AwaitTask
 
                     return GymAttendance.jsonParse jsonNode
                 }
-                |> (fun a -> Async.StartAsTask(a, ?cancellationToken = ct))
+                |> (fun a -> Async.StartAsTask (a, ?cancellationToken = ct))
 
-            member this.GetGym(gymId: int, ct: CancellationToken option) =
+            member this.GetGym (gymId : int, ct : CancellationToken option) =
                 async {
                     let! ct = Async.CancellationToken
 
                     let uri =
-                        System.Uri(
+                        System.Uri (
                             (match client.BaseAddress with
                              | null -> System.Uri "https://capi.puregym.com/api/"
                              | v -> v),
-                            System.Uri(
+                            System.Uri (
                                 "v1/gyms/{gym_id}"
-                                    .Replace("{gym_id}", gymId.ToString() |> System.Web.HttpUtility.UrlEncode),
+                                    .Replace ("{gym_id}", gymId.ToString () |> System.Web.HttpUtility.UrlEncode),
                                 System.UriKind.Relative
                             )
                         )
 
                     let httpMessage =
-                        new System.Net.Http.HttpRequestMessage(
+                        new System.Net.Http.HttpRequestMessage (
                             Method = System.Net.Http.HttpMethod.Get,
                             RequestUri = uri
                         )
 
-                    do httpMessage.Headers.Add("Authorization", this.AuthHeader.ToString())
-                    do httpMessage.Headers.Add("User-Agent", "PureGym/1523 CFNetwork/1312 Darwin/21.0.0")
-                    let! response = client.SendAsync(httpMessage, ct) |> Async.AwaitTask
-                    let response = response.EnsureSuccessStatusCode()
+                    do httpMessage.Headers.Add ("Authorization", this.AuthHeader.ToString ())
+                    do httpMessage.Headers.Add ("User-Agent", "PureGym/1523 CFNetwork/1312 Darwin/21.0.0")
+                    let! response = client.SendAsync (httpMessage, ct) |> Async.AwaitTask
+                    let response = response.EnsureSuccessStatusCode ()
                     let! responseStream = response.Content.ReadAsStreamAsync ct |> Async.AwaitTask
 
                     let! jsonNode =
-                        System.Text.Json.Nodes.JsonNode.ParseAsync(responseStream, cancellationToken = ct)
+                        System.Text.Json.Nodes.JsonNode.ParseAsync (responseStream, cancellationToken = ct)
                         |> Async.AwaitTask
 
                     return Gym.jsonParse jsonNode
                 }
-                |> (fun a -> Async.StartAsTask(a, ?cancellationToken = ct))
+                |> (fun a -> Async.StartAsTask (a, ?cancellationToken = ct))
 
-            member this.GetMemberActivity(ct: CancellationToken option) =
+            member this.GetMemberActivity (ct : CancellationToken option) =
                 async {
                     let! ct = Async.CancellationToken
 
                     let uri =
-                        System.Uri(
+                        System.Uri (
                             (match client.BaseAddress with
                              | null -> System.Uri "https://capi.puregym.com/api/"
                              | v -> v),
-                            System.Uri("v1/member/activity", System.UriKind.Relative)
+                            System.Uri ("v1/member/activity", System.UriKind.Relative)
                         )
 
                     let httpMessage =
-                        new System.Net.Http.HttpRequestMessage(
+                        new System.Net.Http.HttpRequestMessage (
                             Method = System.Net.Http.HttpMethod.Get,
                             RequestUri = uri
                         )
 
-                    do httpMessage.Headers.Add("Authorization", this.AuthHeader.ToString())
-                    do httpMessage.Headers.Add("User-Agent", "PureGym/1523 CFNetwork/1312 Darwin/21.0.0")
-                    let! response = client.SendAsync(httpMessage, ct) |> Async.AwaitTask
-                    let response = response.EnsureSuccessStatusCode()
+                    do httpMessage.Headers.Add ("Authorization", this.AuthHeader.ToString ())
+                    do httpMessage.Headers.Add ("User-Agent", "PureGym/1523 CFNetwork/1312 Darwin/21.0.0")
+                    let! response = client.SendAsync (httpMessage, ct) |> Async.AwaitTask
+                    let response = response.EnsureSuccessStatusCode ()
                     let! responseStream = response.Content.ReadAsStreamAsync ct |> Async.AwaitTask
 
                     let! jsonNode =
-                        System.Text.Json.Nodes.JsonNode.ParseAsync(responseStream, cancellationToken = ct)
+                        System.Text.Json.Nodes.JsonNode.ParseAsync (responseStream, cancellationToken = ct)
                         |> Async.AwaitTask
 
                     return MemberActivityDto.jsonParse jsonNode
                 }
-                |> (fun a -> Async.StartAsTask(a, ?cancellationToken = ct))
+                |> (fun a -> Async.StartAsTask (a, ?cancellationToken = ct))
 
-            member this.GetSessions(fromDate: DateOnly, toDate: DateOnly, ct: CancellationToken option) =
+            member this.GetSessions (fromDate : DateOnly, toDate : DateOnly, ct : CancellationToken option) =
                 async {
                     let! ct = Async.CancellationToken
 
                     let uri =
-                        System.Uri(
+                        System.Uri (
                             (match client.BaseAddress with
                              | null -> System.Uri "https://capi.puregym.com/api/"
                              | v -> v),
-                            System.Uri(
+                            System.Uri (
                                 ("v2/gymSessions/member"
                                  + "?fromDate="
-                                   + ((fromDate.ToString "yyyy-MM-dd") |> System.Web.HttpUtility.UrlEncode)
-                                   + "&toDate="
-                                   + ((toDate.ToString "yyyy-MM-dd") |> System.Web.HttpUtility.UrlEncode)),
+                                 + ((fromDate.ToString "yyyy-MM-dd") |> System.Web.HttpUtility.UrlEncode)
+                                 + "&toDate="
+                                 + ((toDate.ToString "yyyy-MM-dd") |> System.Web.HttpUtility.UrlEncode)),
                                 System.UriKind.Relative
                             )
                         )
 
                     let httpMessage =
-                        new System.Net.Http.HttpRequestMessage(
+                        new System.Net.Http.HttpRequestMessage (
                             Method = System.Net.Http.HttpMethod.Get,
                             RequestUri = uri
                         )
 
-                    do httpMessage.Headers.Add("Authorization", this.AuthHeader.ToString())
-                    do httpMessage.Headers.Add("User-Agent", "PureGym/1523 CFNetwork/1312 Darwin/21.0.0")
-                    let! response = client.SendAsync(httpMessage, ct) |> Async.AwaitTask
-                    let response = response.EnsureSuccessStatusCode()
+                    do httpMessage.Headers.Add ("Authorization", this.AuthHeader.ToString ())
+                    do httpMessage.Headers.Add ("User-Agent", "PureGym/1523 CFNetwork/1312 Darwin/21.0.0")
+                    let! response = client.SendAsync (httpMessage, ct) |> Async.AwaitTask
+                    let response = response.EnsureSuccessStatusCode ()
                     let! responseStream = response.Content.ReadAsStreamAsync ct |> Async.AwaitTask
 
                     let! jsonNode =
-                        System.Text.Json.Nodes.JsonNode.ParseAsync(responseStream, cancellationToken = ct)
+                        System.Text.Json.Nodes.JsonNode.ParseAsync (responseStream, cancellationToken = ct)
                         |> Async.AwaitTask
 
                     return Sessions.jsonParse jsonNode
                 }
-                |> (fun a -> Async.StartAsTask(a, ?cancellationToken = ct)) }
-
+                |> (fun a -> Async.StartAsTask (a, ?cancellationToken = ct))
+        }
diff --git a/PureGym/GeneratedDto.fs b/PureGym/GeneratedDto.fs
index e17c915..f81c848 100644
--- a/PureGym/GeneratedDto.fs
+++ b/PureGym/GeneratedDto.fs
@@ -12,34 +12,36 @@ namespace PureGym
 [<CompilationRepresentation(CompilationRepresentationFlags.ModuleSuffix)>]
 module GymOpeningHours =
     /// Parse from a JSON node.
-    let jsonParse (node: System.Text.Json.Nodes.JsonNode) : GymOpeningHours =
+    let jsonParse (node : System.Text.Json.Nodes.JsonNode) : GymOpeningHours =
         let OpeningHours =
             (match node.["openingHours"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("openingHours")
                      )
                  )
              | v -> v)
-                .AsArray()
-            |> Seq.map (fun elt -> elt.AsValue().GetValue<string>())
+                .AsArray ()
+            |> Seq.map (fun elt -> elt.AsValue().GetValue<string> ())
             |> List.ofSeq
 
         let IsAlwaysOpen =
             (match node.["isAlwaysOpen"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("isAlwaysOpen")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<bool>()
+                .GetValue<bool> ()
 
-        { IsAlwaysOpen = IsAlwaysOpen
-          OpeningHours = OpeningHours }
+        {
+            IsAlwaysOpen = IsAlwaysOpen
+            OpeningHours = OpeningHours
+        }
 namespace PureGym
 
 /// Module containing JSON parsing methods for the GymAccessOptions type
@@ -47,33 +49,35 @@ namespace PureGym
 [<CompilationRepresentation(CompilationRepresentationFlags.ModuleSuffix)>]
 module GymAccessOptions =
     /// Parse from a JSON node.
-    let jsonParse (node: System.Text.Json.Nodes.JsonNode) : GymAccessOptions =
+    let jsonParse (node : System.Text.Json.Nodes.JsonNode) : GymAccessOptions =
         let QrCodeAccess =
             (match node.["qrCodeAccess"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("qrCodeAccess")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<bool>()
+                .GetValue<bool> ()
 
         let PinAccess =
             (match node.["pinAccess"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("pinAccess")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<bool>()
+                .GetValue<bool> ()
 
-        { PinAccess = PinAccess
-          QrCodeAccess = QrCodeAccess }
+        {
+            PinAccess = PinAccess
+            QrCodeAccess = QrCodeAccess
+        }
 namespace PureGym
 
 /// Module containing JSON parsing methods for the GymLocation type
@@ -81,19 +85,19 @@ namespace PureGym
 [<CompilationRepresentation(CompilationRepresentationFlags.ModuleSuffix)>]
 module GymLocation =
     /// Parse from a JSON node.
-    let jsonParse (node: System.Text.Json.Nodes.JsonNode) : GymLocation =
+    let jsonParse (node : System.Text.Json.Nodes.JsonNode) : GymLocation =
         let Latitude =
             try
                 (match node.["latitude"] with
                  | null ->
                      raise (
-                         System.Collections.Generic.KeyNotFoundException(
+                         System.Collections.Generic.KeyNotFoundException (
                              sprintf "Required key '%s' not found on JSON object" ("latitude")
                          )
                      )
                  | v -> v)
                     .AsValue()
-                    .GetValue<float>()
+                    .GetValue<float> ()
             with :? System.InvalidOperationException as exc ->
                 if exc.Message.Contains "cannot be converted to" then
                     if
@@ -102,13 +106,13 @@ module GymLocation =
                         (match node.["latitude"] with
                          | null ->
                              raise (
-                                 System.Collections.Generic.KeyNotFoundException(
+                                 System.Collections.Generic.KeyNotFoundException (
                                      sprintf "Required key '%s' not found on JSON object" ("latitude")
                                  )
                              )
                          | v -> v)
                             .AsValue()
-                            .GetValue<string>()
+                            .GetValue<string> ()
                         |> System.Double.Parse
                     else
                         reraise ()
@@ -120,13 +124,13 @@ module GymLocation =
                 (match node.["longitude"] with
                  | null ->
                      raise (
-                         System.Collections.Generic.KeyNotFoundException(
+                         System.Collections.Generic.KeyNotFoundException (
                              sprintf "Required key '%s' not found on JSON object" ("longitude")
                          )
                      )
                  | v -> v)
                     .AsValue()
-                    .GetValue<float>()
+                    .GetValue<float> ()
             with :? System.InvalidOperationException as exc ->
                 if exc.Message.Contains "cannot be converted to" then
                     if
@@ -135,21 +139,23 @@ module GymLocation =
                         (match node.["longitude"] with
                          | null ->
                              raise (
-                                 System.Collections.Generic.KeyNotFoundException(
+                                 System.Collections.Generic.KeyNotFoundException (
                                      sprintf "Required key '%s' not found on JSON object" ("longitude")
                                  )
                              )
                          | v -> v)
                             .AsValue()
-                            .GetValue<string>()
+                            .GetValue<string> ()
                         |> System.Double.Parse
                     else
                         reraise ()
                 else
                     reraise ()
 
-        { Longitude = Longitude
-          Latitude = Latitude }
+        {
+            Longitude = Longitude
+            Latitude = Latitude
+        }
 namespace PureGym
 
 /// Module containing JSON parsing methods for the GymAddress type
@@ -157,64 +163,66 @@ namespace PureGym
 [<CompilationRepresentation(CompilationRepresentationFlags.ModuleSuffix)>]
 module GymAddress =
     /// Parse from a JSON node.
-    let jsonParse (node: System.Text.Json.Nodes.JsonNode) : GymAddress =
+    let jsonParse (node : System.Text.Json.Nodes.JsonNode) : GymAddress =
         let Postcode =
             (match node.["postcode"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("postcode")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
 
         let County =
             match node.["county"] with
             | null -> None
-            | v -> v.AsValue().GetValue<string>() |> Some
+            | v -> v.AsValue().GetValue<string> () |> Some
 
         let Town =
             (match node.["town"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("town")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
 
         let AddressLine3 =
             match node.["addressLine3"] with
             | null -> None
-            | v -> v.AsValue().GetValue<string>() |> Some
+            | v -> v.AsValue().GetValue<string> () |> Some
 
         let AddressLine2 =
             match node.["addressLine2"] with
             | null -> None
-            | v -> v.AsValue().GetValue<string>() |> Some
+            | v -> v.AsValue().GetValue<string> () |> Some
 
         let AddressLine1 =
             (match node.["addressLine1"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("addressLine1")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
 
-        { AddressLine1 = AddressLine1
-          AddressLine2 = AddressLine2
-          AddressLine3 = AddressLine3
-          Town = Town
-          County = County
-          Postcode = Postcode }
+        {
+            AddressLine1 = AddressLine1
+            AddressLine2 = AddressLine2
+            AddressLine3 = AddressLine3
+            Town = Town
+            County = County
+            Postcode = Postcode
+        }
 namespace PureGym
 
 /// Module containing JSON parsing methods for the Gym type
@@ -222,30 +230,30 @@ namespace PureGym
 [<CompilationRepresentation(CompilationRepresentationFlags.ModuleSuffix)>]
 module Gym =
     /// Parse from a JSON node.
-    let jsonParse (node: System.Text.Json.Nodes.JsonNode) : Gym =
+    let jsonParse (node : System.Text.Json.Nodes.JsonNode) : Gym =
         let ReopenDate =
             match node.["reopenDate"] with
             | null -> None
-            | v -> v.AsValue().GetValue<string>() |> Some
+            | v -> v.AsValue().GetValue<string> () |> Some
 
         let TimeZone =
             (match node.["timeZone"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("timeZone")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
 
         let Location =
             GymLocation.jsonParse (
                 match node.["location"] with
                 | null ->
                     raise (
-                        System.Collections.Generic.KeyNotFoundException(
+                        System.Collections.Generic.KeyNotFoundException (
                             sprintf "Required key '%s' not found on JSON object" ("location")
                         )
                     )
@@ -257,7 +265,7 @@ module Gym =
                 match node.["accessOptions"] with
                 | null ->
                     raise (
-                        System.Collections.Generic.KeyNotFoundException(
+                        System.Collections.Generic.KeyNotFoundException (
                             sprintf "Required key '%s' not found on JSON object" ("accessOptions")
                         )
                     )
@@ -269,7 +277,7 @@ module Gym =
                 match node.["gymOpeningHours"] with
                 | null ->
                     raise (
-                        System.Collections.Generic.KeyNotFoundException(
+                        System.Collections.Generic.KeyNotFoundException (
                             sprintf "Required key '%s' not found on JSON object" ("gymOpeningHours")
                         )
                     )
@@ -280,32 +288,32 @@ module Gym =
             (match node.["emailAddress"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("emailAddress")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
 
         let PhoneNumber =
             (match node.["phoneNumber"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("phoneNumber")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
 
         let Address =
             GymAddress.jsonParse (
                 match node.["address"] with
                 | null ->
                     raise (
-                        System.Collections.Generic.KeyNotFoundException(
+                        System.Collections.Generic.KeyNotFoundException (
                             sprintf "Required key '%s' not found on JSON object" ("address")
                         )
                     )
@@ -316,49 +324,51 @@ module Gym =
             (match node.["status"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("status")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<int>()
+                .GetValue<int> ()
 
         let Id =
             (match node.["id"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("id")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<int>()
+                .GetValue<int> ()
 
         let Name =
             (match node.["name"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("name")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
 
-        { Name = Name
-          Id = Id
-          Status = Status
-          Address = Address
-          PhoneNumber = PhoneNumber
-          EmailAddress = EmailAddress
-          GymOpeningHours = GymOpeningHours
-          AccessOptions = AccessOptions
-          Location = Location
-          TimeZone = TimeZone
-          ReopenDate = ReopenDate }
+        {
+            Name = Name
+            Id = Id
+            Status = Status
+            Address = Address
+            PhoneNumber = PhoneNumber
+            EmailAddress = EmailAddress
+            GymOpeningHours = GymOpeningHours
+            AccessOptions = AccessOptions
+            Location = Location
+            TimeZone = TimeZone
+            ReopenDate = ReopenDate
+        }
 namespace PureGym
 
 /// Module containing JSON parsing methods for the Member type
@@ -366,203 +376,205 @@ namespace PureGym
 [<CompilationRepresentation(CompilationRepresentationFlags.ModuleSuffix)>]
 module Member =
     /// Parse from a JSON node.
-    let jsonParse (node: System.Text.Json.Nodes.JsonNode) : Member =
+    let jsonParse (node : System.Text.Json.Nodes.JsonNode) : Member =
         let MemberStatus =
             (match node.["memberStatus"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("memberStatus")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<int>()
+                .GetValue<int> ()
 
         let SuspendedReason =
             (match node.["suspendedReason"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("suspendedReason")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<int>()
+                .GetValue<int> ()
 
         let MembershipLevel =
             (match node.["membershipLevel"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("membershipLevel")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<int>()
+                .GetValue<int> ()
 
         let MembershipName =
             (match node.["membershipName"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("membershipName")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
 
         let Postcode =
             (match node.["postCode"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("postCode")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
 
         let MobileNumber =
             (match node.["mobileNumber"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("mobileNumber")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
 
         let DateOfBirth =
             (match node.["dateofBirth"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("dateofBirth")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
             |> System.DateOnly.Parse
 
         let GymAccessPin =
             (match node.["gymAccessPin"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("gymAccessPin")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
 
         let EmailAddress =
             (match node.["emailAddress"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("emailAddress")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
 
         let HomeGymName =
             (match node.["homeGymName"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("homeGymName")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
 
         let HomeGymId =
             (match node.["homeGymId"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("homeGymId")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<int>()
+                .GetValue<int> ()
 
         let LastName =
             (match node.["lastName"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("lastName")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
 
         let FirstName =
             (match node.["firstName"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("firstName")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
 
         let CompoundMemberId =
             (match node.["compoundMemberId"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("compoundMemberId")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
 
         let Id =
             (match node.["id"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("id")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<int>()
+                .GetValue<int> ()
 
-        { Id = Id
-          CompoundMemberId = CompoundMemberId
-          FirstName = FirstName
-          LastName = LastName
-          HomeGymId = HomeGymId
-          HomeGymName = HomeGymName
-          EmailAddress = EmailAddress
-          GymAccessPin = GymAccessPin
-          DateOfBirth = DateOfBirth
-          MobileNumber = MobileNumber
-          Postcode = Postcode
-          MembershipName = MembershipName
-          MembershipLevel = MembershipLevel
-          SuspendedReason = SuspendedReason
-          MemberStatus = MemberStatus }
+        {
+            Id = Id
+            CompoundMemberId = CompoundMemberId
+            FirstName = FirstName
+            LastName = LastName
+            HomeGymId = HomeGymId
+            HomeGymName = HomeGymName
+            EmailAddress = EmailAddress
+            GymAccessPin = GymAccessPin
+            DateOfBirth = DateOfBirth
+            MobileNumber = MobileNumber
+            Postcode = Postcode
+            MembershipName = MembershipName
+            MembershipLevel = MembershipLevel
+            SuspendedReason = SuspendedReason
+            MemberStatus = MemberStatus
+        }
 namespace PureGym
 
 /// Module containing JSON parsing methods for the GymAttendance type
@@ -570,120 +582,122 @@ namespace PureGym
 [<CompilationRepresentation(CompilationRepresentationFlags.ModuleSuffix)>]
 module GymAttendance =
     /// Parse from a JSON node.
-    let jsonParse (node: System.Text.Json.Nodes.JsonNode) : GymAttendance =
+    let jsonParse (node : System.Text.Json.Nodes.JsonNode) : GymAttendance =
         let MaximumCapacity =
             (match node.["maximumCapacity"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("maximumCapacity")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<int>()
+                .GetValue<int> ()
 
         let LastRefreshedPeopleInClasses =
             (match node.["lastRefreshedPeopleInClasses"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("lastRefreshedPeopleInClasses")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
             |> System.DateTime.Parse
 
         let LastRefreshed =
             (match node.["lastRefreshed"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("lastRefreshed")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
             |> System.DateTime.Parse
 
         let AttendanceTime =
             (match node.["attendanceTime"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("attendanceTime")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
             |> System.DateTime.Parse
 
         let IsApproximate =
             (match node.["isApproximate"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("isApproximate")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<bool>()
+                .GetValue<bool> ()
 
         let TotalPeopleSuffix =
             match node.["totalPeopleSuffix"] with
             | null -> None
-            | v -> v.AsValue().GetValue<string>() |> Some
+            | v -> v.AsValue().GetValue<string> () |> Some
 
         let TotalPeopleInClasses =
             (match node.["totalPeopleInClasses"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("totalPeopleInClasses")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<int>()
+                .GetValue<int> ()
 
         let TotalPeopleInGym =
             (match node.["totalPeopleInGym"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("totalPeopleInGym")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<int>()
+                .GetValue<int> ()
 
         let Description =
             (match node.["description"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("description")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
 
-        { Description = Description
-          TotalPeopleInGym = TotalPeopleInGym
-          TotalPeopleInClasses = TotalPeopleInClasses
-          TotalPeopleSuffix = TotalPeopleSuffix
-          IsApproximate = IsApproximate
-          AttendanceTime = AttendanceTime
-          LastRefreshed = LastRefreshed
-          LastRefreshedPeopleInClasses = LastRefreshedPeopleInClasses
-          MaximumCapacity = MaximumCapacity }
+        {
+            Description = Description
+            TotalPeopleInGym = TotalPeopleInGym
+            TotalPeopleInClasses = TotalPeopleInClasses
+            TotalPeopleSuffix = TotalPeopleSuffix
+            IsApproximate = IsApproximate
+            AttendanceTime = AttendanceTime
+            LastRefreshed = LastRefreshed
+            LastRefreshedPeopleInClasses = LastRefreshedPeopleInClasses
+            MaximumCapacity = MaximumCapacity
+        }
 namespace PureGym
 
 /// Module containing JSON parsing methods for the MemberActivityDto type
@@ -691,86 +705,88 @@ namespace PureGym
 [<CompilationRepresentation(CompilationRepresentationFlags.ModuleSuffix)>]
 module MemberActivityDto =
     /// Parse from a JSON node.
-    let jsonParse (node: System.Text.Json.Nodes.JsonNode) : MemberActivityDto =
+    let jsonParse (node : System.Text.Json.Nodes.JsonNode) : MemberActivityDto =
         let LastRefreshed =
             (match node.["lastRefreshed"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("lastRefreshed")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
             |> System.DateTime.Parse
 
         let IsEstimated =
             (match node.["isEstimated"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("isEstimated")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<bool>()
+                .GetValue<bool> ()
 
         let TotalClasses =
             (match node.["totalClasses"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("totalClasses")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<int>()
+                .GetValue<int> ()
 
         let TotalVisits =
             (match node.["totalVisits"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("totalVisits")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<int>()
+                .GetValue<int> ()
 
         let AverageDuration =
             (match node.["averageDuration"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("averageDuration")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<int>()
+                .GetValue<int> ()
 
         let TotalDuration =
             (match node.["totalDuration"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("totalDuration")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<int>()
+                .GetValue<int> ()
 
-        { TotalDuration = TotalDuration
-          AverageDuration = AverageDuration
-          TotalVisits = TotalVisits
-          TotalClasses = TotalClasses
-          IsEstimated = IsEstimated
-          LastRefreshed = LastRefreshed }
+        {
+            TotalDuration = TotalDuration
+            AverageDuration = AverageDuration
+            TotalVisits = TotalVisits
+            TotalClasses = TotalClasses
+            IsEstimated = IsEstimated
+            LastRefreshed = LastRefreshed
+        }
 namespace PureGym
 
 /// Module containing JSON parsing methods for the SessionsAggregate type
@@ -778,46 +794,48 @@ namespace PureGym
 [<CompilationRepresentation(CompilationRepresentationFlags.ModuleSuffix)>]
 module SessionsAggregate =
     /// Parse from a JSON node.
-    let jsonParse (node: System.Text.Json.Nodes.JsonNode) : SessionsAggregate =
+    let jsonParse (node : System.Text.Json.Nodes.JsonNode) : SessionsAggregate =
         let Duration =
             (match node.["Duration"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("Duration")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<int>()
+                .GetValue<int> ()
 
         let Visits =
             (match node.["Visits"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("Visits")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<int>()
+                .GetValue<int> ()
 
         let Activities =
             (match node.["Activities"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("Activities")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<int>()
+                .GetValue<int> ()
 
-        { Activities = Activities
-          Visits = Visits
-          Duration = Duration }
+        {
+            Activities = Activities
+            Visits = Visits
+            Duration = Duration
+        }
 namespace PureGym
 
 /// Module containing JSON parsing methods for the VisitGym type
@@ -825,46 +843,48 @@ namespace PureGym
 [<CompilationRepresentation(CompilationRepresentationFlags.ModuleSuffix)>]
 module VisitGym =
     /// Parse from a JSON node.
-    let jsonParse (node: System.Text.Json.Nodes.JsonNode) : VisitGym =
+    let jsonParse (node : System.Text.Json.Nodes.JsonNode) : VisitGym =
         let Status =
             (match node.["Status"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("Status")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
 
         let Name =
             (match node.["Name"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("Name")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
 
         let Id =
             (match node.["Id"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("Id")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<int>()
+                .GetValue<int> ()
 
-        { Id = Id
-          Name = Name
-          Status = Status }
+        {
+            Id = Id
+            Name = Name
+            Status = Status
+        }
 namespace PureGym
 
 /// Module containing JSON parsing methods for the Visit type
@@ -872,13 +892,13 @@ namespace PureGym
 [<CompilationRepresentation(CompilationRepresentationFlags.ModuleSuffix)>]
 module Visit =
     /// Parse from a JSON node.
-    let jsonParse (node: System.Text.Json.Nodes.JsonNode) : Visit =
+    let jsonParse (node : System.Text.Json.Nodes.JsonNode) : Visit =
         let Gym =
             VisitGym.jsonParse (
                 match node.["Gym"] with
                 | null ->
                     raise (
-                        System.Collections.Generic.KeyNotFoundException(
+                        System.Collections.Generic.KeyNotFoundException (
                             sprintf "Required key '%s' not found on JSON object" ("Gym")
                         )
                     )
@@ -889,43 +909,45 @@ module Visit =
             (match node.["Duration"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("Duration")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<int>()
+                .GetValue<int> ()
 
         let StartTime =
             (match node.["StartTime"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("StartTime")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<string>()
+                .GetValue<string> ()
             |> System.DateTime.Parse
 
         let IsDurationEstimated =
             (match node.["IsDurationEstimated"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("IsDurationEstimated")
                      )
                  )
              | v -> v)
                 .AsValue()
-                .GetValue<bool>()
+                .GetValue<bool> ()
 
-        { IsDurationEstimated = IsDurationEstimated
-          StartTime = StartTime
-          Duration = Duration
-          Gym = Gym }
+        {
+            IsDurationEstimated = IsDurationEstimated
+            StartTime = StartTime
+            Duration = Duration
+            Gym = Gym
+        }
 namespace PureGym
 
 /// Module containing JSON parsing methods for the SessionsSummary type
@@ -933,13 +955,13 @@ namespace PureGym
 [<CompilationRepresentation(CompilationRepresentationFlags.ModuleSuffix)>]
 module SessionsSummary =
     /// Parse from a JSON node.
-    let jsonParse (node: System.Text.Json.Nodes.JsonNode) : SessionsSummary =
+    let jsonParse (node : System.Text.Json.Nodes.JsonNode) : SessionsSummary =
         let ThisWeek =
             SessionsAggregate.jsonParse (
                 match node.["ThisWeek"] with
                 | null ->
                     raise (
-                        System.Collections.Generic.KeyNotFoundException(
+                        System.Collections.Generic.KeyNotFoundException (
                             sprintf "Required key '%s' not found on JSON object" ("ThisWeek")
                         )
                     )
@@ -951,14 +973,17 @@ module SessionsSummary =
                 match node.["Total"] with
                 | null ->
                     raise (
-                        System.Collections.Generic.KeyNotFoundException(
+                        System.Collections.Generic.KeyNotFoundException (
                             sprintf "Required key '%s' not found on JSON object" ("Total")
                         )
                     )
                 | v -> v
             )
 
-        { Total = Total; ThisWeek = ThisWeek }
+        {
+            Total = Total
+            ThisWeek = ThisWeek
+        }
 namespace PureGym
 
 /// Module containing JSON parsing methods for the Sessions type
@@ -966,17 +991,17 @@ namespace PureGym
 [<CompilationRepresentation(CompilationRepresentationFlags.ModuleSuffix)>]
 module Sessions =
     /// Parse from a JSON node.
-    let jsonParse (node: System.Text.Json.Nodes.JsonNode) : Sessions =
+    let jsonParse (node : System.Text.Json.Nodes.JsonNode) : Sessions =
         let Visits =
             (match node.["Visits"] with
              | null ->
                  raise (
-                     System.Collections.Generic.KeyNotFoundException(
+                     System.Collections.Generic.KeyNotFoundException (
                          sprintf "Required key '%s' not found on JSON object" ("Visits")
                      )
                  )
              | v -> v)
-                .AsArray()
+                .AsArray ()
             |> Seq.map (fun elt -> Visit.jsonParse elt)
             |> List.ofSeq
 
@@ -985,13 +1010,14 @@ module Sessions =
                 match node.["Summary"] with
                 | null ->
                     raise (
-                        System.Collections.Generic.KeyNotFoundException(
+                        System.Collections.Generic.KeyNotFoundException (
                             sprintf "Required key '%s' not found on JSON object" ("Summary")
                         )
                     )
                 | v -> v
             )
 
-        { Summary = Summary; Visits = Visits }
-
-
+        {
+            Summary = Summary
+            Visits = Visits
+        }