diff options
| -rw-r--r-- | src/sine_planewaves.F77 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/sine_planewaves.F77 b/src/sine_planewaves.F77 index 689ae6d..f7e6f1a 100644 --- a/src/sine_planewaves.F77 +++ b/src/sine_planewaves.F77 @@ -69,7 +69,7 @@ c and the extrinsic curvature kyy(i,j,k) = cp*cp * (bt/2) + sp*sp * (0) kxz(i,j,k) = 0 kyz(i,j,k) = 0 - kzz(i,j,k) = bt/2 + kzz(i,j,k) = -bt/2 enddo enddo |