USER_PROBLEM: Remove unused variables.
Signed-off-by: Grzegorz Kowal <grzegorz@amuncode.org>
This commit is contained in:
parent
2f7743b0c1
commit
036a887f39
@ -226,15 +226,11 @@ module user_problem
|
|||||||
|
|
||||||
! local variables
|
! local variables
|
||||||
!
|
!
|
||||||
integer :: i, j, k = 1
|
integer :: j, k = 1
|
||||||
|
|
||||||
! local arrays
|
! local arrays
|
||||||
!
|
!
|
||||||
real(kind=8), dimension(nv,nn) :: q, u
|
real(kind=8), dimension(nv,nn) :: q, u
|
||||||
real(kind=8), dimension(nn) :: x, y
|
|
||||||
#if NDIMS == 3
|
|
||||||
real(kind=8), dimension(nn) :: z
|
|
||||||
#endif /* NDIMS == 3 */
|
|
||||||
!
|
!
|
||||||
!-------------------------------------------------------------------------------
|
!-------------------------------------------------------------------------------
|
||||||
!
|
!
|
||||||
|
Loading…
x
Reference in New Issue
Block a user