060 <a name="_sub2" href="#_subfunctions" class="code">function [afCoeffB, afCoeffA] = GetCoeffs_I (f_c, B, T)</a>
0061 
0062     fCos    = cos(2*f_c*pi*T);
0063     fSin    = sin(2*f_c*pi*T);
0064     fExp    = exp(B*T);
0065     fSqrtA  = 2*sqrt(3+2^1.5);
0066     fSqrtS  = 2*sqrt(3-2^1.5);
0067 
0068     A0      = T;
0069     A2      = 0;
0070     B0      = 1;
0071     B1      = -2*fCos./fExp;
0072     B2      = exp(-2*B*T);
0073 
0074     A11     = -(2*T*fCos./fExp + fSqrtA*T*fSin./ fExp)/2;
0075     A1