/*cdNwcns get the number of cautions and warnings, to tell if calculation is ok */ #include "cddefines.h" #include "warnings.h" #include "converge.h" #include "cddrive.h" void cdNwcns( /* the number of warnings, cautions, notes, and surprises */ long int *NumberWarnings, long int *NumberCautions, long int *NumberNotes, long int *NumberSurprises, /* the number of temperature convergence failures */ long int *NumberTempFailures, /* the number of pressure convergence failures */ long int *NumberPresFailures, /* the number of ionzation convergence failures */ long int *NumberIonFailures, /* the number of electron density convergence failures */ long int *NumberNeFailures ) { # ifdef DEBUG_FUN fputs( "<+>cdNwcns()\n", debug_fp ); # endif /* this sub is called after comment, to find the number of various comments */ *NumberWarnings = warnings.nwarn; *NumberCautions = warnings.ncaun; *NumberNotes = warnings.nnote; *NumberSurprises = warnings.nbang; /* these are counters that were incremented during convergence failures */ *NumberTempFailures = conv.nTeFail; *NumberPresFailures = conv.nPreFail; *NumberIonFailures = conv.nIonFail; *NumberNeFailures = conv.nNeFail; # ifdef DEBUG_FUN fputs( " <->cdNwcns()\n", debug_fp ); # endif return; }