RosettaCodeData/Task/Sierpinski-carpet/UNIX-Shell/sierpinski-carpet.sh
Ingy döt Net 776bba907c Sync
2013-10-27 22:24:23 +00:00

11 lines
350 B
Bash

#!/bin/bash
sierpinski_carpet() {
local -i n="${1:-3}"
local carpet="${2:-#}"
while (( n-- )); do
local center="${carpet//#/ }"
carpet="$(paste -d ' ' <(echo "$carpet"$'\n'"$carpet"$'\n'"$carpet") <(echo "$carpet"$'\n'"$center"$'\n'"$carpet") <(echo "$carpet"$'\n'"$carpet"$'\n'"$carpet"))"
done
echo "$carpet"
}