Finished GibbsTrans.m