[Commits] [svn:einsteintoolkit] incoming/EOS_Omni/src/nuc_eos/ (Rev. 18)

[knarf at cct.lsu.edu]

User: knarf
Date: 2010/11/13 11:04 PM

Modified:
 /EOS_Omni/src/nuc_eos/
  bisection.F90

Log:
 correct compile error

File Changes:

Directory: /EOS_Omni/src/nuc_eos/
=================================

File [modified]: bisection.F90
Delta lines: +1 -1
===================================================================
--- EOS_Omni/src/nuc_eos/bisection.F90	2010-11-13 04:13:28 UTC (rev 17)
+++ EOS_Omni/src/nuc_eos/bisection.F90	2010-11-14 05:04:22 UTC (rev 18)
@@ -19,7 +19,7 @@
 
   integer bcount,i,itmax,maxbcount
 
-  real*8 bivar
+  real*8 bivar(*)
 
   bcount = 0
   maxbcount = 80