commit e4e5a9f8c3c3cbce237cb26437f0e0b60a0f204e · aylac.top/advent_of_code

+21

2015/12/gleam/gleam.toml

···

       1
       1
       +
       name = "main"

     

       2
       2
       +
       version = "1.0.0"

     

       3
       3
       +
       

     

       4
       4
       +
       # Fill out these fields if you intend to generate HTML documentation or publish

     

       5
       5
       +
       # your project to the Hex package manager.

     

       6
       6
       +
       #

     

       7
       7
       +
       # description = ""

     

       8
       8
       +
       # licences = ["Apache-2.0"]

     

       9
       9
       +
       # repository = { type = "github", user = "", repo = "" }

     

       10
       10
       +
       # links = [{ title = "Website", href = "" }]

     

       11
       11
       +
       #

     

       12
       12
       +
       # For a full reference of all the available options, you can have a look at

     

       13
       13
       +
       # https://gleam.run/writing-gleam/gleam-toml/.

     

       14
       14
       +
       

     

       15
       15
       +
       [dependencies]

     

       16
       16
       +
       gleam_stdlib = ">= 0.44.0 and < 2.0.0"

     

       17
       17
       +
       simplifile = ">= 2.3.0 and < 3.0.0"

     

       18
       18
       +
       gleam_json = ">= 3.0.2 and < 4.0.0"

     

       19
       19
       +
       

     

       20
       20
       +
       [dev-dependencies]

     

       21
       21
       +
       gleeunit = ">= 1.0.0 and < 2.0.0"

+16

2015/12/gleam/manifest.toml

···

       1
       1
       +
       # This file was generated by Gleam

     

       2
       2
       +
       # You typically do not need to edit this file

     

       3
       3
       +
       

     

       4
       4
       +
       packages = [

     

       5
       5
       +
         { name = "filepath", version = "1.1.2", build_tools = ["gleam"], requirements = ["gleam_stdlib"], otp_app = "filepath", source = "hex", outer_checksum = "B06A9AF0BF10E51401D64B98E4B627F1D2E48C154967DA7AF4D0914780A6D40A" },

     

       6
       6
       +
         { name = "gleam_json", version = "3.0.2", build_tools = ["gleam"], requirements = ["gleam_stdlib"], otp_app = "gleam_json", source = "hex", outer_checksum = "874FA3C3BB6E22DD2BB111966BD40B3759E9094E05257899A7C08F5DE77EC049" },

     

       7
       7
       +
         { name = "gleam_stdlib", version = "0.65.0", build_tools = ["gleam"], requirements = [], otp_app = "gleam_stdlib", source = "hex", outer_checksum = "7C69C71D8C493AE11A5184828A77110EB05A7786EBF8B25B36A72F879C3EE107" },

     

       8
       8
       +
         { name = "gleeunit", version = "1.7.0", build_tools = ["gleam"], requirements = ["gleam_stdlib"], otp_app = "gleeunit", source = "hex", outer_checksum = "CD701726CBCE5588B375D157B4391CFD0F2F134CD12D9B6998A395484DE05C58" },

     

       9
       9
       +
         { name = "simplifile", version = "2.3.0", build_tools = ["gleam"], requirements = ["filepath", "gleam_stdlib"], otp_app = "simplifile", source = "hex", outer_checksum = "0A868DAC6063D9E983477981839810DC2E553285AB4588B87E3E9C96A7FB4CB4" },

     

       10
       10
       +
       ]

     

       11
       11
       +
       

     

       12
       12
       +
       [requirements]

     

       13
       13
       +
       gleam_json = { version = ">= 3.0.2 and < 4.0.0" }

     

       14
       14
       +
       gleam_stdlib = { version = ">= 0.44.0 and < 2.0.0" }

     

       15
       15
       +
       gleeunit = { version = ">= 1.0.0 and < 2.0.0" }

     

       16
       16
       +
       simplifile = { version = ">= 2.3.0 and < 3.0.0" }

+106

2015/12/gleam/src/main.gleam

···

       1
       1
       +
       import gleam/dict.{type Dict}

     

       2
       2
       +
       import gleam/dynamic

     

       3
       3
       +
       import gleam/dynamic/decode

     

       4
       4
       +
       import gleam/int.{to_string}

     

       5
       5
       +
       import gleam/io.{println}

     

       6
       6
       +
       import gleam/json

     

       7
       7
       +
       import gleam/list

     

       8
       8
       +
       import gleam/result.{unwrap}

     

       9
       9
       +
       import gleam/string.{trim}

     

       10
       10
       +
       import simplifile.{read}

     

       11
       11
       +
       

     

       12
       12
       +
       type Nested {

     

       13
       13
       +
         NestedList(List(Nested))

     

       14
       14
       +
         NestedDict(Dict(String, Nested))

     

       15
       15
       +
         IntValue(Int)

     

       16
       16
       +
         StringValue(String)

     

       17
       17
       +
       }

     

       18
       18
       +
       

     

       19
       19
       +
       fn int_anywhere_decoder() -> decode.Decoder(Nested) {

     

       20
       20
       +
         use <- decode.recursive

     

       21
       21
       +
         decode.one_of(decode.int |> decode.map(IntValue), or: [

     

       22
       22
       +
           decode.list(int_anywhere_decoder()) |> decode.map(NestedList),

     

       23
       23
       +
           decode.dict(decode.string, int_anywhere_decoder()) |> decode.map(NestedDict),

     

       24
       24
       +
           decode.string |> decode.map(StringValue),

     

       25
       25
       +
         ])

     

       26
       26
       +
       }

     

       27
       27
       +
       

     

       28
       28
       +
       fn get_total_number_dict(data: Dict(String, Nested)) {

     

       29
       29
       +
         data

     

       30
       30
       +
         |> dict.fold(0, fn(acc, _, data) {

     

       31
       31
       +
           let add = case data {

     

       32
       32
       +
             NestedList(items) -> get_total_number_list(items)

     

       33
       33
       +
             NestedDict(items) -> get_total_number_dict(items)

     

       34
       34
       +
             IntValue(v) -> v

     

       35
       35
       +
             _ -> 0

     

       36
       36
       +
           }

     

       37
       37
       +
           acc + add

     

       38
       38
       +
         })

     

       39
       39
       +
       }

     

       40
       40
       +
       

     

       41
       41
       +
       fn get_total_number_list(data: List(Nested)) {

     

       42
       42
       +
         data

     

       43
       43
       +
         |> list.fold(0, fn(acc, data) {

     

       44
       44
       +
           let add = case data {

     

       45
       45
       +
             NestedList(items) -> get_total_number_list(items)

     

       46
       46
       +
             NestedDict(items) -> get_total_number_dict(items)

     

       47
       47
       +
             IntValue(v) -> v

     

       48
       48
       +
             _ -> 0

     

       49
       49
       +
           }

     

       50
       50
       +
           acc + add

     

       51
       51
       +
         })

     

       52
       52
       +
       }

     

       53
       53
       +
       

     

       54
       54
       +
       fn get_total_number_dict_no_red(data: Dict(String, Nested)) {

     

       55
       55
       +
         let has_red =

     

       56
       56
       +
           data

     

       57
       57
       +
           |> dict.fold(False, fn(state, _, data) {

     

       58
       58
       +
             case data {

     

       59
       59
       +
               StringValue("red") -> True

     

       60
       60
       +
               _ -> state

     

       61
       61
       +
             }

     

       62
       62
       +
           })

     

       63
       63
       +
         case has_red {

     

       64
       64
       +
           True -> 0

     

       65
       65
       +
           False ->

     

       66
       66
       +
             data

     

       67
       67
       +
             |> dict.fold(0, fn(acc, _, data) {

     

       68
       68
       +
               let add = case data {

     

       69
       69
       +
                 NestedList(items) -> get_total_number_list_no_red(items)

     

       70
       70
       +
                 NestedDict(items) -> get_total_number_dict_no_red(items)

     

       71
       71
       +
                 IntValue(v) -> v

     

       72
       72
       +
                 _ -> 0

     

       73
       73
       +
               }

     

       74
       74
       +
               acc + add

     

       75
       75
       +
             })

     

       76
       76
       +
         }

     

       77
       77
       +
       }

     

       78
       78
       +
       

     

       79
       79
       +
       fn get_total_number_list_no_red(data: List(Nested)) {

     

       80
       80
       +
         data

     

       81
       81
       +
         |> list.fold(0, fn(acc, data) {

     

       82
       82
       +
           let add = case data {

     

       83
       83
       +
             NestedList(items) -> get_total_number_list_no_red(items)

     

       84
       84
       +
             NestedDict(items) -> get_total_number_dict_no_red(items)

     

       85
       85
       +
             IntValue(v) -> v

     

       86
       86
       +
             _ -> 0

     

       87
       87
       +
           }

     

       88
       88
       +
           acc + add

     

       89
       89
       +
         })

     

       90
       90
       +
       }

     

       91
       91
       +
       

     

       92
       92
       +
       pub fn main() {

     

       93
       93
       +
         let assert Ok(input) =

     

       94
       94
       +
           read(from: "../input.json")

     

       95
       95
       +
           |> unwrap("")

     

       96
       96
       +
           |> json.parse(int_anywhere_decoder())

     

       97
       97
       +
       

     

       98
       98
       +
         println(

     

       99
       99
       +
           get_total_number_list([input])

     

       100
       100
       +
           |> to_string,

     

       101
       101
       +
         )

     

       102
       102
       +
         println(

     

       103
       103
       +
           get_total_number_list_no_red([input])

     

       104
       104
       +
           |> to_string,

     

       105
       105
       +
         )

     

       106
       106
       +
       }