diff options
author | cott <cott@8e189c6b-2ab8-4400-aa02-70a9cfce18b9> | 2010-11-12 00:35:41 +0000 |
---|---|---|
committer | cott <cott@8e189c6b-2ab8-4400-aa02-70a9cfce18b9> | 2010-11-12 00:35:41 +0000 |
commit | 828cdf7aa06c6a1d6e56ade9465c27260028ccc7 (patch) | |
tree | d53cd93de64c8c3f34d9431d861859cc9016dd7e /src/nuc_eos/nuc_eos.F90 | |
parent | cbb9792fc45269b26ed09f60148563abbd461fda (diff) |
* fix a bug in call with entropy
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinEOS/EOS_Omni/EOS_Omni@16 8e189c6b-2ab8-4400-aa02-70a9cfce18b9
Diffstat (limited to 'src/nuc_eos/nuc_eos.F90')
-rw-r--r-- | src/nuc_eos/nuc_eos.F90 | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/nuc_eos/nuc_eos.F90 b/src/nuc_eos/nuc_eos.F90 index ba16882..5e73b82 100644 --- a/src/nuc_eos/nuc_eos.F90 +++ b/src/nuc_eos/nuc_eos.F90 @@ -236,6 +236,7 @@ subroutine nuc_eos_short(xrho,xtemp,xye,xenr,xprs,xent,xcs2,xdedt,& return endif xtemp = 10.0d0**lt + endif ! have temperature, proceed: |