Changeset 2055 for branches/newmole/source/mole_eval_balance.cpp
- Timestamp:
- 05/13/08 17:01:00 (8 months ago)
- Files:
-
- 1 modified
-
branches/newmole/source/mole_eval_balance.cpp (modified) (5 diffs)
Legend:
- Unmodified
- Added
- Removed
-
branches/newmole/source/mole_eval_balance.cpp
r2042 r2055 29 29 /*=================================================================*/ 30 30 31 void mole_eval_balance(long int num_total, double *b, double **c)31 void mole_eval_balance(long int num_total, double *b, bool lgJac, multi_arr<double,2> &c) 32 32 { 33 33 long int i, j, nelem, ion, ion2; … … 44 44 { 45 45 mole.zone[i].src = mole.zone[i].snk = 0.; 46 if ( c)46 if (lgJac) 47 47 for( j=0; j < num_total; j++ ) 48 48 { … … 129 129 } 130 130 131 if ( c)131 if (lgJac) 132 132 { 133 133 for(j=0;j<rate->nreactants;j++) … … 149 149 } 150 150 #if !defined(NDEBUG) 151 if ( c)151 if (lgJac) 152 152 { 153 153 for (i=0;i<mole.num_calc;i++) … … 206 206 fprintf(stdout,"]\n"); 207 207 } 208 if ( c)208 if (lgJac) 209 209 fprintf(stdout,"Diag %g err %g rat %g\n",c[debug_species->index][debug_species->index], 210 210 b[debug_species->index],b[debug_species->index]/SDIV(-c[debug_species->index][debug_species->index]));
