Lines Matching refs:iup
104 INTEGER :: t,i,j,k,l,kk,ll,n,dim,Dofs,dof,itop,ibot,idown,iup,jup,lup,ii,jj,Rounds,nsize,layer, & local
640 iup = UpPointer(i)
642 jup = iup
653 lup = iup
684 iup = i
686 iup = UpPointer(j)
696 dx = 0.5*(Coord(MaskPerm(iup)) - Coord(MaskPerm(idown)))
698 dx = 0.5*(Coord(iup) - Coord(idown))
725 iup = i
727 iup = UpPointer(j)
737 dx = 0.5*(Coord(MaskPerm(iup)) - Coord(MaskPerm(idown)))
739 dx = 0.5*(Coord(iup) - Coord(idown))