Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- [][]
- [][]
- [][]
- [][]
- [][]
- Ƨ[]*∙
- Ƨ[] push "[]"
- * multiply horizontally (repeating width times)
- ∙ get an array with input (height) items of that
- implicitly output the array joined with newlines
- Grid@Table["[]",{#2},{#}]&
- v&DiiX"
- v % Concatenate the (non-existing) stack contents: gives []
- &D % String representation: gives '[]'
- ii % Take two inputs
- X" % Repeat those numbers of times vertically and horizontally. Implicit display
- VE*`Y
- VE*`Y
- V # Loop
- E # <input> number of times
- `Y # String representation of empty list (used to be "[]", but insert_name_here pointed out this shorter alternative)
- * # repeat string implicit input number of times
- # implicit print
- f(w,h){for(h*=w;h--;)printf(h%w?"[]":"[]n");}
- f(w,h){for(h*=w;h--;)printf("[]%c",h%w?0:10);}
- F„[]×,
- F # height times do
- „[] # push "[]"
- × # repeat width times
- , # print with newline
- >;;;;;;~++++++++:>~;;;;:>~*(-:~<~+-::>-:::<~<-+++++++++~:::<~+-:::>-::*)-::<-::::>-::(;)::>-::*(-:~<~+-::>-:::<~<-+++++++++~:::<~+-:::>-::*)-:<~<;;;;;-+>-:<-:-(-:::~<-:::(~<#<-;;-#~;)-:<#-::<;>-:-)
- *(-:~<~+-::>-:::<~<-+++++++++~:::<~+-:::>-::*)-::<-::::>-::(;)::>-::*(-:~<~+-::>-:::<~<-+++++++++~:::<~+-:::>-::*)
- +++++++++[>++++++++++<-]>+[>+>+<<-]>>++>,>+++++++++[<----->-]<--->>>,>+++++++++[<----->-]<--->++++++++++<[<<<[>+>+<<-]>[<<<.>.>>-]>[<<+>>-]>>.<-]
- +++++++++[>++++++++++<-]>+ Get the opening square bracket into first position
- [>+>+<<-] Get it into the second and third position
- >>++ Get the third position to be the closing bracket
- >
- ,>+++++++++[<----->-]<--- Get first number into fourth cell
- >>>
- ,>+++++++++[<----->-]<--- Get second number into seventh cell
- >++++++++++ get newline into 8th position
- <
- [ Start our height loop
- <<<[>+>+<<-] Get the width into the fifth and sixth positions
- >[ Start our width loop at the fifth position
- <<<.>. Print the second and third positions
- >>-] Decrement the fifth position
- >
- [<<+>>-] copy the sixth position into the fourth position
- >>. print newline
- <-]
- '[]'$~],+:@[
- '[]'$~],+:@[ input: y, x
- +:@[ double y
- ], pair with x
- this gives (x, 2y)
- $~ shape the left argument into the right argument's shape
- '[]' 2-length character string
- n,m=input()
- exec"print'[]'*n;"*m
- ẋ⁾[]ẋ$Y
- ẋ⁾[]ẋ$Y - Main link: number w, number h e.g. 2, 3
- ẋ - repeat w h times [2,2,2]
- $ - last two links as a monad:
- ⁾[] - literal ['[',']'], "[]"
- ẋ - repeat list (vectorises) ["[][]","[][]","[][]"]
- Y - join with newlines "[][]n[][]n[][]"
- - if a full program, implicit print
- .+
- $*
- 1(?=1*(¶1+))|.
- $1
- G`1
- 1
- []
- ×⁺×[]N¶N
- Ài[]<esc>ÀÄ
- Ài[]<esc> " arg1 times insert []
- ÀÄ " arg2 times duplicate this line
- M"[]"َJ,
- M"[]"َJ,
- M //Executes code input1 times
- "[]" //Pushes []
- َ //Duplicates [] input2 times
- J //Joins the stack
- , //Prints with a trailing newline
- param($w,$h),("[]"*$w)*$h
- "[]"pN× òU*2
- VÆç"[]
- VÆ ç"[]
- VoX{Uç"[]"} // Ungolfed
- // Implicit: U, V = input integers
- VoX{ } // Create the range [0...V) and replace each item X with
- Uç"[]" // U copies of the string "[]".
- -R // Join the result with newlines.
- // Implicit: output result of last expression
- [:|?[:|?@[]`';
- [:| FOR a = 1 to (read input from cmd line)
- ? PRINT a newlne
- [:| FOR c = 1 to (read input from cmd line)
- ?@[]` PRINT A$ (containing the box)
- '; and inject a semicolon in the compiled QBasic code to suppress newlines
- }A;**"[]
- F2K*"[]
- (w,h)=>"".PadLeft(h).Replace(" ","".PadLeft(w).Replace(" ","[]")+'n').Trim();
- l~"[]"*N+*
- w=>h=>("[]".repeat(w)+`
- `).repeat(h)
- proc B w h {time {puts [string repe {[]} $w]} $h}
Add Comment
Please, Sign In to add comment