module Machine where

wsize :: Int
wsize = 4
--wsize = 8 -- alpha

floatIsDouble = False
--floatIsDouble = True -- alpha