Lines Matching refs:xKebe
50 real*8, allocatable, dimension(:,:,:,:) :: xKebe, xGoC local
158 allocate ( xKebe(npro,9,nshl,nshl) )
175 & qres, xKebe,
182 & call bc3lhs (iBC, BC,mien(iblk)%p, xKebe)
184 & xKebe, lhsK,
189 deallocate ( xKebe )
277 allocate ( xKebe(npro,9,nshl,nshl) )
296 & res, xKebe)
308 & call bc3lhs (iBC, BC,mienb(iblk)%p, xKebe)
310 & xKebe, lhsK,
315 deallocate ( xKebe )