A-M baby

Task/Mutual-recursion/MATLAB/mutual-recursion-1.m

@@ -0,0 +1,9 @@
+function Fn = female(n)
+
+    if n == 0
+        Fn = 1;
+        return
+    end
+
+    Fn = n - male(female(n-1));
+end

Task/Mutual-recursion/MATLAB/mutual-recursion-2.m

@@ -0,0 +1,9 @@
+function Mn = male(n)
+
+    if n == 0
+        Mn = 0;
+        return
+    end
+
+    Mn = n - female(male(n-1));
+end

Task/Mutual-recursion/MATLAB/mutual-recursion-3.m

@@ -0,0 +1,12 @@
+>> n = (0:10);
+>> arrayfun(@female,n)
+
+ans =
+
+     1     1     2     2     3     3     4     5     5     6     6
+
+>> arrayfun(@male,n)
+
+ans =
+
+     0     0     1     2     2     3     4     4     5     6     6