Changed the crystal index data type from char to short to increase the
maximum number of crystallites that can be simulated from 256 to ~33000.
May run a little faster as well.