Debugging version of code

This commit is contained in:
Alex 2020-02-24 12:58:13 -05:00
parent d0b6c595f0
commit 20755270a4
4 changed files with 167 additions and 34 deletions

View file

@ -393,7 +393,7 @@ module mode_create
outerloop: do iz = 1, bd_in_array(3)
do iy = 1, bd_in_array(2)
do ix = 1, bd_in_array(1)
node_in_bd(8) = .false.
node_in_bd(:) = .false.
do inod = 1, 8
vlat = ele(:,inod) + (/ ix, iy, iz /)