User: knarf Date: 2010/12/06 01:47 PM
Modified: /trunk/src/nuc_eos/ bisection.F90
Log: fix compilation bug
File Changes:
Directory: /trunk/src/nuc_eos/ ==============================
File [modified]: bisection.F90 Delta lines: +2 -2 =================================================================== --- trunk/src/nuc_eos/bisection.F90 2010-12-05 01:29:37 UTC (rev 29) +++ trunk/src/nuc_eos/bisection.F90 2010-12-06 19:47:12 UTC (rev 30) @@ -19,7 +19,7 @@
integer bcount,i,itmax,maxbcount
- real*8 bivar + real*8 bivar(*)
bcount = 0 maxbcount = 80 @@ -101,7 +101,7 @@
integer bcount,i,itmax,maxbcount
- real*8 bivar + real*8 bivar(*)
bcount = 0 maxbcount = 80