Update calculateCurtailment-SCE.R