Fix to box bound

This commit is contained in:
Alex Selimov 2021-08-04 13:27:12 -04:00
parent 8eac9be895
commit fbaca5859b

View File

@ -188,7 +188,7 @@ module mode_merge
end do end do
!If we don't include the wrap command then we have to increase the size of the box !If we don't include the wrap command then we have to increase the size of the box
if(.not.(wrap_flag)) then if(.not.(wrap_flag).and..not.(trim(adjustl(dim))=='none')) then
do i = 1,3 do i = 1,3
if (alldims(i:i) /= trim(adjustl(dim))) then if (alldims(i:i) /= trim(adjustl(dim))) then
if (current_shift(i) < -lim_zero) then if (current_shift(i) < -lim_zero) then