aboutsummaryrefslogtreecommitdiff
path: root/src/decode_pars.F77
diff options
context:
space:
mode:
authorpollney <pollney@e296648e-0e4f-0410-bd07-d597d9acff87>2002-12-18 11:57:52 +0000
committerpollney <pollney@e296648e-0e4f-0410-bd07-d597d9acff87>2002-12-18 11:57:52 +0000
commit3b7c520e5eba4b57b02fb0a1f283a1c69783a52d (patch)
tree600d16f4ba17796bfa5177b1ab52d7118892ba1b /src/decode_pars.F77
parent67f5c20c980e4e9ea9856873edd65c9df47c04c5 (diff)
Added Gowdy periodic wave solution.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinInitialData/Exact/trunk@145 e296648e-0e4f-0410-bd07-d597d9acff87
Diffstat (limited to 'src/decode_pars.F77')
-rw-r--r--src/decode_pars.F772
1 files changed, 2 insertions, 0 deletions
diff --git a/src/decode_pars.F77 b/src/decode_pars.F77
index e81fd8a..1368f11 100644
--- a/src/decode_pars.F77
+++ b/src/decode_pars.F77
@@ -101,6 +101,8 @@ c cosmological spacetimes
decoded_exact_model = EXACT__Kasner_axisymmetric
elseif (CCTK_Equals(exact_model, "Kasner-generalized") .ne. 0) then
decoded_exact_model = EXACT__Kasner_generalized
+ elseif (CCTK_Equals(exact_model, "Gowdy-wave") .ne. 0) then
+ decoded_exact_model = EXACT__Gowdy_wave
elseif (CCTK_Equals(exact_model, "Milne") .ne. 0) then
decoded_exact_model = EXACT__Milne