D-shaped tensor pressure tokamak equilibria induced by neutral-beam injection are computed. The beam pressure components are evaluated from the moments of a distribution function that is a solution of the Fokker-Planck equation in which the pitch-angle scattering operator is ignored. The level-p⊥ contours undergo a significant shift away from the outer edge of the device with respect to the flux surfaces for perpendicular beam injection into broad-pressure-profile equilibria. The p∥ contours undergo a somewhat smaller inward shift with respect to the flux surfaces for both parallel and perpendicular injection into broad-pressure-profile equilibria. For peaked-pressure-profile equilibria, the level pressure contours nearly co-incide with the flux surfaces.