Skip to content

Commit 0ede4e2

Browse files
committed
because it needs to be gt
1 parent 67a34ea commit 0ede4e2

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/viewr.f90

+1-1
Original file line numberDiff line numberDiff line change
@@ -1323,7 +1323,7 @@ subroutine set3d(iplot,xyz,nxyz)
13231323
enddo
13241324
i=i+2+2*nn
13251325
j=j+1
1326-
if (j.lt.length) then
1326+
if (j.gt.length) then
13271327
call error('set3d','array overflow, increase the length parameter',' ')
13281328
endif
13291329
endif

0 commit comments

Comments
 (0)