function g=ps14b_6242_2004(n)
% function g=ps14b_6242_2004(n)
%
% gain margin calculation for Problem 1.4(b) in 6.242/2004
[A,B,C]=ssdata(ps14a_6242_2004(n));    % get A,B,C
A=A/(n^2);                             % re-scale
B=B/n;
g=n*margin(ss(A,B,C,0));               % calculate the margin