diff options
| author | cott <cott@8e189c6b-2ab8-4400-aa02-70a9cfce18b9> | 2010-11-14 06:17:54 +0000 |
|---|---|---|
| committer | cott <cott@8e189c6b-2ab8-4400-aa02-70a9cfce18b9> | 2010-11-14 06:17:54 +0000 |
| commit | 68fef2fe3544197073744ccb7e69be1a34763225 (patch) | |
| tree | 1bf85bec2d996e09e0572b1cabc413756b5d5c11 | |
| parent | 2ce532170e1ee3fdffda2e30ff109330ed29abe5 (diff) | |
* fix a stupid issue with hdf5
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinEOS/EOS_Omni/EOS_Omni@19 8e189c6b-2ab8-4400-aa02-70a9cfce18b9
| -rw-r--r-- | param.ccl | 2 | ||||
| -rw-r--r-- | src/nuc_eos/readtable.F90 | 3 |
2 files changed, 3 insertions, 2 deletions
@@ -58,7 +58,7 @@ REAL hybrid_rho_nuc "Density at which to switch betwen gammas; c=G=Msun=1" ################ Finite-Temperature Nuclear EOS -BOOLEAN nuceos_read_table "Read in EOS table?" +BOOLEAN nuceos_read_table "Read in EOS table?" STEERABLE=ALWAYS { } "No" diff --git a/src/nuc_eos/readtable.F90 b/src/nuc_eos/readtable.F90 index 1c3e7e2..f332fab 100644 --- a/src/nuc_eos/readtable.F90 +++ b/src/nuc_eos/readtable.F90 @@ -213,7 +213,8 @@ subroutine nuc_eos_readtable(eos_filename) call h5fclose_f (file_id,error) - call h5close_f (error) +! not a good idea to call this function as it will screw recovery +! call h5close_f (error) ! set min-max values: |