Developpez.com - Rubrique HPC

Le Club des Développeurs et IT Pro

Penser en Julia : apprendre à penser comme un informaticien

Structures et objets, un livre de Ben Lauwens et Allen Downey

Le 2021-11-06 20:14:45, par dourouc05, Responsable Qt & Livres
L'utilisateur de Julia n'est pas limité aux structures de données basiques que sont les tableaux, les tuples et les dictionnaires : il est aussi possible de créer ses propres structures. Elles sont le plus proche équivalent des objets en Julia.

  Discussion forum
23 commentaires
  • danielhagnoul
    Rédacteur
    Ma motivation principale était de vous donner la bonne écriture en Julia 1.7.0 pour Base.:+, le reste du code à suivit.

    Code :
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    41
    42
    43
    44
    45
    46
    47
    48
    49
    50
    51
    52
    53
    54
    55
    56
    57
    58
    59
    60
    61
    62
    63
    64
    65
    66
    67
    68
    69
    70
    71
    72
    73
    74
    75
    76
    77
    78
    79
    80
    81
    82
    83
    using Base, Printf 
     
    """ 
    Julia. Exercice, ma version de 17-2 à 17-6 dans https://julia.developpez.com/tutoriels/think-julia-fr/?page=dispatch-multiple 
    """ 
     
    struct MyTime 
        heures::Int64 
        minutes::Int64 
        secondes::Int64 
        function MyTime(h::Int64=0, m::Int64=0, s::Int64=0) 
            # correction des secondes 
            m += div(s, 60) # le résultat de la division entière 
            s = rem(s, 60)  # le reste de la divion entière 
     
            # correction des minutes 
            h += div(m, 60) 
            m = rem(m, 60) 
     
            # U+02264 ≤	\le, \leq Less-Than Or Equal To / Less Than Or Equal To 
            @assert(0 ≤ h, "heures n'est pas supérieur ou égal à 0") 
            @assert(0 ≤ m < 60, "minutes n'est pas entre 0 et 59.") 
            @assert(0 ≤ s < 60, "secondes n'est pas entre 0 et 59.") 
     
            # construction de l'objet 
            # le return final existe par défaut 
            new(h, m, s) 
        end 
    end 
     
    Base.show(io::IO, mt::MyTime) = @printf(io, "%02d:%02d:%02d", mt.heures, mt.minutes, mt.secondes) 
    Base.:+(mt1::MyTime, mt2::MyTime) = MyTime(mt1.heures + mt2.heures, mt1.minutes + mt2.minutes, mt1.secondes + mt2.secondes) 
     
    function my_time_to_int(mt::MyTime)::Int64 
        mt.heures * 60 * 60 + mt.minutes * 60 + mt.secondes 
    end 
     
    function int_to_my_time(x::Int64)::MyTime 
        MyTime(0, 0, x) 
    end 
     
    function increment_my_time(mt::MyTime, x::Int64)::MyTime 
        MyTime(mt.heures, mt.minutes, mt.secondes + x) 
    end 
     
    function main() 
        println() 
     
        mt1 = MyTime(18, 97, 8002) 
        mt2 = MyTime(1, 5, 20) 
        mt1 + mt2 |> println 
     
        x = my_time_to_int(mt1 + mt2) 
        int_to_my_time(x) |> println 
     
    #= 
        22:55:42 
        22:55:42 
    =# 
     
        for k in 1:5:50 
            increment_my_time(mt2, k) |> println 
        end 
     
    #= 
        01:05:21 
        01:05:26 
        01:05:31 
        01:05:36 
        01:05:41 
        01:05:46 
        01:05:51 
        01:05:56 
        01:06:01 
        01:06:06 
    =# 
     
        # remplace le return par défaut 
        return 
    end 
     
    @time main() 
    @time main() #  0.001301 seconds (136 allocations: 6.547 KiB)
  • dourouc05
    Responsable Qt & Livres
    Pour travailler sur des structures, l'idéal est de structurer son code en fonctions.

  • danielhagnoul
    Rédacteur
    Je poste de nouveau mon message concernant le chapitre 18, le premier ayant "mystérieusement" disparu. Le souci c'est que j'ai une copie du code, mais pas du texte accompagnant ce code.

    Je pense que je disais que ce n'est pas Base.<, mais Base.:< et que celui-ci utilise isless(), cette méthode étant également utilisée par sort(). Donc mon code utilise isless().

    Code :
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    41
    42
    43
    44
    45
    46
    47
    48
    49
    50
    51
    52
    53
    54
    55
    56
    57
    58
    59
    60
    61
    62
    63
    64
    65
    66
    67
    68
    69
    70
    71
    72
    73
    74
    75
    76
    77
    78
    79
    80
    81
    82
    83
    84
    85
    86
    87
    88
    89
    90
    91
    92
    93
    94
    95
    96
    97
    98
    99
    100
    101
    102
    103
    104
    105
    106
    107
    108
    109
    110
    111
    112
    113
    114
    115
    116
    117
    118
    119
    120
    121
    122
    123
    124
    125
    126
    127
    128
    129
    130
    131
    132
    133
    134
    135
    136
    137
    138
    139
    140
    141
    142
    143
    144
    145
    146
    147
    148
    149
    150
    151
    152
    153
    154
    155
    156
    157
    158
    159
    160
    161
    162
    163
    164
    165
    166
    167
    168
    169
    170
    171
    172
    173
    174
    175
    176
    177
    178
    179
    180
    181
    182
    183
    184
    185
    186
    187
    188
    189
    190
    191
    192
    193
    using Base, Test, Random
    
    #=
        &#9824;  "\spadessuit"  "pique"
        &#9826;  "\diamondsuit" "carreau"
        &#9825;  "\heartsuit"  "coeur"
        &#9827;  "\clubsuit"   "trèfle"
    =#
    
    const noms_couleurs = ["♣", "♦", "♥", "♠"] 
    const noms_rangs = ["A", "2", "3", "4", "5", "6", "7", "8", "9", "10", "V", "D", "R"]
    
    abstract type Ensemble_de_cartes  end
    
    """
    Une carte à jouer.
    
    couleur : la couleur de la carte (pique, carreau, coeur, trèfle)
    
    rang, de 1 à 13 : ["A", "2", "3", "4", "5", "6", "7", "8", "9", "10", "V", "D", "R"]
    """
    struct Carte 
        couleur::Int64
        rang::Int64
        function Carte(couleur::Int64, rang::Int64) 
            @assert(1 &#8804; couleur &#8804; 4, "la couleur n'est pas entre 1 et 4")
            @assert(1 &#8804; rang &#8804; 13, "le rang n'est pas entre 1 et 13") 
            new(couleur, rang)
        end 
    end
    
    """
    Un paquet de cartes à jouer contenant 52 Carte.
    """
    struct Paquet <: Ensemble_de_cartes
        cartes::Vector{Carte} 
        function Paquet() 
            paquet = new(Carte[]) 
            for couleur in 1:4 
                for rang in 1:13 
                    push!(paquet.cartes, Carte(couleur, rang)) 
                end
            end
            paquet
        end
    end
    
    """
    Une main vide de Carte.
    """
    struct Une_main <: Ensemble_de_cartes 
        cartes::Vector{Carte} 
        label::String
        function Une_main(label::String="") 
            new(Carte[], label) 
        end
    end
    
    Base.show(io::IO, carte::Carte) = print(io, noms_rangs[carte.rang], noms_couleurs[carte.couleur])
    Base.isless(c1::Carte, c2::Carte) = (c1.couleur, c1.rang) < (c2.couleur, c2.rang)
    
    Base.show(io::IO, jeu::Ensemble_de_cartes) = begin
        for carte in jeu.cartes
            print(io, " $carte")
        end
        println(io)
    end
    
    Base.pop!(jeu::Ensemble_de_cartes) = pop!(jeu.cartes)
    Base.push!(jeu::Ensemble_de_cartes, carte::Carte) = push!(jeu.cartes, carte)
    Random.shuffle!(jeu::Ensemble_de_cartes) = shuffle!(jeu.cartes)
    Base.sort!(jeu::Ensemble_de_cartes) = sort!(jeu.cartes)
    
    """
    n le nb de carte dans une main.
    """
    donne!(jeu::Ensemble_de_cartes, main::Une_main, n::Int64) = begin
        @assert 1 &#8804; n &#8804; length(jeu.cartes)
        shuffle!(jeu)
        for k in 1:1:n
            carte = pop!(jeu)
            push!(main, carte)
        end
        sort!(main)
    end
    
    """
    m le nb de main.
    
    n le nb de carte dans une main.
    
    retourne un array de mains, chacune contenant n cartes.
    """
    deal!(jeu::Ensemble_de_cartes; m::Int64=4, n::Int64=5) = begin
        nb_cartes = length(jeu.cartes)
        @assert div(nb_cartes, m * n) &#8805; 1
        @assert 1 &#8804; n &#8804; nb_cartes
        mains = Vector{Une_main}()
        for k in 1:1:m # nb de main
            push!(mains, Une_main("main_$(k)"))
        end
        for main in mains
            donne!(jeu, main, n)
        end
        mains
    end
    
    function main()
        valet_coeur = Carte(3, 11)
        valet_coeur |> println
    
        dame_pique = Carte(4, 12)
        dame_pique |> println
    
        isless(valet_coeur, dame_pique) |> println
    
        @test Carte(1, 3) < Carte(2, 2)
    
        if valet_coeur < dame_pique
            println("OK")
        end
    
        jeu = Paquet()
    
        roi_pique = pop!(jeu)
        jeu |> println
    
        push!(jeu, roi_pique)
        jeu |> println
    
        shuffle!(jeu)
        jeu |> println
    
        sort!(jeu)
        jeu |> println
    
        ma_main = Une_main("main_dvjh")
    
        donne!(jeu, ma_main, 5)
        ma_main |> println
        jeu |> println
    
        nouveau_jeu = Paquet()
        mains = deal!(nouveau_jeu, m=6, n=5)
    
        for main in mains
            println("$(main.label) : $main")
        end
    
        nouveau_jeu |> println
    
        return
    end
    
    #=
    
    V&#9829;
    D&#9824;
    true
    OK
     A&#9827; 2&#9827; 3&#9827; 4&#9827; 5&#9827; 6&#9827; 7&#9827; 8&#9827; 9&#9827; 10&#9827; V&#9827; D&#9827; R&#9827; A&#9830; 2&#9830; 3&#9830; 4&#9830; 5&#9830; 6&#9830; 7&#9830; 8&#9830; 9&#9830; 10&#9830; V&#9830; D&#9830; R&#9830; A&#9829; 2&#9829; 3&#9829; 4&#9829; 5&#9829; 6&#9829; 7&#9829; 8&#9829; 9&#9829; 10&#9829; V&#9829; D&#9829; R&#9829; A&#9824; 2&#9824; 3&#9824; 4&#9824; 5&#9824; 6&#9824; 7&#9824; 8&#9824; 9&#9824; 10&#9824; V&#9824; D&#9824;
    
     A&#9827; 2&#9827; 3&#9827; 4&#9827; 5&#9827; 6&#9827; 7&#9827; 8&#9827; 9&#9827; 10&#9827; V&#9827; D&#9827; R&#9827; A&#9830; 2&#9830; 3&#9830; 4&#9830; 5&#9830; 6&#9830; 7&#9830; 8&#9830; 9&#9830; 10&#9830; V&#9830; D&#9830; R&#9830; A&#9829; 2&#9829; 3&#9829; 4&#9829; 5&#9829; 6&#9829; 7&#9829; 8&#9829; 9&#9829; 10&#9829; V&#9829; D&#9829; R&#9829; A&#9824; 2&#9824; 3&#9824; 4&#9824; 5&#9824; 6&#9824; 7&#9824; 8&#9824; 9&#9824; 10&#9824; V&#9824; D&#9824; R&#9824;
    
     A&#9827; R&#9829; 7&#9824; A&#9829; V&#9824; 5&#9830; 10&#9827; 6&#9830; 8&#9827; D&#9824; R&#9824; A&#9824; V&#9830; 6&#9824; 4&#9827; 3&#9827; 4&#9830; D&#9830; 10&#9824; 3&#9829; 9&#9830; 8&#9830; 7&#9830; D&#9829; 10&#9830; 10&#9829; D&#9827; 
    5&#9829; 8&#9829; A&#9830; 5&#9827; 8&#9824; 9&#9824; 4&#9824; V&#9829; 7&#9829; 3&#9830; 2&#9824; 2&#9827; 9&#9827; 2&#9829; 3&#9824; 5&#9824; 7&#9827; V&#9827; 9&#9829; 6&#9829; 6&#9827; 2&#9830; R&#9827; R&#9830; 4&#9829;
    
     A&#9827; 2&#9827; 3&#9827; 4&#9827; 5&#9827; 6&#9827; 7&#9827; 8&#9827; 9&#9827; 10&#9827; V&#9827; D&#9827; R&#9827; A&#9830; 2&#9830; 3&#9830; 4&#9830; 5&#9830; 6&#9830; 7&#9830; 8&#9830; 9&#9830; 10&#9830; V&#9830; D&#9830; R&#9830; A&#9829; 2&#9829; 3&#9829; 4&#9829; 5&#9829; 6&#9829; 7&#9829; 8&#9829; 9&#9829; 10&#9829; V&#9829; D&#9829; R&#9829; A&#9824; 2&#9824; 3&#9824; 4&#9824; 5&#9824; 6&#9824; 7&#9824; 8&#9824; 9&#9824; 10&#9824; V&#9824; D&#9824; R&#9824;
    
     A&#9827; 2&#9827; 5&#9827; 4&#9830; 3&#9829;
    
     4&#9824; 6&#9827; 10&#9827; D&#9829; 7&#9829; 10&#9829; 8&#9827; 7&#9824; 4&#9829; 5&#9830; V&#9824; 8&#9829; A&#9830; V&#9830; D&#9827; 7&#9830; 10&#9824; 7&#9827; A&#9829; V&#9827; 4&#9827; R&#9829; 6&#9824; R&#9830; 8&#9824; D&#9824; R&#9824; 8&#9830; 5&#9829; 9&#9824; 2&#9829; 9&#9830; 2&#9830; 3&#9824; D&#9830; 9&#9827; R&#9827; 6&#9830; 3&#9830; 2&#9824; 9&#9829; 5&#9824; 3&#9827; 10&#9830; A&#9824; 6&#9829; V&#9829;
    
    main_1 :  10&#9827; 6&#9830; D&#9830; 2&#9829; A&#9824;
    
    main_2 :  3&#9827; A&#9830; 5&#9830; 9&#9829; 9&#9824;
    
    main_3 :  A&#9827; 9&#9830; 8&#9829; 5&#9824; D&#9824;
    
    main_4 :  4&#9827; 9&#9827; 7&#9830; 8&#9830; 5&#9829;
    
    main_5 :  2&#9827; 5&#9827; R&#9827; 6&#9829; R&#9829;
    
    main_6 :  10&#9830; V&#9830; 7&#9829; 10&#9829; 2&#9824;
    
     8&#9827; A&#9829; V&#9829; D&#9827; 7&#9827; V&#9827; D&#9829; 6&#9827; 2&#9830; 3&#9824; 7&#9824; 3&#9830; 4&#9830; 4&#9829; 4&#9824; 10&#9824; V&#9824; R&#9830; 8&#9824; 3&#9829; R&#9824; 6&#9824;
    
      0.007767 seconds (2.05 k allocations: 91.844 KiB)
    
    =#
    
    @time main()
    @time main()