Per-Unit Quantities

M-File Programming For Finding Per-Unit Impedance:

-clc

-clear

-disp('CHANGING THE BASE OF PER-UNIT QUANTITIES')

-x=input('given base MVA=');

-y=input('given base KV=');

-z=input('given per unit impedence=');

-a=input('new base MVA=');

-b=input('new base KV=');

-disp('new per unit impedence=');

-pu=z*(y/b)^2*(a/x)

(Try it)

M-File Programming For Finding Per-Unit Impedance:

-clc

-clear

-disp('PERCENTAGE TRANSMISSION EFFICIENCY OF TX-LINE')

-x=input('Receiving end voltage=');

-y=input('Load current per-phase=');

-z=input('Receiving end power factor=');

-a=input('Sending end current=');

-b=input('Resistance per-phase=');

-disp('Percentage voltage transmission efficiency=');

-PVTE=(((x*y*z)/((x*y*z)+(a^2*b)))*100

(try it)