21 Int block,
n, nzoff, nblocks ;
27 if (NumericHandle ==
NULL || *NumericHandle ==
NULL)
32 Numeric = *NumericHandle ;
35 nzoff = Numeric->nzoff ;
36 nblocks = Numeric->nblocks ;
37 LUsize = Numeric->LUsize ;
39 LUbx = (
Unit **) Numeric->LUbx ;
42 for (block = 0 ; block < nblocks ; block++)
44 KLU_free (LUbx [block], LUsize ? LUsize [block] : 0,
72 *NumericHandle =
NULL ;
Int KLU_free_numeric(KLU_numeric **NumericHandle, KLU_common *Common)