208 |
(format nil "~:{~1,#^~A~}" '((1)(2 10)(3 a b)(4)(5 x)(6)(7 8))) |
(format nil "~:{~1,#^~A~}" '((1)(2 10)(3 a b)(4)(5 x)(6)(7 8))) |
209 |
"2357") |
"2357") |
210 |
|
|
211 |
|
(deftest format.^.\:{.19 |
212 |
|
(format nil "~:{~#,#^~A~}" '((1)()(2 10)(3 a b)(4)(5 x)(6)(7 8))) |
213 |
|
"") |
214 |
|
|
215 |
|
(deftest format.^.\:{.20 |
216 |
|
(format nil "~:{~0,v^~A~}" '((0 1)(1 2)(nil 3)(2 4))) |
217 |
|
"24") |
218 |
|
|
219 |
|
(deftest format.^.\:{.21 |
220 |
|
(format nil "~:{~1,v^~A~}" '((0 1)(1 2)(nil 3)(2 4))) |
221 |
|
"134") |
222 |
|
|
223 |
|
(deftest format.^.\:{.22 |
224 |
|
(format nil "~:{~1,1,1^~A~}" '((1)(2 3)(4 5 6)(7 8 9 0))) |
225 |
|
"") |
226 |
|
|
227 |
|
(deftest format.^.\:{.23 |
228 |
|
(format nil "~:{~1,2,3^~A~}" '((1)(2 3)(4 5 6)(7 8 9 0))) |
229 |
|
"") |
230 |
|
|
231 |
|
(deftest format.^.\:{.24 |
232 |
|
(format nil "~:{~1,2,1^~A~}" '((1)(2 3)(4 5 6)(7 8 9 0))) |
233 |
|
"1247") |
234 |
|
|
235 |
|
(deftest format.^.\:{.25 |
236 |
|
(format nil "~:{~1,0,1^~A~}" '((1)(2 3)(4 5 6)(7 8 9 0))) |
237 |
|
"1247") |
238 |
|
|
239 |
|
(deftest format.^.\:{.26 |
240 |
|
(format nil "~:{~3,2,1^~A~}" '((1)(2 3)(4 5 6)(7 8 9 0))) |
241 |
|
"1247") |
242 |
|
|
243 |
|
(deftest format.^.\:{.27 |
244 |
|
(format nil "~:{~v,2,3^~A~}" '((1 10)(2 20)(3 30)(4 40))) |
245 |
|
"3040") |
246 |
|
|
247 |
|
(deftest format.^.\:{.28 |
248 |
|
(format nil "~:{~1,v,3^~A~}" '((0 7)(1 10)(2 20)(3 30)(4 40))) |
249 |
|
"740") |
250 |
|
|
251 |
|
(deftest format.^.\:{.29 |
252 |
|
(format nil "~:{~1,2,v^~A~}" '((0 0)(1 10)(2 20)(3 30)(4 40)(0 50))) |
253 |
|
"01050") |
254 |
|
|
255 |
|
(deftest format.^.\:{.30 |
256 |
|
(format nil "~:{~1,2,v^~A~}" '((nil 0))) |
257 |
|
"") |
258 |
|
|
259 |
|
|
260 |
|
|
261 |
|
|
262 |
|
|
263 |
|
|
264 |
|
|