comp-chem/cp2k
1
0
Fork 0
mirror of https://github.com/cp2k/cp2k.git synced 2026-07-28 14:15:19 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

define vars

Browse source 
svn-origin-rev: 13987
This commit is contained in:
Joost VandeVondele 2014-05-18 07:24:15 +00:00
parent 5ba1805f0a
commit e86933e99f
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/ma/ma_topology.F
View file

@ -576,7 +576,8 @@ CONTAINS
#if defined __GEMINI || __SEASTAR
INTEGER :: src_x, src_y, src_z,&
dest_x, dest_y, dest_z
dest_x, dest_y, dest_z,&
x, y, z
REAL :: tmp
CALL ma_get_host_coordinates(src,src_x, src_y, src_z)