From 4f6a7a18e24fdbc2e09c5cb00d3034f7d63f035f Mon Sep 17 00:00:00 2001 From: knarf Date: Fri, 23 Nov 2012 21:46:09 +0000 Subject: remove unused variables git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinEOS/EOS_Omni/trunk@68 8e189c6b-2ab8-4400-aa02-70a9cfce18b9 --- src/EOS_Omni_Startup.F90 | 2 -- 1 file changed, 2 deletions(-) diff --git a/src/EOS_Omni_Startup.F90 b/src/EOS_Omni_Startup.F90 index ad7f0d3..e1fc6a3 100644 --- a/src/EOS_Omni_Startup.F90 +++ b/src/EOS_Omni_Startup.F90 @@ -10,8 +10,6 @@ subroutine EOS_Omni_Startup(CCTK_ARGUMENTS) DECLARE_CCTK_PARAMETERS DECLARE_CCTK_ARGUMENTS - character(len=512) eosfilename - CCTK_INT fslen poly_k_cgs = poly_k * rho_gf**poly_gamma_ini / press_gf -- cgit v1.2.3