yvern

if [ -x /usr/games/cowsay -a -x /usr/games/fortune ]; then
   fortune | cowsay -f $(ls /usr/share/cowsay/cows/ | shuf -n1) | lolcat -a -d 1 --freq "0.$(shuf -i 1-10 -n 1)" --seed $RANDOM
fi

yvern

Keybase proof

I hereby claim:

• I am yvendruscolo on github.
• I am yorggen (https://keybase.io/yorggen) on keybase.
• I have a public key ASDqLdUfP3b0deCu7XZZ14NCNK9b3tz1reDa9vnZtJBCKgo

To claim this, I am signing this object:

yvern

->: make op! :function ; arrow-style lambdas: [x]->[x + 1]

id: ["Identity function, one in, same out" x]->[x]

;--------------------------------------------------------------------------------------

cmp: ["Gets a block! of words! or blcoks! that represent a function! and composes it in the usual way" 
  fs [any-block!]]->[ [x]-> compose/deep/only [take reduce append (reduce fs) [x] ]
]