fArg).*T.*(fCos+fSqrtS*fSin)).* <span class="keyword">...</span>
0086         (-2*exp(4*fArg)*T+2*exp(-(B*T)+2*fArg).*T.*(fCos-fSqrtA*fSin)).* <span class="keyword">...</span>
0087         (-2*exp(4*fArg)*T+2*exp(-(B*T)+2*fArg).*T.*(fCos+fSqrtA*fSin))./ <span class="keyword">...</span>
0088         (-2 ./ exp(2*B*T) - 2*exp(4*fArg) + 2*(1 + exp(4*fArg))./fExp).^4);
0089 
0090     <span class="comment">% this is Slaneys compact format - now resort into 3D Matrices</span>
0091     <span class="comment">%fcoef