open System

// Declares a string constant
let s = "constant"

[<EntryPoint>]
let main argv =
    printfn "%s" s
    
    // Declares a numeric constant
    let n = 500000000

    // Performs arbitrary precision arithmetic
    let d = 3e20 / float n
    printfn "%f" d

    // Explicit conversion to int64
    printfn "%d" (int64 d)

    // Using the constant in a context that requires it to have a type
    printfn "%f" (Math.Sin(float n))

    0 // return an integer exit code