User: cott Date: 2010/12/04 07:19 PM
Modified: /trunk/src/nuc_eos/ nuc_eos.F90
Log: * small fix
File Changes:
Directory: /trunk/src/nuc_eos/ ==============================
File [modified]: nuc_eos.F90 Delta lines: +1 -1 =================================================================== --- trunk/src/nuc_eos/nuc_eos.F90 2010-12-05 00:46:52 UTC (rev 27) +++ trunk/src/nuc_eos/nuc_eos.F90 2010-12-05 01:19:33 UTC (rev 28) @@ -238,7 +238,7 @@
keyerr = 0
-if(keytemp.eq.0) then + if(keytemp.eq.0) then !need to find temperature based on xeps call findtemp(lr,lt,y,leps,keyerrt,rfeps) if(keyerrt.ne.0) then