updated code; sever error in Calc_BSke() corrected