Update CalcRoc.m