• [^] # Re: Compréhension

    Posté par (site web personnel) . En réponse au journal Urbit - Le nouveau MultiDeskOS aka le retour de Jayce ?. Évalué à 10.

    Exactement! avec un exemple de code dans le language Hoon c'est encore plus clair:

    :: project euler 1
    :: https://projecteuler.net/problem=1
    :: run in dojo with +examples-euler1
    ::
    :::: /hoon/euler1/examples/gen
     ::
    :- %say |= * 
    :- %noun
    =< (sum 1.000)
    ::
    :::: ~sivtyv-barnel
     ::
    |%
    ++ three 
     |= a/@
     =| b/@
     |- ^- @u
     ?: (lth a b)
     0
     (add b $(b (add 3 b)))
    ++ five
     |= a/@
     =| b/@
     |- ^- @
     ?: (lte a b)
     0
     ?: =((mod b 3) 0)
     $(b (add b 5))
     (add b $(b (add b 5)))
    ++ sum
     |= a/@u
     (add (five a) (three a))
    --
    

    Ca a de la gueule!