case 'codeG4' %Call routine for code G4 4-by-nRx nsymb=nsymb - mod(nsymb,4); [err]=codeG4(index,snr,nsymb,Mary,modtype,nRx,err); Rate = 1/2; case 'codeH3' %Call routine for code H3 3-by-nRx nsymb=nsymb - mod(nsymb,3); [err]=codeH3(ind