Skip to content

Commit 87b6afc

Browse files
authored
Merge pull request #14898 from mcgratta/master
Revert "FDS Source: Fix bug PART_UVWMAX"
2 parents 71227b8 + 64c5d80 commit 87b6afc

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

Source/part.f90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -2979,7 +2979,7 @@ SUBROUTINE MOVE_IN_GAS
29792979
ACCEL_Y = 0._EB
29802980
DRAG_MAX(2) = 0._EB
29812981
ENDIF
2982-
IF (ANY(ABS(DRAG_MAX)>PART_UVWMAX) .AND. PARTICLE_CFL) PART_UVWMAX = MAX(PART_UVWMAX,MAXVAL(DRAG_MAX))
2982+
IF (ANY(ABS(DRAG_MAX)>PART_UVWMAX)) PART_UVWMAX = MAX(PART_UVWMAX,MAXVAL(DRAG_MAX))
29832983

29842984
ENDIF PARTICLE_NON_STATIC_IF
29852985

0 commit comments

Comments
 (0)