This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/home/avp/.guix-profile/bin/guile \ | |
-L modules -e main -s | |
!# | |
;; https://github.com/artyom-poptsov/guile-png | |
(use-modules (oop goops) | |
(logging logger) | |
(png) | |
(png fsm context) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env guile \ | |
-L modules -e main -s | |
!# | |
;; This work is dedicated to the victims of the terrorist attack that took | |
;; place on March 22, 2024 at "Crocus City Hall" in Moscow. | |
;; | |
;; Copyright (C) 2024 Artyom V. Poptsov <poptsov.artyom@gmail.com> | |
;; | |
;; Mastodon: https://fosstodon.org/@avp |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
/* | |
Copyright (C) 2024 Artyom V. Poptsov <poptsov.artyom@gmail.com> | |
Mastodon: https://fosstodon.org/@avp | |
GitHub: https://github.com/artyom-poptsov | |
Home page: https://memory-heap.org | |
Copying and distribution of this file, with or without modification, | |
are permitted in any medium without royalty provided the copyright | |
notice and this notice are preserved. This file is offered as-is, | |
without any warranty. |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/bash | |
PACKAGE="$1" | |
./pre-inst-env guix build $( ./pre-inst-env guix refresh --list-dependent "$PACKAGE" | awk -F: '{print $2}') |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
/* | |
Copyright (C) 2023 Artyom V. Poptsov <poptsov.artyom@gmail.com> | |
Mastodon: https://fosstodon.org/@avp | |
Home page: https://memory-heap.org | |
Copying and distribution of this file, with or without modification, | |
are permitted in any medium without royalty provided the copyright | |
notice and this notice are preserved. This file is offered as-is, | |
without any warranty. |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/bash | |
OUTPUT=stat-dsv.log | |
for i in $(seq 10); do | |
/usr/bin/time -o $OUTPUT -a -f "%e" ./pre-inst-env ./utils/dsv --to rfc4180 datasets/covid.csv > test.csv | |
done |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
set title "Marlin UBL mesh values" | |
set xlabel "X" | |
set ylabel "Y" | |
set zlabel "Z" | |
set grid | |
set label 1 "XY HOME" textcolor 'red' offset -5,0 at -1,8,-1.4 point pt 18 lc rgb 'red' | |
set label 1 front |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/bash | |
cd /tmp/ | |
wget https://mirrors.ctan.org/macros/unicodetex/latex/lilyglyphs.zip | |
unzip lilyglyphs.zip | |
sudo cp -r ./lilyglyphs/tex/* /usr/share/texmf/tex/latex/ | |
rm lilyglyphs.zip |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/guile \ | |
-L modules -e main -s | |
!# | |
(use-modules (oop goops) | |
(ssh session) | |
(ssh auth) | |
(metabash plumber) | |
(metabash diff)) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(define-syntax M#! | |
(syntax-rules (=>) | |
((_ type command) | |
(list (quote type) command)) | |
((_ => type command) | |
`(,(list (quote type) command))) | |
((_ => type command rest ...) | |
`(,(list (quote type) command) ,@(M#! rest ...))) | |
((_ type command => rest ...) | |
(apply plumb `(,(list (quote type) command) ,@(M#! => rest ...)))))) |
NewerOlder