Back to Questions
4.9k
views3
comments
My first F# program
f#functionalbookclassesc#

I wrote the my first F# program today. It is to calculate the highest common factor between two numbers. This is what I wrote:

1
2
3
4

let rem x y = x % y;;

let rec hcf x y =
    if x=0 then y elif y=0 then x elif x < y then hcf x (rem y x) else hcf (rem x y) y;;

This works as well.
However, I read in my F# book that one of the advantages of functional programming is that the code is more modular and easy.

However my hcf function is one big monolithic "expression" in C# I could have "stepped thru" each line of my code (for loop, if statement) and seen what is going on.

Here how do I "step thru" my hcf function to see what is going on inside it?

So far the only thing which I like about this code is I am easily able to use functions and parameters interchangeably without really using wrapper generic classes like Func<T>.

But I really don't like such large monolithic expressions which cannot be stepped thru in a debugger.

(don't flame my ignorance.... afterall this is my first program)

.

You could also use pattern matching on this one:

1
2
3
4
5
6
7
8

let rem x y = x % y;; 

let rec hcf x y = 
    match (x, y) with 
    | (0, y) -> y
    | (x, 0) -> x
    | (x, y) when x < y -> hcf x (rem y x) 
    | (x, y) -> hcf (rem x y) y

Thanks,

FZSharp

By on 5/18/2011 10:45 AM ()

Thank you ... very nice.

You have done a +1 to my liking of F#

By on 5/20/2011 11:25 AM ()

Just split it into lines. Like 'test' fuction here:

Conditional Expressions: if... then...else (F#)

By on 5/14/2011 6:18 PM ()

    Topic tags

    IntelliFactory Offices Copyright (c) 2011-2012 IntelliFactory. All rights reserved.
    Home | Products | Consulting | Trainings | Blogs | Jobs | Contact Us | Terms of Use | Privacy Policy | Cookie Policy     		Built with WebSharper