Skip to content

Instantly share code, notes, and snippets.

@astynax
Created June 19, 2020 11:35
Show Gist options
  • Save astynax/09f36350c6656da6f74f112a47a20942 to your computer and use it in GitHub Desktop.
Save astynax/09f36350c6656da6f74f112a47a20942 to your computer and use it in GitHub Desktop.
Text pattern generating language (make an TUI/CLI app someday).
> mirror = map reverse
> flip = reverse
> beside x = zipWith (++) x x
> above x = x ++ x
> beside = zipWith (++)
> above = (++)
> sq x = let y = mirror x in above (beside x y) (beside y x)
> display $ enlarge $ enlarge $ sq [" a", "b "]
aaaaaaaa
aaaaaaaa
aaaaaaaa
aaaaaaaa
bbbb bbbb
bbbb bbbb
bbbb bbbb
bbbb bbbb
aaaa aaaa
aaaa aaaa
aaaa aaaa
aaaa aaaa
bbbbbbbb
bbbbbbbb
bbbbbbbb
bbbbbbbb
> display $ enlarge $ enlarge $ sq [" #", ". "]
########
########
########
########
.... ....
.... ....
.... ....
.... ....
#### ####
#### ####
#### ####
#### ####
........
........
........
........
> sq x = let y = flip (mirror x) in above (beside x y) (beside y x)
> display $ enlarge $ enlarge $ sq [" #", ". "]
#### ....
#### ....
#### ....
#### ....
.... ####
.... ####
.... ####
.... ####
.... ####
.... ####
.... ####
.... ####
#### ....
#### ....
#### ....
#### ....
> display $ sq $ enlarge $ enlarge $ sq [" #", ". "]
#### .... .... ####
#### .... .... ####
#### .... .... ####
#### .... .... ####
.... #### #### ....
.... #### #### ....
.... #### #### ....
.... #### #### ....
.... #### #### ....
.... #### #### ....
.... #### #### ....
.... #### #### ....
#### .... .... ####
#### .... .... ####
#### .... .... ####
#### .... .... ####
.... #### #### ....
.... #### #### ....
.... #### #### ....
.... #### #### ....
#### .... .... ####
#### .... .... ####
#### .... .... ####
#### .... .... ####
#### .... .... ####
#### .... .... ####
#### .... .... ####
#### .... .... ####
.... #### #### ....
.... #### #### ....
.... #### #### ....
.... #### #### ....
> display $ sq $ enlarge $ enlarge $ sq [" .#", ". "]
....#### .... .... ....####
....#### .... .... ....####
....#### .... .... ....####
....#### .... .... ....####
.... ####.... ####.... ....
.... ####.... ####.... ....
.... ####.... ####.... ....
.... ####.... ####.... ....
.... ....#### ....#### ....
.... ....#### ....#### ....
.... ....#### ....#### ....
.... ....#### ....#### ....
####.... .... .... ####....
####.... .... .... ####....
####.... .... .... ####....
####.... .... .... ####....
.... ....#### ....#### ....
.... ....#### ....#### ....
.... ....#### ....#### ....
.... ....#### ....#### ....
####.... .... .... ####....
####.... .... .... ####....
####.... .... .... ####....
####.... .... .... ####....
....#### .... .... ....####
....#### .... .... ....####
....#### .... .... ....####
....#### .... .... ....####
.... ####.... ####.... ....
.... ####.... ####.... ....
.... ####.... ####.... ....
.... ####.... ####.... ....
> display $ sq $ enlarge $ enlarge $ sq [" .#", "* "]
....#### **** **** ....####
....#### **** **** ....####
....#### **** **** ....####
....#### **** **** ....####
**** ####.... ####.... ****
**** ####.... ####.... ****
**** ####.... ####.... ****
**** ####.... ####.... ****
**** ....#### ....#### ****
**** ....#### ....#### ****
**** ....#### ....#### ****
**** ....#### ....#### ****
####.... **** **** ####....
####.... **** **** ####....
####.... **** **** ####....
####.... **** **** ####....
**** ....#### ....#### ****
**** ....#### ....#### ****
**** ....#### ....#### ****
**** ....#### ....#### ****
####.... **** **** ####....
####.... **** **** ####....
####.... **** **** ####....
####.... **** **** ####....
....#### **** **** ....####
....#### **** **** ....####
....#### **** **** ....####
....#### **** **** ....####
**** ####.... ####.... ****
**** ####.... ####.... ****
**** ####.... ####.... ****
**** ####.... ####.... ****
> display $ sq $ sq $ enlarge $ enlarge $ sq [" .#", "* "]
....#### **** **** ....#### **** ....#### ....#### ****
....#### **** **** ....#### **** ....#### ....#### ****
....#### **** **** ....#### **** ....#### ....#### ****
....#### **** **** ....#### **** ....#### ....#### ****
**** ####.... ####.... **** ####.... **** **** ####....
**** ####.... ####.... **** ####.... **** **** ####....
**** ####.... ####.... **** ####.... **** **** ####....
**** ####.... ####.... **** ####.... **** **** ####....
**** ....#### ....#### **** ....#### **** **** ....####
**** ....#### ....#### **** ....#### **** **** ....####
**** ....#### ....#### **** ....#### **** **** ....####
**** ....#### ....#### **** ....#### **** **** ....####
####.... **** **** ####.... **** ####.... ####.... ****
####.... **** **** ####.... **** ####.... ####.... ****
####.... **** **** ####.... **** ####.... ####.... ****
####.... **** **** ####.... **** ####.... ####.... ****
**** ....#### ....#### **** ....#### **** **** ....####
**** ....#### ....#### **** ....#### **** **** ....####
**** ....#### ....#### **** ....#### **** **** ....####
**** ....#### ....#### **** ....#### **** **** ....####
####.... **** **** ####.... **** ####.... ####.... ****
####.... **** **** ####.... **** ####.... ####.... ****
####.... **** **** ####.... **** ####.... ####.... ****
####.... **** **** ####.... **** ####.... ####.... ****
....#### **** **** ....#### **** ....#### ....#### ****
....#### **** **** ....#### **** ....#### ....#### ****
....#### **** **** ....#### **** ....#### ....#### ****
....#### **** **** ....#### **** ....#### ....#### ****
**** ####.... ####.... **** ####.... **** **** ####....
**** ####.... ####.... **** ####.... **** **** ####....
**** ####.... ####.... **** ####.... **** **** ####....
**** ####.... ####.... **** ####.... **** **** ####....
**** ....#### ....#### **** ....#### **** **** ....####
**** ....#### ....#### **** ....#### **** **** ....####
**** ....#### ....#### **** ....#### **** **** ....####
**** ....#### ....#### **** ....#### **** **** ....####
####.... **** **** ####.... **** ####.... ####.... ****
####.... **** **** ####.... **** ####.... ####.... ****
####.... **** **** ####.... **** ####.... ####.... ****
####.... **** **** ####.... **** ####.... ####.... ****
....#### **** **** ....#### **** ....#### ....#### ****
....#### **** **** ....#### **** ....#### ....#### ****
....#### **** **** ....#### **** ....#### ....#### ****
....#### **** **** ....#### **** ....#### ....#### ****
**** ####.... ####.... **** ####.... **** **** ####....
**** ####.... ####.... **** ####.... **** **** ####....
**** ####.... ####.... **** ####.... **** **** ####....
**** ####.... ####.... **** ####.... **** **** ####....
....#### **** **** ....#### **** ....#### ....#### ****
....#### **** **** ....#### **** ....#### ....#### ****
....#### **** **** ....#### **** ....#### ....#### ****
....#### **** **** ....#### **** ....#### ....#### ****
**** ####.... ####.... **** ####.... **** **** ####....
**** ####.... ####.... **** ####.... **** **** ####....
**** ####.... ####.... **** ####.... **** **** ####....
**** ####.... ####.... **** ####.... **** **** ####....
**** ....#### ....#### **** ....#### **** **** ....####
**** ....#### ....#### **** ....#### **** **** ....####
**** ....#### ....#### **** ....#### **** **** ....####
**** ....#### ....#### **** ....#### **** **** ....####
####.... **** **** ####.... **** ####.... ####.... ****
####.... **** **** ####.... **** ####.... ####.... ****
####.... **** **** ####.... **** ####.... ####.... ****
####.... **** **** ####.... **** ####.... ####.... ****
> display $ sq $ sq $ enlarge $ enlarge $ sq [" .#", "* ,"]
....####,,,, ****,,,, **** ....####,,,, **** ....#### ....####,,,, ****
....####,,,, ****,,,, **** ....####,,,, **** ....#### ....####,,,, ****
....####,,,, ****,,,, **** ....####,,,, **** ....#### ....####,,,, ****
....####,,,, ****,,,, **** ....####,,,, **** ....#### ....####,,,, ****
**** ,,,,####.... ####.... **** ,,,,####.... **** ,,,,**** ,,,,####....
**** ,,,,####.... ####.... **** ,,,,####.... **** ,,,,**** ,,,,####....
**** ,,,,####.... ####.... **** ,,,,####.... **** ,,,,**** ,,,,####....
**** ,,,,####.... ####.... **** ,,,,####.... **** ,,,,**** ,,,,####....
,,,, **** ....#### ....####,,,, **** ....####,,,, ****,,,, **** ....####
,,,, **** ....#### ....####,,,, **** ....####,,,, ****,,,, **** ....####
,,,, **** ....#### ....####,,,, **** ....####,,,, ****,,,, **** ....####
,,,, **** ....#### ....####,,,, **** ....####,,,, ****,,,, **** ....####
####.... **** ,,,,**** ,,,,####.... **** ,,,,####.... ####.... **** ,,,,
####.... **** ,,,,**** ,,,,####.... **** ,,,,####.... ####.... **** ,,,,
####.... **** ,,,,**** ,,,,####.... **** ,,,,####.... ####.... **** ,,,,
####.... **** ,,,,**** ,,,,####.... **** ,,,,####.... ####.... **** ,,,,
,,,, **** ....#### ....####,,,, **** ....####,,,, ****,,,, **** ....####
,,,, **** ....#### ....####,,,, **** ....####,,,, ****,,,, **** ....####
,,,, **** ....#### ....####,,,, **** ....####,,,, ****,,,, **** ....####
,,,, **** ....#### ....####,,,, **** ....####,,,, ****,,,, **** ....####
####.... **** ,,,,**** ,,,,####.... **** ,,,,####.... ####.... **** ,,,,
####.... **** ,,,,**** ,,,,####.... **** ,,,,####.... ####.... **** ,,,,
####.... **** ,,,,**** ,,,,####.... **** ,,,,####.... ####.... **** ,,,,
####.... **** ,,,,**** ,,,,####.... **** ,,,,####.... ####.... **** ,,,,
....####,,,, ****,,,, **** ....####,,,, **** ....#### ....####,,,, ****
....####,,,, ****,,,, **** ....####,,,, **** ....#### ....####,,,, ****
....####,,,, ****,,,, **** ....####,,,, **** ....#### ....####,,,, ****
....####,,,, ****,,,, **** ....####,,,, **** ....#### ....####,,,, ****
**** ,,,,####.... ####.... **** ,,,,####.... **** ,,,,**** ,,,,####....
**** ,,,,####.... ####.... **** ,,,,####.... **** ,,,,**** ,,,,####....
**** ,,,,####.... ####.... **** ,,,,####.... **** ,,,,**** ,,,,####....
**** ,,,,####.... ####.... **** ,,,,####.... **** ,,,,**** ,,,,####....
,,,, **** ....#### ....####,,,, **** ....####,,,, ****,,,, **** ....####
,,,, **** ....#### ....####,,,, **** ....####,,,, ****,,,, **** ....####
,,,, **** ....#### ....####,,,, **** ....####,,,, ****,,,, **** ....####
,,,, **** ....#### ....####,,,, **** ....####,,,, ****,,,, **** ....####
####.... **** ,,,,**** ,,,,####.... **** ,,,,####.... ####.... **** ,,,,
####.... **** ,,,,**** ,,,,####.... **** ,,,,####.... ####.... **** ,,,,
####.... **** ,,,,**** ,,,,####.... **** ,,,,####.... ####.... **** ,,,,
####.... **** ,,,,**** ,,,,####.... **** ,,,,####.... ####.... **** ,,,,
....####,,,, ****,,,, **** ....####,,,, **** ....#### ....####,,,, ****
....####,,,, ****,,,, **** ....####,,,, **** ....#### ....####,,,, ****
....####,,,, ****,,,, **** ....####,,,, **** ....#### ....####,,,, ****
....####,,,, ****,,,, **** ....####,,,, **** ....#### ....####,,,, ****
**** ,,,,####.... ####.... **** ,,,,####.... **** ,,,,**** ,,,,####....
**** ,,,,####.... ####.... **** ,,,,####.... **** ,,,,**** ,,,,####....
**** ,,,,####.... ####.... **** ,,,,####.... **** ,,,,**** ,,,,####....
**** ,,,,####.... ####.... **** ,,,,####.... **** ,,,,**** ,,,,####....
....####,,,, ****,,,, **** ....####,,,, **** ....#### ....####,,,, ****
....####,,,, ****,,,, **** ....####,,,, **** ....#### ....####,,,, ****
....####,,,, ****,,,, **** ....####,,,, **** ....#### ....####,,,, ****
....####,,,, ****,,,, **** ....####,,,, **** ....#### ....####,,,, ****
**** ,,,,####.... ####.... **** ,,,,####.... **** ,,,,**** ,,,,####....
**** ,,,,####.... ####.... **** ,,,,####.... **** ,,,,**** ,,,,####....
**** ,,,,####.... ####.... **** ,,,,####.... **** ,,,,**** ,,,,####....
**** ,,,,####.... ####.... **** ,,,,####.... **** ,,,,**** ,,,,####....
,,,, **** ....#### ....####,,,, **** ....####,,,, ****,,,, **** ....####
,,,, **** ....#### ....####,,,, **** ....####,,,, ****,,,, **** ....####
,,,, **** ....#### ....####,,,, **** ....####,,,, ****,,,, **** ....####
,,,, **** ....#### ....####,,,, **** ....####,,,, ****,,,, **** ....####
####.... **** ,,,,**** ,,,,####.... **** ,,,,####.... ####.... **** ,,,,
####.... **** ,,,,**** ,,,,####.... **** ,,,,####.... ####.... **** ,,,,
####.... **** ,,,,**** ,,,,####.... **** ,,,,####.... ####.... **** ,,,,
####.... **** ,,,,**** ,,,,####.... **** ,,,,####.... ####.... **** ,,,,
> display $ sq $ sq $ enlarge $ sq [" .#", "* ,"]
..##,, **,, ** ..##,, ** ..## ..##,, **
..##,, **,, ** ..##,, ** ..## ..##,, **
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
,, ** ..## ..##,, ** ..##,, **,, ** ..##
,, ** ..## ..##,, ** ..##,, **,, ** ..##
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
,, ** ..## ..##,, ** ..##,, **,, ** ..##
,, ** ..## ..##,, ** ..##,, **,, ** ..##
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
..##,, **,, ** ..##,, ** ..## ..##,, **
..##,, **,, ** ..##,, ** ..## ..##,, **
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
,, ** ..## ..##,, ** ..##,, **,, ** ..##
,, ** ..## ..##,, ** ..##,, **,, ** ..##
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
..##,, **,, ** ..##,, ** ..## ..##,, **
..##,, **,, ** ..##,, ** ..## ..##,, **
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
..##,, **,, ** ..##,, ** ..## ..##,, **
..##,, **,, ** ..##,, ** ..## ..##,, **
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
,, ** ..## ..##,, ** ..##,, **,, ** ..##
,, ** ..## ..##,, ** ..##,, **,, ** ..##
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
> display $ sq $ sq $ sq [" .#", "* ,"]
.#, *, * .#, * .# .#, *
* ,#. #. * ,#. * ,* ,#.
, * .# .#, * .#, *, * .#
#. * ,* ,#. * ,#. #. * ,
, * .# .#, * .#, *, * .#
#. * ,* ,#. * ,#. #. * ,
.#, *, * .#, * .# .#, *
* ,#. #. * ,#. * ,* ,#.
, * .# .#, * .#, *, * .#
#. * ,* ,#. * ,#. #. * ,
.#, *, * .#, * .# .#, *
* ,#. #. * ,#. * ,* ,#.
.#, *, * .#, * .# .#, *
* ,#. #. * ,#. * ,* ,#.
, * .# .#, * .#, *, * .#
#. * ,* ,#. * ,#. #. * ,
> display $ sq $ sq $ enlarge $ sq [" .#", "* ,"]
..##,, **,, ** ..##,, ** ..## ..##,, **
..##,, **,, ** ..##,, ** ..## ..##,, **
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
,, ** ..## ..##,, ** ..##,, **,, ** ..##
,, ** ..## ..##,, ** ..##,, **,, ** ..##
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
,, ** ..## ..##,, ** ..##,, **,, ** ..##
,, ** ..## ..##,, ** ..##,, **,, ** ..##
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
..##,, **,, ** ..##,, ** ..## ..##,, **
..##,, **,, ** ..##,, ** ..## ..##,, **
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
,, ** ..## ..##,, ** ..##,, **,, ** ..##
,, ** ..## ..##,, ** ..##,, **,, ** ..##
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
..##,, **,, ** ..##,, ** ..## ..##,, **
..##,, **,, ** ..##,, ** ..## ..##,, **
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
..##,, **,, ** ..##,, ** ..## ..##,, **
..##,, **,, ** ..##,, ** ..## ..##,, **
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
,, ** ..## ..##,, ** ..##,, **,, ** ..##
,, ** ..## ..##,, ** ..##,, **,, ** ..##
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
> display $ sq $ sq $ enlarge $ sq [" .#", " ~ ", "* ,"]
..##,, **,, ** ..##,, ** ..## ..##,, **
..##,, **,, ** ..##,, ** ..## ..##,, **
~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
,, ** ..## ..##,, ** ..##,, **,, ** ..##
,, ** ..## ..##,, ** ..##,, **,, ** ..##
~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
,, ** ..## ..##,, ** ..##,, **,, ** ..##
,, ** ..## ..##,, ** ..##,, **,, ** ..##
~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
..##,, **,, ** ..##,, ** ..## ..##,, **
..##,, **,, ** ..##,, ** ..## ..##,, **
~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
,, ** ..## ..##,, ** ..##,, **,, ** ..##
,, ** ..## ..##,, ** ..##,, **,, ** ..##
~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
..##,, **,, ** ..##,, ** ..## ..##,, **
..##,, **,, ** ..##,, ** ..## ..##,, **
~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
..##,, **,, ** ..##,, ** ..## ..##,, **
..##,, **,, ** ..##,, ** ..## ..##,, **
~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
,, ** ..## ..##,, ** ..##,, **,, ** ..##
,, ** ..## ..##,, ** ..##,, **,, ** ..##
~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
> display $ sq $ sq $ enlarge $ sq [" .#", " ~!", "* ,"]
..##,, **,, ** ..##,, ** ..## ..##,, **
..##,, **,, ** ..##,, ** ..## ..##,, **
~~!!!!~~ !!~~ ~~!!!!~~ ~~!! ~~!!!!~~
~~!!!!~~ !!~~ ~~!!!!~~ ~~!! ~~!!!!~~
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
,, ** ..## ..##,, ** ..##,, **,, ** ..##
,, ** ..## ..##,, ** ..##,, **,, ** ..##
!!~~ ~~!! ~~!!!!~~ ~~!!!!~~ !!~~ ~~!!
!!~~ ~~!! ~~!!!!~~ ~~!!!!~~ !!~~ ~~!!
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
,, ** ..## ..##,, ** ..##,, **,, ** ..##
,, ** ..## ..##,, ** ..##,, **,, ** ..##
!!~~ ~~!! ~~!!!!~~ ~~!!!!~~ !!~~ ~~!!
!!~~ ~~!! ~~!!!!~~ ~~!!!!~~ !!~~ ~~!!
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
..##,, **,, ** ..##,, ** ..## ..##,, **
..##,, **,, ** ..##,, ** ..## ..##,, **
~~!!!!~~ !!~~ ~~!!!!~~ ~~!! ~~!!!!~~
~~!!!!~~ !!~~ ~~!!!!~~ ~~!! ~~!!!!~~
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
,, ** ..## ..##,, ** ..##,, **,, ** ..##
,, ** ..## ..##,, ** ..##,, **,, ** ..##
!!~~ ~~!! ~~!!!!~~ ~~!!!!~~ !!~~ ~~!!
!!~~ ~~!! ~~!!!!~~ ~~!!!!~~ !!~~ ~~!!
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
..##,, **,, ** ..##,, ** ..## ..##,, **
..##,, **,, ** ..##,, ** ..## ..##,, **
~~!!!!~~ !!~~ ~~!!!!~~ ~~!! ~~!!!!~~
~~!!!!~~ !!~~ ~~!!!!~~ ~~!! ~~!!!!~~
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
..##,, **,, ** ..##,, ** ..## ..##,, **
..##,, **,, ** ..##,, ** ..## ..##,, **
~~!!!!~~ !!~~ ~~!!!!~~ ~~!! ~~!!!!~~
~~!!!!~~ !!~~ ~~!!!!~~ ~~!! ~~!!!!~~
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
,, ** ..## ..##,, ** ..##,, **,, ** ..##
,, ** ..## ..##,, ** ..##,, **,, ** ..##
!!~~ ~~!! ~~!!!!~~ ~~!!!!~~ !!~~ ~~!!
!!~~ ~~!! ~~!!!!~~ ~~!!!!~~ !!~~ ~~!!
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
> display $ sq $ sq $ enlarge $ sq [" .#", "* ,"]
..##,, **,, ** ..##,, ** ..## ..##,, **
..##,, **,, ** ..##,, ** ..## ..##,, **
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
,, ** ..## ..##,, ** ..##,, **,, ** ..##
,, ** ..## ..##,, ** ..##,, **,, ** ..##
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
,, ** ..## ..##,, ** ..##,, **,, ** ..##
,, ** ..## ..##,, ** ..##,, **,, ** ..##
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
..##,, **,, ** ..##,, ** ..## ..##,, **
..##,, **,, ** ..##,, ** ..## ..##,, **
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
,, ** ..## ..##,, ** ..##,, **,, ** ..##
,, ** ..## ..##,, ** ..##,, **,, ** ..##
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
..##,, **,, ** ..##,, ** ..## ..##,, **
..##,, **,, ** ..##,, ** ..## ..##,, **
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
..##,, **,, ** ..##,, ** ..## ..##,, **
..##,, **,, ** ..##,, ** ..## ..##,, **
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
** ,,##.. ##.. ** ,,##.. ** ,,** ,,##..
,, ** ..## ..##,, ** ..##,, **,, ** ..##
,, ** ..## ..##,, ** ..##,, **,, ** ..##
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
##.. ** ,,** ,,##.. ** ,,##.. ##.. ** ,,
> display $ sq $ sq $ enlarge $ sq [" \#", "* /"]
<interactive>:33:38: error:
lexical error in string/character literal at character '#'
> display $ sq $ sq $ enlarge $ sq [" \\#", "* /"]
\\##// **// ** \\##// ** \\## \\##// **
\\##// **// ** \\##// ** \\## \\##// **
** //##\\ ##\\ ** //##\\ ** //** //##\\
** //##\\ ##\\ ** //##\\ ** //** //##\\
// ** \\## \\##// ** \\##// **// ** \\##
// ** \\## \\##// ** \\##// **// ** \\##
##\\ ** //** //##\\ ** //##\\ ##\\ ** //
##\\ ** //** //##\\ ** //##\\ ##\\ ** //
// ** \\## \\##// ** \\##// **// ** \\##
// ** \\## \\##// ** \\##// **// ** \\##
##\\ ** //** //##\\ ** //##\\ ##\\ ** //
##\\ ** //** //##\\ ** //##\\ ##\\ ** //
\\##// **// ** \\##// ** \\## \\##// **
\\##// **// ** \\##// ** \\## \\##// **
** //##\\ ##\\ ** //##\\ ** //** //##\\
** //##\\ ##\\ ** //##\\ ** //** //##\\
// ** \\## \\##// ** \\##// **// ** \\##
// ** \\## \\##// ** \\##// **// ** \\##
##\\ ** //** //##\\ ** //##\\ ##\\ ** //
##\\ ** //** //##\\ ** //##\\ ##\\ ** //
\\##// **// ** \\##// ** \\## \\##// **
\\##// **// ** \\##// ** \\## \\##// **
** //##\\ ##\\ ** //##\\ ** //** //##\\
** //##\\ ##\\ ** //##\\ ** //** //##\\
\\##// **// ** \\##// ** \\## \\##// **
\\##// **// ** \\##// ** \\## \\##// **
** //##\\ ##\\ ** //##\\ ** //** //##\\
** //##\\ ##\\ ** //##\\ ** //** //##\\
// ** \\## \\##// ** \\##// **// ** \\##
// ** \\## \\##// ** \\##// **// ** \\##
##\\ ** //** //##\\ ** //##\\ ##\\ ** //
##\\ ** //** //##\\ ** //##\\ ##\\ ** //
> display $ sq $ sq $ enlarge $ sq ["\\ #", "* /"]
\\ ##// **// **\\ ##// **\\ ##\\ ##// **
\\ ##// **// **\\ ##// **\\ ##\\ ##// **
** //## \\## \\** //## \\** //** //## \\
** //## \\## \\** //## \\** //** //## \\
// **\\ ##\\ ##// **\\ ##// **// **\\ ##
// **\\ ##\\ ##// **\\ ##// **// **\\ ##
## \\** //** //## \\** //## \\## \\** //
## \\** //** //## \\** //## \\## \\** //
// **\\ ##\\ ##// **\\ ##// **// **\\ ##
// **\\ ##\\ ##// **\\ ##// **// **\\ ##
## \\** //** //## \\** //## \\## \\** //
## \\** //** //## \\** //## \\## \\** //
\\ ##// **// **\\ ##// **\\ ##\\ ##// **
\\ ##// **// **\\ ##// **\\ ##\\ ##// **
** //## \\## \\** //## \\** //** //## \\
** //## \\## \\** //## \\** //** //## \\
// **\\ ##\\ ##// **\\ ##// **// **\\ ##
// **\\ ##\\ ##// **\\ ##// **// **\\ ##
## \\** //** //## \\** //## \\## \\** //
## \\** //** //## \\** //## \\## \\** //
\\ ##// **// **\\ ##// **\\ ##\\ ##// **
\\ ##// **// **\\ ##// **\\ ##\\ ##// **
** //## \\## \\** //## \\** //** //## \\
** //## \\## \\** //## \\** //** //## \\
\\ ##// **// **\\ ##// **\\ ##\\ ##// **
\\ ##// **// **\\ ##// **\\ ##\\ ##// **
** //## \\## \\** //## \\** //** //## \\
** //## \\## \\** //## \\** //** //## \\
// **\\ ##\\ ##// **\\ ##// **// **\\ ##
// **\\ ##\\ ##// **\\ ##// **// **\\ ##
## \\** //** //## \\** //## \\## \\** //
## \\** //** //## \\** //## \\## \\** //
> display $ sq $ sq $ enlarge $ sq [" #\\", "* /"]
##\\// **// ** ##\\// ** ##\\ ##\\// **
##\\// **// ** ##\\// ** ##\\ ##\\// **
** //\\## \\## ** //\\## ** //** //\\##
** //\\## \\## ** //\\## ** //** //\\##
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
\\## ** //** //\\## ** //\\## \\## ** //
\\## ** //** //\\## ** //\\## \\## ** //
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
\\## ** //** //\\## ** //\\## \\## ** //
\\## ** //** //\\## ** //\\## \\## ** //
##\\// **// ** ##\\// ** ##\\ ##\\// **
##\\// **// ** ##\\// ** ##\\ ##\\// **
** //\\## \\## ** //\\## ** //** //\\##
** //\\## \\## ** //\\## ** //** //\\##
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
\\## ** //** //\\## ** //\\## \\## ** //
\\## ** //** //\\## ** //\\## \\## ** //
##\\// **// ** ##\\// ** ##\\ ##\\// **
##\\// **// ** ##\\// ** ##\\ ##\\// **
** //\\## \\## ** //\\## ** //** //\\##
** //\\## \\## ** //\\## ** //** //\\##
##\\// **// ** ##\\// ** ##\\ ##\\// **
##\\// **// ** ##\\// ** ##\\ ##\\// **
** //\\## \\## ** //\\## ** //** //\\##
** //\\## \\## ** //\\## ** //** //\\##
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
\\## ** //** //\\## ** //\\## \\## ** //
\\## ** //** //\\## ** //\\## \\## ** //
> display $ sq $ sq $ sq [" #\\", "* /"]
#\/ */ * #\/ * #\ #\/ *
* /\# \# * /\# * /* /\#
/ * #\ #\/ * #\/ */ * #\
\# * /* /\# * /\# \# * /
/ * #\ #\/ * #\/ */ * #\
\# * /* /\# * /\# \# * /
#\/ */ * #\/ * #\ #\/ *
* /\# \# * /\# * /* /\#
/ * #\ #\/ * #\/ */ * #\
\# * /* /\# * /\# \# * /
#\/ */ * #\/ * #\ #\/ *
* /\# \# * /\# * /* /\#
#\/ */ * #\/ * #\ #\/ *
* /\# \# * /\# * /* /\#
/ * #\ #\/ * #\/ */ * #\
\# * /* /\# * /\# \# * /
> display $ sq $ enlarge $ sq $ sq [" #\\", "* /"]
##\\// **// ** ##\\// ** ##\\ ##\\// **
##\\// **// ** ##\\// ** ##\\ ##\\// **
** //\\## \\## ** //\\## ** //** //\\##
** //\\## \\## ** //\\## ** //** //\\##
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
\\## ** //** //\\## ** //\\## \\## ** //
\\## ** //** //\\## ** //\\## \\## ** //
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
\\## ** //** //\\## ** //\\## \\## ** //
\\## ** //** //\\## ** //\\## \\## ** //
##\\// **// ** ##\\// ** ##\\ ##\\// **
##\\// **// ** ##\\// ** ##\\ ##\\// **
** //\\## \\## ** //\\## ** //** //\\##
** //\\## \\## ** //\\## ** //** //\\##
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
\\## ** //** //\\## ** //\\## \\## ** //
\\## ** //** //\\## ** //\\## \\## ** //
##\\// **// ** ##\\// ** ##\\ ##\\// **
##\\// **// ** ##\\// ** ##\\ ##\\// **
** //\\## \\## ** //\\## ** //** //\\##
** //\\## \\## ** //\\## ** //** //\\##
##\\// **// ** ##\\// ** ##\\ ##\\// **
##\\// **// ** ##\\// ** ##\\ ##\\// **
** //\\## \\## ** //\\## ** //** //\\##
** //\\## \\## ** //\\## ** //** //\\##
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
\\## ** //** //\\## ** //\\## \\## ** //
\\## ** //** //\\## ** //\\## \\## ** //
> display $ sq $ enlarge $ sq $ sq [" #\\", "* /"]
##\\// **// ** ##\\// ** ##\\ ##\\// **
##\\// **// ** ##\\// ** ##\\ ##\\// **
** //\\## \\## ** //\\## ** //** //\\##
** //\\## \\## ** //\\## ** //** //\\##
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
\\## ** //** //\\## ** //\\## \\## ** //
\\## ** //** //\\## ** //\\## \\## ** //
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
\\## ** //** //\\## ** //\\## \\## ** //
\\## ** //** //\\## ** //\\## \\## ** //
##\\// **// ** ##\\// ** ##\\ ##\\// **
##\\// **// ** ##\\// ** ##\\ ##\\// **
** //\\## \\## ** //\\## ** //** //\\##
** //\\## \\## ** //\\## ** //** //\\##
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
\\## ** //** //\\## ** //\\## \\## ** //
\\## ** //** //\\## ** //\\## \\## ** //
##\\// **// ** ##\\// ** ##\\ ##\\// **
##\\// **// ** ##\\// ** ##\\ ##\\// **
** //\\## \\## ** //\\## ** //** //\\##
** //\\## \\## ** //\\## ** //** //\\##
##\\// **// ** ##\\// ** ##\\ ##\\// **
##\\// **// ** ##\\// ** ##\\ ##\\// **
** //\\## \\## ** //\\## ** //** //\\##
** //\\## \\## ** //\\## ** //** //\\##
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
// ** ##\\ ##\\// ** ##\\// **// ** ##\\
\\## ** //** //\\## ** //\\## \\## ** //
\\## ** //** //\\## ** //\\## \\## ** //
> display $ sq $ enlarge $ sq $ sq [" #\\", "*./"]
##\\//..**//..** ##\\//..** ##\\ ##\\//..**
##\\//..**//..** ##\\//..** ##\\ ##\\//..**
**..//\\## \\## **..//\\## **..//**..//\\##
**..//\\## \\## **..//\\## **..//**..//\\##
//..** ##\\ ##\\//..** ##\\//..**//..** ##\\
//..** ##\\ ##\\//..** ##\\//..**//..** ##\\
\\## **..//**..//\\## **..//\\## \\## **..//
\\## **..//**..//\\## **..//\\## \\## **..//
//..** ##\\ ##\\//..** ##\\//..**//..** ##\\
//..** ##\\ ##\\//..** ##\\//..**//..** ##\\
\\## **..//**..//\\## **..//\\## \\## **..//
\\## **..//**..//\\## **..//\\## \\## **..//
##\\//..**//..** ##\\//..** ##\\ ##\\//..**
##\\//..**//..** ##\\//..** ##\\ ##\\//..**
**..//\\## \\## **..//\\## **..//**..//\\##
**..//\\## \\## **..//\\## **..//**..//\\##
//..** ##\\ ##\\//..** ##\\//..**//..** ##\\
//..** ##\\ ##\\//..** ##\\//..**//..** ##\\
\\## **..//**..//\\## **..//\\## \\## **..//
\\## **..//**..//\\## **..//\\## \\## **..//
##\\//..**//..** ##\\//..** ##\\ ##\\//..**
##\\//..**//..** ##\\//..** ##\\ ##\\//..**
**..//\\## \\## **..//\\## **..//**..//\\##
**..//\\## \\## **..//\\## **..//**..//\\##
##\\//..**//..** ##\\//..** ##\\ ##\\//..**
##\\//..**//..** ##\\//..** ##\\ ##\\//..**
**..//\\## \\## **..//\\## **..//**..//\\##
**..//\\## \\## **..//\\## **..//**..//\\##
//..** ##\\ ##\\//..** ##\\//..**//..** ##\\
//..** ##\\ ##\\//..** ##\\//..**//..** ##\\
\\## **..//**..//\\## **..//\\## \\## **..//
\\## **..//**..//\\## **..//\\## \\## **..//
> display $ enlarge $ sq $ enlarge $ sq $ sq [" #\\", "*./"]
####\\\\////....****////....**** ####\\\\////....**** ####\\\\ ####\\\\////....****
####\\\\////....****////....**** ####\\\\////....**** ####\\\\ ####\\\\////....****
####\\\\////....****////....**** ####\\\\////....**** ####\\\\ ####\\\\////....****
####\\\\////....****////....**** ####\\\\////....**** ####\\\\ ####\\\\////....****
****....////\\\\#### \\\\#### ****....////\\\\#### ****....////****....////\\\\####
****....////\\\\#### \\\\#### ****....////\\\\#### ****....////****....////\\\\####
****....////\\\\#### \\\\#### ****....////\\\\#### ****....////****....////\\\\####
****....////\\\\#### \\\\#### ****....////\\\\#### ****....////****....////\\\\####
////....**** ####\\\\ ####\\\\////....**** ####\\\\////....****////....**** ####\\\\
////....**** ####\\\\ ####\\\\////....**** ####\\\\////....****////....**** ####\\\\
////....**** ####\\\\ ####\\\\////....**** ####\\\\////....****////....**** ####\\\\
////....**** ####\\\\ ####\\\\////....**** ####\\\\////....****////....**** ####\\\\
\\\\#### ****....////****....////\\\\#### ****....////\\\\#### \\\\#### ****....////
\\\\#### ****....////****....////\\\\#### ****....////\\\\#### \\\\#### ****....////
\\\\#### ****....////****....////\\\\#### ****....////\\\\#### \\\\#### ****....////
\\\\#### ****....////****....////\\\\#### ****....////\\\\#### \\\\#### ****....////
////....**** ####\\\\ ####\\\\////....**** ####\\\\////....****////....**** ####\\\\
////....**** ####\\\\ ####\\\\////....**** ####\\\\////....****////....**** ####\\\\
////....**** ####\\\\ ####\\\\////....**** ####\\\\////....****////....**** ####\\\\
////....**** ####\\\\ ####\\\\////....**** ####\\\\////....****////....**** ####\\\\
\\\\#### ****....////****....////\\\\#### ****....////\\\\#### \\\\#### ****....////
\\\\#### ****....////****....////\\\\#### ****....////\\\\#### \\\\#### ****....////
\\\\#### ****....////****....////\\\\#### ****....////\\\\#### \\\\#### ****....////
\\\\#### ****....////****....////\\\\#### ****....////\\\\#### \\\\#### ****....////
####\\\\////....****////....**** ####\\\\////....**** ####\\\\ ####\\\\////....****
####\\\\////....****////....**** ####\\\\////....**** ####\\\\ ####\\\\////....****
####\\\\////....****////....**** ####\\\\////....**** ####\\\\ ####\\\\////....****
####\\\\////....****////....**** ####\\\\////....**** ####\\\\ ####\\\\////....****
****....////\\\\#### \\\\#### ****....////\\\\#### ****....////****....////\\\\####
****....////\\\\#### \\\\#### ****....////\\\\#### ****....////****....////\\\\####
****....////\\\\#### \\\\#### ****....////\\\\#### ****....////****....////\\\\####
****....////\\\\#### \\\\#### ****....////\\\\#### ****....////****....////\\\\####
////....**** ####\\\\ ####\\\\////....**** ####\\\\////....****////....**** ####\\\\
////....**** ####\\\\ ####\\\\////....**** ####\\\\////....****////....**** ####\\\\
////....**** ####\\\\ ####\\\\////....**** ####\\\\////....****////....**** ####\\\\
////....**** ####\\\\ ####\\\\////....**** ####\\\\////....****////....**** ####\\\\
\\\\#### ****....////****....////\\\\#### ****....////\\\\#### \\\\#### ****....////
\\\\#### ****....////****....////\\\\#### ****....////\\\\#### \\\\#### ****....////
\\\\#### ****....////****....////\\\\#### ****....////\\\\#### \\\\#### ****....////
\\\\#### ****....////****....////\\\\#### ****....////\\\\#### \\\\#### ****....////
####\\\\////....****////....**** ####\\\\////....**** ####\\\\ ####\\\\////....****
####\\\\////....****////....**** ####\\\\////....**** ####\\\\ ####\\\\////....****
####\\\\////....****////....**** ####\\\\////....**** ####\\\\ ####\\\\////....****
####\\\\////....****////....**** ####\\\\////....**** ####\\\\ ####\\\\////....****
****....////\\\\#### \\\\#### ****....////\\\\#### ****....////****....////\\\\####
****....////\\\\#### \\\\#### ****....////\\\\#### ****....////****....////\\\\####
****....////\\\\#### \\\\#### ****....////\\\\#### ****....////****....////\\\\####
****....////\\\\#### \\\\#### ****....////\\\\#### ****....////****....////\\\\####
####\\\\////....****////....**** ####\\\\////....**** ####\\\\ ####\\\\////....****
####\\\\////....****////....**** ####\\\\////....**** ####\\\\ ####\\\\////....****
####\\\\////....****////....**** ####\\\\////....**** ####\\\\ ####\\\\////....****
####\\\\////....****////....**** ####\\\\////....**** ####\\\\ ####\\\\////....****
****....////\\\\#### \\\\#### ****....////\\\\#### ****....////****....////\\\\####
****....////\\\\#### \\\\#### ****....////\\\\#### ****....////****....////\\\\####
****....////\\\\#### \\\\#### ****....////\\\\#### ****....////****....////\\\\####
****....////\\\\#### \\\\#### ****....////\\\\#### ****....////****....////\\\\####
////....**** ####\\\\ ####\\\\////....**** ####\\\\////....****////....**** ####\\\\
////....**** ####\\\\ ####\\\\////....**** ####\\\\////....****////....**** ####\\\\
////....**** ####\\\\ ####\\\\////....**** ####\\\\////....****////....**** ####\\\\
////....**** ####\\\\ ####\\\\////....**** ####\\\\////....****////....**** ####\\\\
\\\\#### ****....////****....////\\\\#### ****....////\\\\#### \\\\#### ****....////
\\\\#### ****....////****....////\\\\#### ****....////\\\\#### \\\\#### ****....////
\\\\#### ****....////****....////\\\\#### ****....////\\\\#### \\\\#### ****....////
\\\\#### ****....////****....////\\\\#### ****....////\\\\#### \\\\#### ****....////
> sq "hi!"
<interactive>:42:4: error:
• Couldn't match type ‘Char’ with ‘[a]’
Expected type: [[a]]
Actual type: [Char]
• In the first argument of ‘sq’, namely ‘"hi!"’
In the expression: sq "hi!"
In an equation for ‘it’: it = sq "hi!"
• Relevant bindings include
it :: [[a]] (bound at <interactive>:42:1)
> display $ sq "hi!"
<interactive>:43:14: error:
• Couldn't match type ‘Char’ with ‘[Char]’
Expected type: [[Char]]
Actual type: [Char]
• In the first argument of ‘sq’, namely ‘"hi!"’
In the second argument of ‘($)’, namely ‘sq "hi!"’
In the expression: display $ sq "hi!"
> display $ sq ["hi!"]
hi!!ih
!ihhi!
> display $ sq ["foo", "bar"]
foorab
baroof
rabfoo
oofbar
> display $ sq ["\ ", " \"]
<interactive>:46:19: error:
lexical error in string/character literal at character '"'
> display $ sq ["\\ ", " \\"]
\ \
\ \
\ \
\ \
> display $ sq ["\\ ", " /"]
\ /
/ \
/ \
\ /
> display $ sq ["\\ ", " _/"]
\ /_
_/ \
/_ \
\ _/
> display $ sq ["\\ _", " _/"]
\ _/_
_/_ \
/_ \ _
_ \ _/
> display $ sq ["\\_ ", " _/"]
\_ /_
_/ _\
/_ \_
_\ _/
> display $ sq $ sq ["\\_ ", " _/"]
\_ /_ /_ \_
_/ _\ _\ _/
/_ \_ \_ /_
_\ _/ _/ _\
/_ \_ \_ /_
_\ _/ _/ _\
\_ /_ /_ \_
_/ _\ _\ _/
> display $ sq $ sq ["#_ ", " _#"]
#_ #_ #_ #_
_# _# _# _#
#_ #_ #_ #_
_# _# _# _#
#_ #_ #_ #_
_# _# _# _#
#_ #_ #_ #_
_# _# _# _#
> display $ sq $ sq ["|_ ", " _|"]
|_ |_ |_ |_
_| _| _| _|
|_ |_ |_ |_
_| _| _| _|
|_ |_ |_ |_
_| _| _| _|
|_ |_ |_ |_
_| _| _| _|
> display $ sq $ sq ["+--", "-+-"]
+---+--+-+--
-+---+--+-+-
-+-+--+---+-
--+-+--+---+
-+-+--+---+-
--+-+--+---+
+---+--+-+--
-+---+--+-+-
> display $ sq $ sq ["|--", "-|-"]
|---|--|-|--
-|---|--|-|-
-|-|--|---|-
--|-|--|---|
-|-|--|---|-
--|-|--|---|
|---|--|-|--
-|---|--|-|-
> display $ enlarge $ sq $ sq ["|--", "-|-"]
||------||----||--||----
||------||----||--||----
--||------||----||--||--
--||------||----||--||--
--||--||----||------||--
--||--||----||------||--
----||--||----||------||
----||--||----||------||
--||--||----||------||--
--||--||----||------||--
----||--||----||------||
----||--||----||------||
||------||----||--||----
||------||----||--||----
--||------||----||--||--
--||------||----||--||--
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment