for l in 1 2 3 4 5; do
f=quacks-ingredients-L$l.scad
cat >$f.tmp <<END
-// autogenerated by quacks-ingredients-updates-levels - do not edit
+// autogenerated by quacks-ingredients-updates-levels - do not edit
\$phase=$l;
module Token_L(){ Token_L$l(); }
//// toplevels-from:
f=quacks-ingredients-counts.scad
cat >$f.tmp <<END
-// autogenerated - do not edit
-// update script is quacks-ingredients-updates-levels
-// source is quacks-ingredients-counts
+// autogenerated - do not edit
+// update script is quacks-ingredients-updates-levels
+// source is quacks-ingredients-counts
END
-./quacks-ingredients-counts >>$f.tmp
+for which in Base All Witches; do
+ ./quacks-ingredients-counts $which >>$f.tmp
+done
mv -f $f.tmp $f
-egrep '^//' $f | sort
+egrep '^// [A-Z][a-z]* *[A-Za-z]' $f | sort