
size 16 22

symwd = 0.5
wd = 4
hi = 0.45

set font texcmr

dx = 0.25
dy = 0.5

x = 0
y = 0
nrows = 48

fopen "symbols.csv" f1 read
until feof(f1)
	fread f1 sym$
	amove x*wd+dx pageheight()-y*hi-dy
	towrite$ = "\"+sym$
	! print towrite$
	write towrite$
	amove x*wd+dx+symwd pageheight()-y*hi-dy
	tex "$\backslash{}$"+sym$
	y = y + 1
	if y = nrows then
		y = 0
		x = x + 1
	end if
next
fclose f1
