Show
Ignore:
Timestamp:
05/14/08 12:21:45 (8 months ago)
Author:
rjrw
Message:

Updated C,N,O,S doubly-ionized reactions from Nick Abel.

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • branches/newmole/source/mole_solve.cpp

    r2056 r2068  
    515515                        } 
    516516 
    517                         double scale; 
    518517                        for (nelem=ipHYDROGEN;nelem<LIMELM;nelem++) 
    519518                        { 
    … …  
    522521                                        if (lgJac) 
    523522                                        { 
    524                                                 scale = -(ABSLIM+fabs(c[ncons[nelem]][ncons[nelem]])); 
     523                                                double scale = -(ABSLIM+fabs(c[ncons[nelem]][ncons[nelem]])); 
    525524                                                for(i=0;i<mole.num_compacted;i++) 
    526525                                                {