% PD power at each port written by Kentaro for AdVirgo 100225

% for single demodulation

opt = lcgt;

clear [sigDC, fDC];
 pos = zeros(opt.Ndrive, 1);
 [fDC, sigDC] = sweep(opt, pos);

 npd = zeros(4);
 npd(1) = getLinkNum(opt, 'SYM_BS', 'SYM');
 npd(2) = getLinkNum(opt, 'POBS_BS', 'POBS');
 npd(3) = getLinkNum(opt, 'ASY_PDloss', 'ASY');
 
 pdname = ['SYM','POB','OMC'];
 
for jj=1:3
disp(pdname(jj*3-2:jj*3))
disp(sum(abs(fDC(npd(jj),:).^2)))
end