basalt-bedrock 1.0.0

Definitions for Basalt competition packets
Documentation 
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

#set table(
  stroke: (x, y) => if y == 0 {
    (bottom: 0.7pt + black)
  } else { 
    (
      bottom: .1pt + black,
      left: if x == 0 { none } else {
        .1pt + black
      }
    )
  }
)

// Title page
#align(center, {
  text(size: 1.6em, weight: "bold")[#title]
  box(line(length: 100%, stroke: 1pt))
})

#if type(preamble) != none [
  #preamble
]

// Page heading
#set page(
  numbering: "1",
  header: context {
    if counter(page).get().first() > 1 [
      #set text(style: "italic")
      #title
      #block(line(length: 100%, stroke: 0.5pt), above: 0.6em)
    ]
  })

  #let codeblock(content) = {
    box(
      inset: .75em,
      width: 100%,
      raw(content)
    )
  };

  #let test-case(input, output) = {
    let colour = luma(95%);
    box(
      if (input.len() == 0) and (output.len() != 0) [
        #grid(
          columns: (1fr),
          column-gutter: 1em,
          row-gutter: .5em,
          strong[Output],
          grid.cell(codeblock(output), fill: colour, stroke: luma(80%)),
        )
      ] else [
        #grid(
          columns: (1fr, 1fr),
          column-gutter: 1em,
          row-gutter: .5em,
          strong[Input],
          strong[Output],
          grid.cell(codeblock(input), fill: colour, stroke: luma(80%)),
          grid.cell(codeblock(output), fill: colour, stroke: luma(80%)),
        )
      ]
    )
  }

  #for q in problems {
    [
      #pagebreak()
      = #q.title
      #if "description" in q {
        q.description
      }

      #for (i, test) in q.tests.filter(t => t.visible).enumerate() {
        [== Test case #{i+1}]
        test-case(test.input, test.output)
      }
    ]
  }