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