path: root/1067/CH19/EX19.9/19_9.sce

clc;
clear;
old=5000;
bank=200;
new=old-bank;
mprintf("new fault =%dMVA",new);