void deleteHashTables() // // Input: none // Output: none // Purpose: frees memory allocated for object ID hash tables // { int j; for (j = 0; j < MAX_OBJ_TYPES; j++) { if ( Htable[j] != NULL ) HTfree(Htable[j]); } // --- free object ID memory pool if ( MemPoolAllocated ) AllocFreePool(); }
int closequal() /* **-------------------------------------------------------------- ** Input: none ** Output: returns error code ** Purpose: closes WQ solver system **-------------------------------------------------------------- */ { int errcode = 0; AllocFreePool(); /* Free memory pool */ free(FirstSeg); free(LastSeg); free(FlowDir); free(VolIn); free(MassIn); free(R); free(X); return(errcode); }