clc,clear
printf('Example 2.21\n\n')

//  K_1= E_b/N   = (phi*P*Z)/(60*A)

//P_m = T * omega
//E_b*I_a = T *(2*%pi*N/60)
//T= I_a  (E_b*60 / 2*%pi*N ) 
//Use E_b= phi*P*N*Z/(2*%pi*A)
//T / I_a = phi*P*Z / (2*%pi*A)  =K_dasah

printf('The constant of proportionality in both the cases is  K=K_dash = phi*P*Z /(2*3.142*A)')