Skip to content

Instantly share code, notes, and snippets.

View object's full-sized avatar

Vagif Abilov object

View GitHub Profile
@object
object / AdventOfCode2023.12.15.fsx
Created December 15, 2023 06:38
Advent of Code 2023, December 15
#time "on"
open System
open System.IO
let splitOn c (s: string) =
s.Split [|c|]
let input =
File.ReadAllText(__SOURCE_DIRECTORY__ + "/../data/input15.txt").Replace("\r", "").Replace("\n", "")
@object
object / AdventOfCode2023.12.14.fsx
Created December 14, 2023 18:50
Advent of Code 2023, December 14
open System
open System.IO
let input =
File.ReadAllLines(__SOURCE_DIRECTORY__ + "/../data/input14.txt")
|> Seq.toArray
|> Array.map Seq.toArray
let swapRowsAndCols (pattern : char array array) =
let swapped = Array.zeroCreate<char array> pattern[0].Length
@object
object / AdventOfCode2023.12.11.fsx
Created December 11, 2023 16:45
Advent of Code 2023, December 11
#time "on"
open System.IO
let input =
File.ReadAllLines(__SOURCE_DIRECTORY__ + "/../data/input11.txt")
|> Seq.toArray
|> Array.map Seq.toArray
let grid =
@object
object / AdventOfCode2023.12.09.fsx
Created December 9, 2023 06:38
Advent of Code 2023, December 9
#time "on"
open System
open System.IO
let input =
File.ReadAllLines(__SOURCE_DIRECTORY__ + "/../data/input09.txt")
|> Seq.map (fun line -> line.Split " " |> Seq.map Int64.Parse |> Seq.toList)
|> Seq.toList
@object
object / AdventOfCode2023.12.08.fsx
Last active December 8, 2023 06:16
Advent of Code 2023, December 8
#time "on"
open System
open System.IO
open System.Collections.Generic
let input =
File.ReadAllLines(__SOURCE_DIRECTORY__ + "/../data/input08.txt")
let parseLine (str: string) =
@object
object / AdventOfCode2023.12.07.fsx
Last active December 7, 2023 09:28
Advent of Code 2023, December 7
#time "on"
open System
open System.IO
type HandType =
| FiveOfKind of int
| FourOfKind of int * int
| FullHouse of int * int
| ThreeOfKind of int * int * int
@object
object / AdventOfCode2023.12.05.fsx
Created December 6, 2023 18:48
Advent of Code 2023, December 5
#time "on"
open System
open System.IO
type Mapping = {
Destination: int64
Source: int64
Range: int64
}
@object
object / AdventOfCode2023.12.06fsx
Created December 6, 2023 06:26
Advent of Code 2023, December 6
#time "on"
open System
open System.IO
let input =
File.ReadAllLines(__SOURCE_DIRECTORY__ + "/../data/input06.txt")
let rec getWinningMoves time record_distance speed acc =
if speed > time then
@object
object / AdventOfCode2023.12.04.fsx
Created December 4, 2023 06:03
Advent of Code 2023, December 4
#time "on"
open System
open System.IO
open System.Collections.Generic
let parseCards (str: string) =
str.Trim().Split(' ') |> Seq.filter(not << String.IsNullOrWhiteSpace) |> Seq.map Int32.Parse |> Seq.toArray
let parseLine (str: string) =
@object
object / AdventOfCode2023.12.01.fsx
Created December 1, 2023 08:38
Advent of Code 2023, December 1
open System
open System.IO
let input =
File.ReadAllLines(__SOURCE_DIRECTORY__ + "/../data/input01.txt")
|> Seq.toList
let findNum1 x =
if x >= '0' && x <= '9' then Some (int (x-'0')) else None