30 ASSERT( chStat ==
's' || chStat ==
'v' );
32 ipOffset = ipOpac - ipLowLim;
49 for( i=ipLowLim-1; i < limit; i++ )
56 for( i=ipLowLim-1; i < limit; i++ )
93 ASSERT( chStat ==
'v' || chStat ==
's' );
102 k = ipOpac - ipLowEnergy;
110 double DepartCoefInv = 1./DepartCoef;
114 for( i=ipLowEnergy-1; i < iup; i++ )
123 for( i=ipLowEnergy-1; i < iup; i++ )
140 for( i=ipLowEnergy-1; i < iup; i++ )
147 for( i=ipLowEnergy-1; i < iup; i++ )