add and run fantomas Run fsprojects/fantomas source code formatter #17

Author: 0xGeorgii

.config/dotnet-tools.json

@@ -0,0 +1,12 @@
+{
+  "version": 1,
+  "isRoot": true,
+  "tools": {
+    "fantomas-tool": {
+      "version": "4.6.1",
+      "commands": [
+        "fantomas"
+      ]
+    }
+  }
+}

SharpLogic/BasicAlgorithms.fs

@@ -2,12 +2,12 @@
 
 module BasicAlgorithms =
 
-    let rec cartList nll = 
-        let f0 n nll =  
+    let rec cartList nll =
+        let f0 n nll =
             match nll with
-            | [] -> [[n]]
-            | _ -> List.map (fun nl->n::nl) nll
-            
+            | [] -> [ [ n ] ]
+            | _ -> List.map (fun nl -> n :: nl) nll
+
         match nll with
         | [] -> []
-        | h::t -> List.collect (fun n->f0 n (cartList t)) h
+        | h :: t -> List.collect (fun n -> f0 n (cartList t)) h