Tags » Vlad

Your Dose of Seuss: On Vlad

“’Horton, the kangaroo has sent Vlad!’
‘Vlad? I know two Vlads. One is a cute little bunny that brings me cookies. The other is bad Vlad.

17 more words

How to call the same function twice without recursion

let getValue number divisor =
    let firstNumber = int (System.Math.Floor((float) number / (float) divisor))
    let rest = number % divisor
    firstNumber, rest

let getNumeral value =
    match value with
    | (1, 1) -> "I"
    | (5, 1) -> "V"
    | (1, 2) -> "X"
    | (5, 2) -> "L"
    | (1, 3) -> "C"
    | (5, 3) -> "D"
    | (1, 4) -> "M"
    | (_,_) -> ""

let getStringRepresentation value =
    match value with
    | (1 , order) ->
        getNumeral (1, order)
    | (2, order) ->
        getNumeral (1, order) + getNumeral (1, order)
    | (3, order) ->
        getNumeral (1, order) + getNumeral (1, order) + getNumeral (1, order)
    | (4, order) ->
        getNumeral (1, order) + getNumeral (5, order)
    | (5, order) ->
        getNumeral (5, order)
    | (6, order) ->
        getNumeral (5, order) + getNumeral (1, order)
    | (7, order) ->
        getNumeral (5, order) + getNumeral (1, order) + getNumeral (1, order)
    | (8, order) ->
        getNumeral (5, order) + getNumeral (1, order) + getNumeral (1, order) + getNumeral (1, order)
    | (9, order) ->
        getNumeral (1, order) + getNumeral (1, order + 1)
    | (_, _) -> ""

let rec convertToRoman number =
    match number with
    | number when number >= 1000 && number < 4000 ->
        let value = getValue number 1000
        let rest = convertToRoman (snd value)
        let current = getStringRepresentation ((fst value), 4)
        current + rest
    | number when number >= 100 && number < 1000 ->
        let value = getValue number 100
        let rest = convertToRoman (snd value)
        let current = getStringRepresentation ((fst value), 3)
        current + rest
    | number when number >= 10 && number < 100 ->
        let value = getValue number 10
        let rest = convertToRoman (snd value)
        let current = getStringRepresentation ((fst value), 2)
        current + rest
    | number when number >= 1 && number < 10 ->
        let value = getValue number 1
        let rest = convertToRoman (snd value)
        let current = getStringRepresentation ((fst value), 1)
        current + rest
    | _ -> ""

printfn "%A" (convertToRoman 49)
… 82 more words
Stackoverflow

Tenderness

Vlad and Sayan two of the Amur tigers at Yorkshire Wildlife Park. They have been companions for a few years now but unfortunately they are not compatible for the conservation programme. 27 more words

Photo Albums

Dracula Untold (Movie)

http://www.solarmovie.is/watch-dracula-untold-2014.html

“Neither this world nor the next, can separate us. Time always seems too short to those in need, but for those who love, it lasts forever. 16 more words

Experience

Is it possible to share one APNS push certificate across different apps?

I have a feeling this could be a super newbie question, but here goes.
I have an iOS app that uses push notification.
I am wondering if I can use the same push certificate (the p12 file) for building different apps. 43 more words

Stackoverflow

Movie Review: Dracula Untold






Directed by: Gary Shore

Starring: Luke Evans, Sarah Gadon and Dominic Cooper

Release Date: October 10, 2014
 
Running Time: 92 minutes

… 451 more words
Movies