Searched defs:forcesToSocket (Results 1 – 1 of 1) sorted by relevance
256 subroutine forcesToSocket( na, energy, forces, stress ) subroutine265 character(len=*),parameter:: myName='forcesToSocket ' argument268 character(len=MSGLEN):: header, message269 real(dp) :: e, s(9), vir(9)270 real(dp),allocatable :: f(:)