diff options
Diffstat (limited to 'src/macro/ADM_Derivative.h')
-rw-r--r-- | src/macro/ADM_Derivative.h | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/macro/ADM_Derivative.h b/src/macro/ADM_Derivative.h index 8e62310..802bcb9 100644 --- a/src/macro/ADM_Derivative.h +++ b/src/macro/ADM_Derivative.h @@ -80,17 +80,17 @@ #define ADM_ADV_DZ_M1(var,i,j,k) betaz(i,j,k)*IDZ*(var(i,j,k) - var(i,j,k-1)) #define ADM_ADV_DX_P2(var,i,j,k) betax(i,j,k)*I2DX*(-3.d0*var(i,j,k) \ - + 4.d0*var(i+1,j,k) - var(i+2,j,k)) + + 4.d0*var(i+1,j,k) - var(i+2,j,k)) #define ADM_ADV_DY_P2(var,i,j,k) betay(i,j,k)*I2DY*(-3.d0*var(i,j,k) \ - + 4.d0*var(i,j+1,k) - var(i,j+2,k)) + + 4.d0*var(i,j+1,k) - var(i,j+2,k)) #define ADM_ADV_DZ_P2(var,i,j,k) betaz(i,j,k)*I2DZ*(-3.d0*var(i,j,k) \ - + 4.d0*var(i,j,k+1) - var(i,j,k+2)) + + 4.d0*var(i,j,k+1) - var(i,j,k+2)) #define ADM_ADV_DX_M2(var,i,j,k) betax(i,j,k)*I2DX*(3.d0*var(i,j,k) \ - - 4.d0*var(i-1,j,k) + var(i-2,j,k)) + - 4.d0*var(i-1,j,k) + var(i-2,j,k)) #define ADM_ADV_DY_M2(var,i,j,k) betay(i,j,k)*I2DY*(3.d0*var(i,j,k) \ - - 4.d0*var(i,j-1,k) + var(i,j-2,k)) + - 4.d0*var(i,j-1,k) + var(i,j-2,k)) #define ADM_ADV_DZ_M2(var,i,j,k) betaz(i,j,k)*I2DZ*(3.d0*var(i,j,k) \ - - 4.d0*var(i,j,k-1) + var(i,j,k-2)) + - 4.d0*var(i,j,k-1) + var(i,j,k-2)) #endif |