feat(tests): adding Rosetta Code solution for Calculating the value of e

Author: SuperFola

tests/unittests/resources/RosettaSuite/calculating_value_of_e.ark

@@ -0,0 +1,20 @@
+(import std.Range :range)
+(import std.List)
+
+(let fact (fun (n acc) {
+  (if (> n 0)
+    (fact (- n 1) (* acc n))
+    acc) }))
+
+(let r (range 1 18))
+(let p
+  (list:sum
+    (list:map
+      (list:reverse (r.asList))
+      (fun (n)
+        (/ 1 (fact n 1)) ))))
+
+(import std.Math :abs)
+
+(let my_e (+ p 1))
+(assert (< (abs (- my_e math:e)) (toNumber "1e-15")) "computed e is near the math:e")