Lines Matching refs:muk
106 . i,ik,il,in,indk,is,j,jk,jl,jn,k,kk,kn,mu,muk
216 do muk = 1,numft(mu)
217 j = listft(muk,mu)
220 jk = fttof(muk,mu)
221 ft(muk,mu) = f(jk,jl)
222 fst(muk,mu) = fs(jk,jl)
292 do muk = 1,numft2(mu)
293 j = listft2(muk,mu)
294 a0 = a0 + buxg(j)*fstG(muk,mu)
296 do muk = 1,numft(mu)
297 j = listft(muk,mu)
298 a0 = a0 + bux(j)*fst(muk,mu)
376 do muk = 1,numft2(mu)
377 j = listft2(muk,mu)
378 a0 = a0 + buxg(j)*ftG(muk,mu)
380 do muk = 1,numft(mu)
381 j = listft(muk,mu)
382 a0 = a0 + bux(j)*ft(muk,mu)