[Ex 7, Task 3] additional test case for you

Daniel S.
Mausschubser
Mausschubser
Beiträge: 87
Registriert: 25. Sep 2007 12:28
Wohnort: Mörfelden

[Ex 7, Task 3] additional test case for you

Beitrag von Daniel S. »

Once again I couldn't believe that my solution works, so I wrote a test case with three rec-functions, which I want to share with you:

Code: Alles auswählen

(test (interp (parse '{rec {{mod3 {fun {n}
                                      {if0 n
                                           0
                                           {mod3_1 {- n 1}}}}}
                            {mod3_1 {fun {n}
                                       {if0 n
                                            1
                                            {mod3_2 {- n 1}}}}}
                            {mod3_2 {fun {n}
                                       {if0 n
                                            2
                                            {mod3 {- n 1}}}}}}
                        {mod3 42}}) (mtSub)) (numV 0))
Happy testing.
Mit freundlichen Grüßen
Daniel

Benutzeravatar
Alp.traum
Mausschubser
Mausschubser
Beiträge: 85
Registriert: 3. Feb 2004 15:15
Wohnort: Darmstadt
Kontaktdaten:

Re: [Ex 7, Task 3] additional test case for you

Beitrag von Alp.traum »

/edit false alarm

Antworten

Zurück zu „Archiv“