std

You may notice in the standard library package definitions there is no direct usage of the defpackage macro, or even uiop:define-package. Instead, we rely on our own incarnation, defpkg:

(describe 'std/defpkg:defpkg)

STD/DEFPKG:DEFPKG
  [symbol]

DEFPKG names a macro:
  Lambda-list: (PACKAGE &REST CLAUSES)
  Documentation:
    Richard's Robust DEFPACKAGE macro. Based on UIOP:DEFINE-PACKAGE ymmv.
    
    DEFPKG takes a PACKAGE and a number of CLAUSES, of the form (KEYWORD . ARGS).
    
    DEFPKG supports the following standard extensions:
    USE, SHADOW, SHADOWING-IMPORT-FROM, IMPORT-FROM, EXPORT, INTERN -- as per CL:DEFPACKAGE.
    
    As well as the common extensions:
    RECYCLE, MIX, REEXPORT, UNINTERN -- as per UIOP/PACKAGE:DEFINE-PACKAGE
    
    Additionally, DEFPKG supports the following combinators:
    
    MIX-REEXPORT -- combination of MIX and REEXPORT
    
    USE-REEXPORT -- combination of USE and REEXPORT
    
    and the following custom extensions:
    
    PRELUDE -- treat the first element as the name of a 'prelude' package which
    will be defined with the remaining symbols re-exported from PACKAGE and only
    those symbols.
    
    In addition to defining and returning a package, when *DEFPKG-HOOK* is
    non-nil, it is called as a function with a single argument - the package being
    defined.
  Source file: /home/ellis/comp/core/std/defpkg.lisp

The std/defsys package is the last package defined in the std system, which itself uses the much more popular ASDF.

Similarly to std/defpkg, our goal is to provide a similar interface to asdf:defsystem. As of [2025-07-04 Fri] however this interface is mostly unwritten. At some point we will take another stab at it.

Symbols are quite important in Lisp and in the std/sym package you will find some important utilities for working with them.

• vboundp! and fboundp! are inspired by the c-mera library and paper, providing quite useful for source-to-source compilers.
• alias-function and alias-macro are from the lparallel library, implemented in terms of compiler-function and macro-function respectively.
• with-gensyms is our preferred name as opposed to with-unique-names which is already defined by the implementation. Instead of re-writing we set the macro-function of the with-gensyms symbol directly.
• symbolicate and keywordicate are popular extensions defined by the implementation and re-exported here.

Lists are the most primitive as well as the most flexible sequence type available in Lisp. At run-time seasoned Lispers have a tendency to use arrays instead of large lists when performance is needed, but lists have some additional properties not shared by arrays which make them the standard for all sorts of compile-time meta-programming. For starters, lambda expressions, function calls, and all special forms may be read and written as lists.

• dlist is an implementation of doubly-linked lists, originally inspired by matlisp. The vocabluarly includes dcons, dpush, dpop, drdc, dcdr, dcar, and dappendf.
• toposort is a variant on topological-sort also defined in matlisp.
• common functions and macros from alexandria and serapeum
• merge! and sort! from cl-bench
• list utils from Let over Lambda and On Lisp

Some useful primitives which don't have a clear home package are defined in std/prim.

• definline is one of the most commonly used exports - as the name suggests it defines a function which is automatically declaimed inline.

Standard utilities for defining and handling conditions can be found in std/condition.

std/type provides definitions for common types not covered in the ANSI CL standard.

• most of CDR5 is implemented except RATIO-related definitions

Standard numeric utilities are provided by std/num. This package spans multiple files covering specific features.

• utilities from alexandria/numbers
• number parsing functions: parse-number, parse-integers, parse-real-number, parse-positive-real-number
• floating-point encoding/decoding: decode-float32, decode-float64, encode-float32, and encode-float64
• u/leb128 encoding/decoding: read-leb128, encode-leb128, encode-uleb128, decode-leb128, and decode-uleb128

std/stream constains our standard set of stream definitions.

• wrapped-stream implements the standard 'transparent' stream interface used as a superclass by other stream classes. The stream slot is accessible via the generic stream-of.

• implementation re-exports including with-array-data

Hash-tables in Lisp are the O(1) older brother of alists and plists. Sometimes it is convenient to use the cons-based siblings, but for most instance of key -> value pairs you're better off with a hash-table. std/hash-table provides some utilities for working with them.

Currying is a popular paradigm in pure(r) functional programming languages such as Haskell. std/curry provides such functional composition primitives.

Standard macros are defined in std/macs.

(generic-function-methods (function serialize))

(#<STANDARD-METHOD STD/SERDE:SERIALIZE (BOX/IGNITION:IGNITION-CONFIG
                                        (EQL :IGNITION)) {121961B023}>
 #<STANDARD-METHOD STD/SERDE:SERIALIZE (POD:CONTAINERFILE
                                        (EQL :BYTES)) {120F20F7B3}>
 #<STANDARD-METHOD STD/SERDE:SERIALIZE (POD:CONTAINERFILE
                                        (EQL :STRING)) {120F20F223}>
 #<STANDARD-METHOD STD/SERDE:SERIALIZE (NET/CODEC/TLV:TLV
                                        (EQL :STRING)) {120526ED53}>
 #<STANDARD-METHOD STD/SERDE:SERIALIZE (NET/CODEC/TLV:TLV
                                        (EQL :BYTES)) {120526ECB3}>
 #<STANDARD-METHOD STD/SERDE:SERIALIZE (ORGAN/GRAPH:ORG-GRAPH T) {12052389B3}>
 #<STANDARD-METHOD STD/SERDE:SERIALIZE (STRING (EQL :QRCODE)) {1204DD2A03}>
 #<STANDARD-METHOD STD/SERDE:SERIALIZE (DAT/TOML:TOML-TABLE
                                        (EQL :TOML)) {1204B57103}>
 #<STANDARD-METHOD STD/SERDE:SERIALIZE (T (EQL :XML)) {121A80A6F3}>
 #<STANDARD-METHOD STD/SERDE:SERIALIZE (T (EQL :JSON)) {121A3C3E33}>
 #<STANDARD-METHOD STD/SERDE:SERIALIZE (VECTOR (EQL :CSV)) {121A2C5E93}>
 #<STANDARD-METHOD STD/SERDE:SERIALIZE (OBJ/GRAPH:GRAPH
                                        (EQL :DOT)) {121A2938D3}>
 #<STANDARD-METHOD STD/SERDE:SERIALIZE (T (EQL :SXP)) {121A24A4D3}>)

(generic-function-methods (function deserialize))

(#<STANDARD-METHOD STD/SERDE:DESERIALIZE (PATHNAME
                                          (EQL :PKGBUILD)) {1223AA4663}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (T (EQL :IGNITION)) {1219618403}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (PATHNAME
                                          (EQL :CONTAINERFILE)) {120F20EC83}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (T (EQL :OPENAPI)) {1210CCC7A3}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (DAT/JSON:JSON-OBJECT
                                          (EQL :OPENAPI)) {1210CCB883}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (STREAM (EQL :TLV)) {120526EF33}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (SIMPLE-ARRAY
                                          (EQL :TLV)) {120526EE93}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (STRING (EQL :AUTHINFO)) {1205187843}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (PATHNAME
                                          (EQL :AUTHINFO)) {12051877A3}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (T
                                          (EQL :DNSMASQ-CONFIG)) {1204D83EA3}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (T (EQL :PACMAN-CONFIG)) {1204AF2E83}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (STREAM (EQL :TOML)) {1204B572E3}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (STRING (EQL :TOML)) {1204B57243}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (PATHNAME (EQL :TOML)) {1204B571A3}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (T (EQL :DESKTOP-ENTRY)) {1204B55B33}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (PATHNAME (EQL :INI)) {1204B54DA3}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (STRING (EQL :INI)) {1204B54D03}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (STREAM (EQL :INI)) {1204B54C63}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (T (EQL :HTML)) {1204B50243}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (PATHNAME (EQL :XML)) {121A80A0E3}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (STREAM (EQL :XML)) {121A809AD3}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (STRING (EQL :XML)) {121A809263}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (T (EQL :JSON-SCHEMA)) {121A465253}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (DAT/JSON:JSON-OBJECT
                                          (EQL :JSON-SCHEMA)) {121A464C33}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (STREAM (EQL :JSON)) {121A3C3813}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (PATHNAME (EQL :JSON)) {121A3C30F3}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (STRING (EQL :JSON)) {121A3C2A13}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (STRING (EQL :CSV)) {121A2C74C3}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (T (EQL :CSV)) {121A2C6BB3}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (PATHNAME (EQL :CSV)) {121A2C64A3}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (STRING (EQL :DOT)) {121A293EF3}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (PATHNAME (EQL :SXP)) {121A24BF03}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (STREAM (EQL :SXP)) {121A24B6C3}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (STRING (EQL :SXP)) {121A24AF03}>
 #<STANDARD-METHOD STD/SERDE:DESERIALIZE (T (EQL :ASN1)) {121A19B023}>)

std/fmt contains a variety of format and print-related functions, including basic text drawing primitives.

(smile)

 ▄▀▀▀▀▄ 
█ ▀  ▀ █
█ ▀▄▄▀ █
 ▀▄▄▄▄▀ 

Some examples are shown below:

(print-in-box "hello world")

┌───────────┐
│hello world│
└───────────┘

(print-slots (make-spin-queue))

HEAD                           = (:NULL)
TAIL                           = (:NULL)

(print-heading "table formatter")
(print-table (group (iota 200) 10) :align :right :gap " ")
(print-heading "tree formatter")
(fmt-tree t (group (zip-list (group (iota 42) 3)) 2))

table formatter
▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀

  0   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 194 195 196 197 198 199

tree formatter
▀▀▀▀▀▀▀▀▀▀▀▀▀▀

 ╭─ ((18 19 20))
 │   ╰─ (21 22 23)
 ├─ ((12 13 14))
 │   ╰─ (15 16 17)
 ├─ ((6 7 8))
 │   ╰─ (9 10 11)
(((0 1 2)) ((3 4 5)))
 ├─ ((24 25 26))
 │   ╰─ (27 28 29)
 ├─ ((30 31 32))
 │   ╰─ (33 34 35)
 ╰─ ((36 37 38))
     ╰─ (39 40 41)

(draw-one-in-chance 3)
(draw-chance 87)
(plot-function 'sin -5 5)

▄▀ ▄    ▀ ▀▄    ▄ ▄▄  ▄  ▄   ▄  
▄▄█ ▀▀▄▄▄▀  ▀   ▀█▄█ ▄    ▀ ▀▄▀ 
  ▄ █ █  ▀▄▄█▄  ▀▄▄▄      █  ▀  
 ▄   ▄▀█▄   ▄ ▄▀▀  ▀█ █▄▄▄ ▄▄ ▀ 
 ▀▀▄ ▄  ▄ ▀ ▄▀ ▄▄  ▀█    █ ▀ ▀▄ 
█▄▀▄█ ▀  ▄▄▀▄ █▄ ▄ ▀▀▄▄▀▀ ▄  █▀▀
 ▀█▄▄▄  ▄█▀  █ ▀▄▄ ▀  ▄ █ ▄  ▀  
 █  ▀█  ▀▄ ▄▀▄  ▄▄    ▄█▀█   ▀▀ 
   ▀▀ ▀▀▄█    ▄  ▄▀  █▄ ▀▄▄█ ▄  
▄▄ ██    ▄ ▄    ▄ ▄ ▄█ █ ▄▄▄█ ▄ 
▀██▄█ ▀ █ ▀ ▀▄  ▄█▄▀▄   ▀▀▄▀ ▀▀ 
 ▄   █ ▄▄▄▀▀ ▀███▀ █ ▀▄▄  ▄  ▄ ▀
▀▀ ▄▄ ▀▀▄█▄█▀██ █ █▄  ▄▀█   ▄  ▄
▄▄▄█  ▀  ▄▀▀  ▄▀ ▄▀  ▄  ▀▀  ▄█▄▀
▄▄ ▄ ▄▀ ▄ ▀ ▀█▀▄▄▄  ▀▄▀▄ ▄█ ▄ ██
   ▄█▄▀▄▀█ ▄ ▄▀▀▄▄▄▄ ▀▄  ▀  ▀█▀ 
██▀████████████▀████▄ ███▀███▀█▀▄▀▄▄█▄▀▀▄▄ ▄ ▄█ ▀ ▄   ▀▀▄█▀ ▀█▀  ▀▄   ▄ ▄   ▀      ▀   
███████▀██████▄▀██ ▀▀███▀▀▀▀ ▀█▄█ ██ ▀▀ █ █▀▀▀▄   ▀▀▄  ▀ █▀▀▀  ▀ ▄ ▄▄   ▄        ▄ ▄   
█████████████▀▄▀██▄ █████▀██████▀█▄▀▄█ █ ▄█▄▄ ▀ ▄ ▄▄▀ ▄▀ ▄▄▀  ▄  ▄  ▀  ▄ ▄  ▄   ▄▀   ▄ 
██████████████▀███▄█▀▀▀▀█▄███▄▀▄▄▀█ █▀██▄███▄▄▄ ▄▄  ▄▄█▄ ▄▀   ▄▀▄ ▄      ▄       ▀     
████████▀███████████▄▀▄▄▀██ ▀▄██▄██▄█▄ ▀▀▀▄ ▀█ █  ▄▀▀  ▄ ▀  ▀▄▀ ▀▀▀▄  ▄▀     ▄         
█▄█████▀██▀█▄██████▄██▀▀████▀▄▄▀▀▄▄▀▀▄ ▄▀█ ▄▄▀ ▀▄ ▀▀▀▀▀  ▀ ▀   ██    ▄ ▀       ▀       
████▀▄██▄██████ █ ███▄▀▄▀▀ ▀▄██▄████ ▀ ▀ ██▄▄██▀██▀   ▄▀  ▀█▀▄▀▀  ▄▄      ▄█   ▄       
█████████▄███████▀ ██▄  ▀▀▀██▄██▄  █▀▀█▀ ▀▀ ██    ███ ▀ ▄  ▄▀   ▄▀     ▄     ▀         
█████████▄█▀███████████▀█▀ ▀▀▄ ▄█▀▀▄ ▄▀▄██▄▀   ▀▄▀ ▄█ ▀▀█▄▄ ▀  ▀▄ ▀   ▄▄▄▄ ▄       ▀   
██████████▄▄█████ █ ▀█▄  █ ▀█▀█▄█ █▀ ██ █ ▀▀▀ ▄ ▀▀▀  █ ▄▀ █ ▄     ▄▄   ▀    ▀          
██████▀█████▄█████▀█▀██▄▀███▄▀█▀▄▄█▄▀█ ▄▀▄▀▀▀█▀ ▀█▄ ▀ ▀ ▄ ▄  █▄  ▀▄    ▄█      ▄       
█████▄█▄███▀███▄█▄▀▀▄██▄▀▄▀▀█  ▄███ ▄█▀██▀▀▄  ▄█ ▀█▀  ▄ ▄ ▄█ ▀ ▀     ▀   ▀       ▄     
███████████████▄█▀█▄▀██▄███▄▀▄▀ █ ▀▄█▀█▄▀███▄▀▀█ █  ▀▀▄▄▄▄█▄     ▄▀▀ ▄     ▄  ▄        
███████▄██▄█▄██▄███▀▀█▄██▄▄▀███ █▀ ▀███▀▄██ ▀▀▄▀▀  ██▄   ▀▄ ▄▀ ▄ █       ▄▀ ▄    ▀▀    
███▀▄████▀▄█▀██▀██▄███ ▀▀▄▄ █ ▀██▄▀ ██ ▀ ▄▄  ▀▀   █▀▄▀▄▄  ▀ █▀  ██▄      ▄▄  ▄▀  ▄ ▀▄  
█████████████▄██▀▄██████▄██▄▄▀██   ▀███▄▄▄█▄  █ ▀█ ▀▄  █▄ ▀▄ ▄     ▀ █▀ ▀   ▄▄         
█▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀█
█                                                              █
█                                                              █
█                                                              █
█                                                              █
█▀▀▀▀▄▄                               ▄▄▀▀▀▀▀▄▄                █
█      ▀▄                           ▄▀         ▀▄              █
█        ▀▄                       ▄▀             ▀▀▄           █
█          ▀▄                  ▄▀▀                  ▀▄         █
█            ▀▄▄             ▄▀                       ▀▄       █
█               ▀▄         ▄▀                           ▀▄     █
█                 ▀▀▄▄▄▄▄▀▀                               ▀▀▄▄▄█
█                                                              █
█                                                              █
█                                                              █
█▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄█

(human-readable-size 101010101) ;; in btes

96.33 MB

(print-heading "ascii art")
(sun :size 24)
(peace)
(sunbeam :step 4 :size 32)
(moire :size 32 :filled t :step 2)

ascii art
▀▀▀▀▀▀▀▀▀

         ▄▄▄▄▄▄▄        
      ▄███████████▄     
    █████████████████   
  ▄███████████████████▄ 
 ▄█████████████████████▄
 ███████████████████████
 ███████████████████████
 ███████████████████████
  █████████████████████ 
   ▀█████████████████▀  
    ▀▀█████████████▀▀   
       ▀▀███████▀▀      
    ▄▄▄▄▄   
  ▄▀  █  ▀▄ 
 █    █    █
 █   ▄█▄   █
 ▀▄▄▀ █ ▀▄▄▀
   ▀▄▄█▄▄▀  
█  ▄▀  ▄▀  ▄▀  ▄▀  ▄▀  ▄▀  ▄▀ ▄▀
█  █   █  ▄▀  █   █  ▄▀  ▄▀ ▄▀  
█  █  █   █  █  ▄▀  █  ▄▀ ▄▀ ▄▀▀
█  █  █  █  █  ▄▀ ▄▀ ▄▀ ▄▀ ▄▀   
█ █  █  █  █  █  █ ▄▀ ▄▀ ▄▀  ▄▀▀
█ █  █ ▄▀ █ ▄▀ ▄▀ █ ▄▀▄▀▀ ▄▀▀   
█ █ █ ▄▀ █ ▄▀▄▀ ▄▀▄▀▄▀ ▄▄▀  ▄▄▀▀
█ █ █ █ █ █ ▄▀▄▀▄▀▄▀ ▄▀  ▄▄▀    
██ █ █ █ █▄▀▄▀▄█▄▀▄▀▀ ▄▀▀  ▄▄▀▀▀
██ █▄▀█▄▀▄█▀▄█▀▄▄▀▄▄▀▀ ▄▄▀▀     
███▄▀█▄█▀█▄█▀▄▀▄▄▀ ▄▄▀▀   ▄▄▄▀▀▀
███████▄███▀█▄▀▄▄▀▀ ▄▄▄▀▀▀      
██████████▀█▄▀▀▄▄▀▀▀   ▄▄▄▄▀▀▀▀▀
███████████▄▀▀█▄▄▄▀▀▀▀▀         
█████████▀▀███▄▄▄▄▄▄▄▀▀▀▀▀▀▀▀▀▀▀
███████████▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄ 
          ▄▄▄▀▀▀▀▀▀▀▄▄▄   ▄▄▄▀▀▀▀▀▀▀▄▄▄         
       ▄▀▀▄▄▄▀▀▀▀▀▀▀▄▄▄█▀█▄▄▄▀▀▀▀▀▀▀▄▄▄▀▀▄      
    ▄▀▀▄▄▀ ▄▄▀▀▀▀▀▀▀▄█▀█▄█▀█▄▀▀▀▀▀▀▀▄▄ ▀▄▄▀▀▄   
   ▄▀▄▀ ▄▀▀▄▄▀▀▀▀▀▀██▄▀▀▄▀▀▄██▀▀▀▀▀▀▄▄▀▀▄ ▀▄▀▄  
  █ ▄▀▄▀ ▄▀ ▄▄▀▀▀▀█▄▄▀██ ██▀▄▄█▀▀▀▀▄▄ ▀▄ ▀▄▀▄ █ 
 █ █ ▄▀▄▀ ▄▀ ▄▀▀▀█▀█ ██▄▀▄██ █▀█▀▀▀▄ ▀▄ ▀▄▀▄ █ █
▄▀▄▀▄▀▄▀ █ ▄▀▄▄▀█▀▄███▄█ █▄███▄█▀▀▄▄▀▄ █ ▀▄█▄▀▄█
█ █ █ █ █ █ ▄▀▄▀█▀███ ███ ███▀██▀▀▄█▄ ███ ███ ██
█ █ █ █ █ █ █ █ █ ███ ███ ███ ██  ███ ███ ███ ██
█ █ █ █ ▀▄▀▄ █▄▀█▀███▄██▀▄██████▀▀▄█ ▄▀█▀ ███ ██
 █ █ █ █ ▀▄ ▀▄ ▀▀█ █▀█▄█ █▄█▀█ █▀▀ ▄▀ ▄▀ █ █ █ █
 ▀▄▀▄ █ ▀▄ ▀▄▄▀▀▀▀██▄▀█▄▀▄█▀▄██▀▀▀▀▄▄▀ ▄▀ █ ▄▀▄▀
  ▀▄ █ ▀▄ ▀▄▄ ▀▀▀▀▀▄▄█▀▀▄▀▀█▄▄▀▀▀▀▀ ▄▄▀ ▄▀ █ ▄▀ 
    █ ▀▄▄▀▀▄▄▀▀▀▀▀▀▀█▄▀█▄█▀▄█▀▀▀▀▀▀▀▄▄▀▀▄▄▀ █   
     ▀▀▄ ▀▄▄▄▀▀▀▀▀▀▀▄███ ███▄▀▀▀▀▀▀▀▄▄▄▀ ▄▀▀    
        ▀▀▄▄▄▀▀▀▀▀▀▀▄▄▄▀▀▀▄▄▄▀▀▀▀▀▀▀▄▄▄▀▀