Skip to content

Commit 604d1f5

Browse files
committed
deallocate sq_var and sl_var
1 parent 2cd402d commit 604d1f5

File tree

1 file changed

+2
-0
lines changed

1 file changed

+2
-0
lines changed

src/turbulence/turbulence.F90

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -4045,6 +4045,8 @@ subroutine clean_turbulence()
40454045
if (allocated(cmue1)) deallocate(cmue1)
40464046
if (allocated(cmue2)) deallocate(cmue2)
40474047
if (allocated(cmue3)) deallocate(cmue3)
4048+
if (allocated(sq_var)) deallocate(sq_var)
4049+
if (allocated(sl_var)) deallocate(sl_var)
40484050
if (allocated(gam)) deallocate(gam)
40494051
if (allocated(an)) deallocate(an)
40504052
if (allocated(as)) deallocate(as)

0 commit comments

Comments
 (0)