clear; clc; close;

a = 15;
Rl = 8;

Rl_dash = (a^2)*Rl;

disp(Rl_dash,'Effective resistance looking into primary transformer is ');