mirror of
https://github.com/tiennm99/serena.git
synced 2026-10-18 06:14:25 +00:00
add F# support
This commit is contained in:
1 parent
77213e18d0
commit
1fe767278e
14 files changed
+1189
No files matched your search
@@ -0,0 +1,37 @@
|
||||
module Program
|
||||
|
||||
open Calculator
|
||||
open Models
|
||||
|
||||
[<EntryPoint>]
|
||||
let main argv =
|
||||
printfn "Hello, F# World!"
|
||||
|
||||
// Test calculator functions
|
||||
let result1 = add 5 3
|
||||
printfn "5 + 3 = %d" result1
|
||||
|
||||
let result2 = subtract 10 4
|
||||
printfn "10 - 4 = %d" result2
|
||||
|
||||
let result3 = multiply 6 7
|
||||
printfn "6 * 7 = %d" result3
|
||||
|
||||
let result4 = divide 15 3
|
||||
printfn "15 / 3 = %.2f" result4
|
||||
|
||||
// Test calculator class
|
||||
let calc = CalculatorClass()
|
||||
let classResult = calc.Add(20, 5)
|
||||
printfn "Calculator class: 20 + 5 = %d" classResult
|
||||
|
||||
// Test person module
|
||||
let person = PersonModule.createPerson "Alice Smith" 25 (Some "alice@example.com")
|
||||
printfn "Person: %s" (PersonModule.getDisplayName person)
|
||||
printfn "Is adult: %b" (PersonModule.isAdult person)
|
||||
|
||||
// Test factorial
|
||||
let fact5 = factorial 5
|
||||
printfn "5! = %d" fact5
|
||||
|
||||
0 // return success
|
||||
Reference in new issue
Block a user