From: Jeffrey A Tibbitt (jtibbitt_at_hawaii.edu)
Date: Wed Jan 03 2018 - 03:40:39 CST

SOLVED. I don't see the reply in this thread, but another user helped me
debug the code. The foreach loop needed the backslash to signify
continuation onto the next lines. Fixed loop code:

foreach {x1 x2} [list \
$A000 $A100 \
$A100 $A110 \
$A110 $A010 \
$A010 $A000 \
$A001 $A101 \
$A101 $A111 \
$A111 $A011 \
$A011 $A001 \
$A000 $A001 \
$A100 $A101 \
$A110 $A111 \
$A010 $A011 ] {
  puts "$x1 $x2"
  draw cylinder $x1 $x2 radius 0.05 resolution 50 filled no
}

-- 
*Jeffrey A Tibbitt, PhD*
Chemistry Lecturer
University of Hawai'i - Maui College