diff options
| author | schnetter <schnetter@ef6f4158-a8ee-47d1-ba14-cb73256398e0> | 2010-04-11 01:57:44 +0000 |
|---|---|---|
| committer | schnetter <schnetter@ef6f4158-a8ee-47d1-ba14-cb73256398e0> | 2010-04-11 01:57:44 +0000 |
| commit | d599a5abfa9eac2ad39f56567b6f18104b1d17d6 (patch) | |
| tree | a3edce8d21e8d683be87a7564f827ee9c1b8a1c2 /src/qlm_killing_gradient.F90 | |
| parent | 785f01b260541287633dfe2534bf108883faeea6 (diff) | |
Remove variables containing derivative of the two-metric.
Correct some comments.
Remove format statements from VTK output code.
Remove output_vtk option.
git-svn-id: https://svn.cct.lsu.edu/repos/numrel/LSUThorns/QuasiLocalMeasures/trunk@13 ef6f4158-a8ee-47d1-ba14-cb73256398e0
Diffstat (limited to 'src/qlm_killing_gradient.F90')
| -rw-r--r-- | src/qlm_killing_gradient.F90 | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/qlm_killing_gradient.F90 b/src/qlm_killing_gradient.F90 index fe970b5..dbcd716 100644 --- a/src/qlm_killing_gradient.F90 +++ b/src/qlm_killing_gradient.F90 @@ -38,12 +38,12 @@ subroutine qlm_killing_gradient (CCTK_ARGUMENTS, hn) qq(2,1) = qq(1,2) #if 0 - dqq(1,1,1) = qlm_dqttt(i,j,hn) - dqq(1,1,2) = qlm_dqttp(i,j,hn) - dqq(1,2,1) = qlm_dqtpt(i,j,hn) - dqq(1,2,2) = qlm_dqtpp(i,j,hn) - dqq(2,2,1) = qlm_dqppt(i,j,hn) - dqq(2,2,2) = qlm_dqppp(i,j,hn) + dqq(1,1,1) = qlm_dqttt(i,j) + dqq(1,1,2) = qlm_dqttp(i,j) + dqq(1,2,1) = qlm_dqtpt(i,j) + dqq(1,2,2) = qlm_dqtpp(i,j) + dqq(2,2,1) = qlm_dqppt(i,j) + dqq(2,2,2) = qlm_dqppp(i,j) dqq(2,1,:) = dqq(1,2,:) #endif |