Lines Matching refs:ADDS
67 REAL ADDFAC, ADDS, EK, EM, EMN, EN, MULFAC, MULTS,
85 ADDS = 0
122 ADDS = EMN*( EM*EN-( EM+EN )*( EMN+1. ) / 2.+( EMN+1. )*
124 MULTS = ADDS + EMN*( EM-( EMN+1. ) / 2. )
130 ADDS = EN*( EM*( EM-1. ) )
136 ADDS = EM*( 5. / 6.+EM*( -3. / 2.+EM*( 2. / 3. ) ) )
147 ADDS = EN*( ( 5. / 6. )+EN*( 1. / 2.+( EM-EN / 3. ) ) )
151 ADDS = EM*( ( 5. / 6. )+EN-EM / 2.+EM*( EN-EM / 3. ) )
163 ADDS = EN*( ( 5. / 6. )+EM+EN*
168 ADDS = EM*( ( 5. / 6. )+EM / 2.+EM*( EN-EM / 3. ) )
177 ADDS = EN*EN + EMN*( 2*EM+EN+2*EM*EN-( EMN+1 )*
185 ADDS = EK*( EN*( 1.-EK )+EM*( 2.*EN+( EM-1. ) / 2. ) )
192 ADDS = EK*( EM*( 1.-EK )+EN*( 2.*EM+( EN-1. ) / 2. ) )
200 ADDS = EN*( 5. / 3.+( EN-EM )+EN*
205 ADDS = EM*( 5. / 3.+( EM-EN )+EM*
214 ADDS = 0.
217 ADDS = -8. + EM*( -2. / 3.+EM*( -1.+EM*( 5. / 3. ) ) )
238 ADDS = ADDS + WL*WU
248 ADDS = EN*( EM*( WL+WU )-0.5*( WL*( WL+1. )+WU*( WU+1. ) ) )
263 ADDS = ( 1. / 6. )*EM*( -1.+EM*EM )
269 ADDS = EN*( EM*( EM-1. ) )
275 ADDS = EM*( 1. / 6.+EM*( -1. / 2.+EM*( 1. / 3. ) ) )
290 ADDS = EK*( -1. / 6.+EK*( -1. / 2.+EK*( -1. / 3. ) ) ) +
297 ADDS = EN*( EK*( 2*EM-( EK+1. ) ) )
311 ADDS = EM - 1
317 ADDS = EN*( 2*( EM-1 ) )
323 ADDS = EM - 1 + EN*( 2*( EM-1 ) )
343 ADDS = EM / 6.*( -1.+EM*EM )
349 ADDS = EN*( EM*( EM-1. ) )
355 ADDS = EM*( -1. / 3.+EM*EM*( 1. / 3. ) )
363 ADDS = 0.
367 ADDS = -4. + EM*( -8. / 3.+EM*( 1.+EM*( 2. / 3. ) ) )
381 ADDS = EN*EM*( EM-1. ) / 2.
387 ADDS = EM*( 1. / 3.+EM*( -1. / 2.+EM*( 1. / 6. ) ) )
397 ADDS = EN*( EM*( EM-1. ) / 2.-( EM-EK-1. )*( EM-EK ) / 2. )
412 ADDS = ( EN-EM+1 )*( EM+2*EM*EM-EMN*( EMN+1 ) )
430 ADDS = EK*EN*( 2.*EM+1.-EK )
433 ADDS = EK*EM*( 2.*EN+1.-EK )
442 ADDS = EK*( 1. / 3.+( EN-EM )+
451 ADDS = EK*( 1. / 3.+( EM-EN )+
458 SOPLA = MULFAC*MULTS + ADDFAC*ADDS