Added vbcalc.m