toGlobal CleanUp Update

Used identity matrix function to remove certain 1 value assignments to
elements in matrices of the toGlobal function.