pc2_jw = frdata(:,4).*exp(i*pi/180.0*frdata(:,5))/pcb_coeff_12638; % ps1_jw = frdata(:,8).*exp(i*pi/180.0*frdata(:,9))/pcb_coeff_12992; % dummy ps2_jw = frdata(:,2).*exp(i*pi/180.0*frdata(:,3))/pcb_coeff_12637; % pc1_jw = frdata(:,6).*exp(i*pi/180.0*frdata(:,7))/pcb_coeff_12991; % dummy A1_jw = ( exp(-i*k*dl).*ps1_jw - exp(-i*k*(ls+dl)).*pc1_jw)./( 2*i*sin(k*ls)); B1_jw = (-exp( i*k*dl).*ps1_jw + exp( i*k*(ls+dl)).*pc1_jw)./( 2*i*sin(k*ls)); A2_jw = (-exp( i*k*dl).*ps2_jw + exp( i*k*(ls+dl)).*pc2_jw)./( 2*i*sin(k*ls)); B2_jw = ( exp(-i*k*dl).*ps2_jw - exp(-i*k*(ls+dl)).*pc2_jw)./( 2*i*sin(k*ls));
#ifdef PCB As1 = sqrt(msg->as1*msg->as1 + msg->bs1*msg->bs1) / PCB_COEFF_12638; Ac1 = sqrt(msg->ac1*msg->ac1 + msg->bc1*msg->bc1) / PCB_COEFF_12637; As2 = sqrt(msg->as2*msg->as2 + msg->bs2*msg->bs2) / PCB_COEFF_12992; Ac2 = sqrt(msg->ac2*msg->ac2 + msg->bc2*msg->bc2) / PCB_COEFF_12991; #else // NAGANO_KEIKI As1 = sqrt(msg->as1*msg->as1 + msg->bs1*msg->bs1) * NAGANO_KEIKI_COEFF; Ac1 = sqrt(msg->ac1*msg->ac1 + msg->bc1*msg->bc1) * NAGANO_KEIKI_COEFF; As2 = sqrt(msg->as2*msg->as2 + msg->bs2*msg->bs2) * NAGANO_KEIKI_COEFF; Ac2 = sqrt(msg->ac2*msg->ac2 + msg->bc2*msg->bc2) * NAGANO_KEIKI_COEFF; #endif // Phase Ps1 = atan(msg->bs1/msg->as1) + M_PI * (msg->as1 < 0); Pc1 = atan(msg->bc1/msg->ac1) + M_PI * (msg->ac1 < 0); Ps2 = atan(msg->bs2/msg->as2) + M_PI * (msg->as2 < 0); Pc2 = atan(msg->bc2/msg->ac2) + M_PI * (msg->ac2 < 0); A1 = sqrt(As1*As1 - 2*As1*Ac1*cos(k*L + Ps1 - Pc1) + Ac1*Ac1) / (2*fabs(sin(k*L))); B1 = sqrt(As1*As1 - 2*As1*Ac1*cos(k*L + Pc1 - Ps1) + Ac1*Ac1) / (2*fabs(sin(k*L))); A2 = sqrt(Ac2*Ac2 - 2*Ac2*As2*cos(k*L + Pc2 - Ps2) + As2*As2) / (2*fabs(sin(k*L))); B2 = sqrt(Ac2*Ac2 - 2*Ac2*As2*cos(k*L + Ps2 - Pc2) + As2*As2) / (2*fabs(sin(k*L)));
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!以下は過去の情報です!!!!!!!!!!!!!!!!!!!!!!!!!!
#ref(): File not found: "2015.04.30-1.jpg" at page "音響振動制御特論2018"
#ref(): File not found: "2015.04.30-2.jpg" at page "音響振動制御特論2018"
#ref(): File not found: "2015.04.30-3.jpg" at page "音響振動制御特論2018"
#ref(): File not found: "2015.04.30-4.jpg" at page "音響振動制御特論2018"
#ref(): File not found: "2015.05.29-1.jpg" at page "音響振動制御特論2018"
#ref(): File not found: "2015.05.29-2.jpg" at page "音響振動制御特論2018"
#ref(): File not found: "2015.05.29-3.jpg" at page "音響振動制御特論2018"
#ref(): File not found: "2015.08.26-1.jpg" at page "音響振動制御特論2018"
#ref(): File not found: "2015.08.26-2.jpg" at page "音響振動制御特論2018"
#ref(): File not found: "2015.08.26-3.jpg" at page "音響振動制御特論2018"
#ref(): File not found: "2015.08.26-4.jpg" at page "音響振動制御特論2018"
#ref(): File not found: "2015.08.26-5.jpg" at page "音響振動制御特論2018"
第5回(2015.8.27)
#ref(): File not found: "2015.08.27-1.jpg" at page "音響振動制御特論2018"
#ref(): File not found: "2015.08.27-2.jpg" at page "音響振動制御特論2018"
#ref(): File not found: "2015.08.27-3.jpg" at page "音響振動制御特論2018"