diff options
Diffstat (limited to 'src/nuc_eos/readtable.F90')
| -rw-r--r-- | src/nuc_eos/readtable.F90 | 3 |
1 files changed, 2 insertions, 1 deletions
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: |