diff options
| author | diener <diener@f69c4107-0314-4c4f-9ad4-17e986b73f4a> | 2005-11-29 13:27:25 +0000 |
|---|---|---|
| committer | diener <diener@f69c4107-0314-4c4f-9ad4-17e986b73f4a> | 2005-11-29 13:27:25 +0000 |
| commit | 2a09f83a6ee7e6377f9329fef83b6abcd693b715 (patch) | |
| tree | f133795410b3371bc38cf0b87051627235f35d58 | |
| parent | c7a199af9d7208ed1dc0045e9d49339e1b00cd57 (diff) | |
Remove commented lines.
git-svn-id: https://svn.cct.lsu.edu/repos/numrel/LSUThorns/SummationByParts/trunk@43 f69c4107-0314-4c4f-9ad4-17e986b73f4a
| -rw-r--r-- | src/Dissipation_8_4.F90 | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/src/Dissipation_8_4.F90 b/src/Dissipation_8_4.F90 index 351541e..b622736 100644 --- a/src/Dissipation_8_4.F90 +++ b/src/Dissipation_8_4.F90 @@ -24,7 +24,6 @@ subroutine dissipation_8_4 (var, ni, nj, nk, bb, gsize, delta, epsdis, rhs) call set_coeff ( a ) -! idel = epsdis / ( 256 * delta(1) ) idel = epsdis / 256 if ( bb(1) == 0 ) then @@ -136,7 +135,6 @@ subroutine dissipation_8_4 (var, ni, nj, nk, bb, gsize, delta, epsdis, rhs) call set_coeff ( a ) -! idel = epsdis / ( 256 * delta(2) ) idel = epsdis / 256 if ( bb(3) == 0 ) then @@ -248,7 +246,6 @@ subroutine dissipation_8_4 (var, ni, nj, nk, bb, gsize, delta, epsdis, rhs) call set_coeff ( a ) -! idel = epsdis / ( 256 * delta(3) ) idel = epsdis / 256 if ( bb(5) == 0 ) then |