Welcome to the chicken scheme pasting service

wrapping rows in a table pasted by C-Keen on Mon Jul 17 15:48:24 2017

#;1> (define es '((J Lidl 1.23)    (M famila 1.23)))
#;2> es
((J Lidl 1.23) (M famila 1.23))
#;3> (map (lambda (r) `(tr ,(map (lambda (e) `(td ,e)) r))) es)
((tr ((td J) (td Lidl) (td 1.23))) (tr ((td M) (td famila) (td 1.23))))

correction added by C-Keen on Mon Jul 17 15:49:34 2017

#;4> (map (lambda (r) `(tr ,@(map (lambda (e) `(td ,e)) r))) es)
((tr (td J) (td Lidl) (td 1.23)) (tr (td M) (td famila) (td 1.23)))

Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
Type in the text below:
 _      __           _     
| |____/ _|_   _ ___| |__  
| |_  / |_| | | |_  / '_ \ 
| |/ /|  _| |_| |/ /| | | |
|_/___|_|  \__, /___|_| |_|
           |___/           
Visually impaired? Let me spell it for you (wav file) download WAV