Show
Ignore:
Timestamp:
05/06/08 14:47:46 (8 months ago)
Author:
rjrw
Message:

Add optional diagnostics for rate and chemical balance controlling
species update.

Remove logically dead code.

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • branches/newmole/source/mole_species.cpp

    r1938 r2027  
    616616        DEBUG_ENTRY("mole_update_species_cache()"); 
    617617 
     618        enum { DEBUG_MOLE = false }; 
     619 
    618620        mole.eden_f = (realnum)dense.eden;  /* Need floating point version for compatibility with all other values */ 
    619621 
     
    621623        { 
    622624                if(mole.list[i]->location != NULL)  
     625                { 
    623626                        mole.list[i]->den = *(mole.list[i]->location); 
     627                        if (DEBUG_MOLE) 
     628                                fprintf(ioQQQ,"%s: %f\n",mole.list[i]->label,mole.list[i]->den); 
     629                } 
    624630        } 
    625631  
     
    665671                mole.grain_saturation = 1.0; 
    666672        } 
     673        if (DEBUG_MOLE) 
     674                fprintf(ioQQQ,"Dust: %f %f %f\n", 
     675                                                mole.grain_area,mole.grain_density,mole.grain_saturation); 
    667676 
    668677}