/dports/math/geogram/geogram-1.7.7/src/lib/third_party/numerics/SUPERLU/ |
H A D | sreadrb.c | 190 register int i, j, k, col, new_nnz; in FormFullA() local 229 new_nnz = *nonz * 2 - n; in FormFullA() 232 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 234 if ( !(a_val = (float*) SUPERLU_MALLOC( new_nnz * sizeof(float)) ) ) in FormFullA() 265 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 278 *nonz = new_nnz; in FormFullA()
|
H A D | dreadrb.c | 190 register int i, j, k, col, new_nnz; in FormFullA() local 229 new_nnz = *nonz * 2 - n; in FormFullA() 232 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 234 if ( !(a_val = (double*) SUPERLU_MALLOC( new_nnz * sizeof(double)) ) ) in FormFullA() 265 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 278 *nonz = new_nnz; in FormFullA()
|
H A D | creadhb.c | 203 register int i, j, k, col, new_nnz; in FormFullA() local 242 new_nnz = *nonz * 2 - n; in FormFullA() 245 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 247 if ( !(a_val = (complex*) SUPERLU_MALLOC( new_nnz * sizeof(complex)) ) ) in FormFullA() 278 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 291 *nonz = new_nnz; in FormFullA()
|
H A D | sreadhb.c | 193 register int i, j, k, col, new_nnz; in FormFullA() local 232 new_nnz = *nonz * 2 - n; in FormFullA() 235 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 237 if ( !(a_val = (float*) SUPERLU_MALLOC( new_nnz * sizeof(float)) ) ) in FormFullA() 268 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 281 *nonz = new_nnz; in FormFullA()
|
H A D | zreadrb.c | 199 register int i, j, k, col, new_nnz; in FormFullA() local 238 new_nnz = *nonz * 2 - n; in FormFullA() 241 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 243 if ( !(a_val = (doublecomplex*) SUPERLU_MALLOC( new_nnz * sizeof(doublecomplex)) ) ) in FormFullA() 274 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 287 *nonz = new_nnz; in FormFullA()
|
H A D | creadrb.c | 199 register int i, j, k, col, new_nnz; in FormFullA() local 238 new_nnz = *nonz * 2 - n; in FormFullA() 241 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 243 if ( !(a_val = (complex*) SUPERLU_MALLOC( new_nnz * sizeof(complex)) ) ) in FormFullA() 274 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 287 *nonz = new_nnz; in FormFullA()
|
H A D | dreadhb.c | 193 register int i, j, k, col, new_nnz; in FormFullA() local 232 new_nnz = *nonz * 2 - n; in FormFullA() 235 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 237 if ( !(a_val = (double*) SUPERLU_MALLOC( new_nnz * sizeof(double)) ) ) in FormFullA() 268 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 281 *nonz = new_nnz; in FormFullA()
|
/dports/science/py-scipy/scipy-1.7.1/scipy/sparse/linalg/dsolve/SuperLU/SRC/ |
H A D | sreadrb.c | 190 register int i, j, k, col, new_nnz; in FormFullA() local 229 new_nnz = *nonz * 2 - n; in FormFullA() 232 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 234 if ( !(a_val = (float*) SUPERLU_MALLOC( new_nnz * sizeof(float)) ) ) in FormFullA() 265 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 278 *nonz = new_nnz; in FormFullA()
|
H A D | dreadrb.c | 190 register int i, j, k, col, new_nnz; in FormFullA() local 229 new_nnz = *nonz * 2 - n; in FormFullA() 232 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 234 if ( !(a_val = (double*) SUPERLU_MALLOC( new_nnz * sizeof(double)) ) ) in FormFullA() 265 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 278 *nonz = new_nnz; in FormFullA()
|
H A D | dreadhb.c | 193 register int i, j, k, col, new_nnz; in FormFullA() local 232 new_nnz = *nonz * 2 - n; in FormFullA() 235 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 237 if ( !(a_val = (double*) SUPERLU_MALLOC( new_nnz * sizeof(double)) ) ) in FormFullA() 268 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 281 *nonz = new_nnz; in FormFullA()
|
H A D | sreadhb.c | 193 register int i, j, k, col, new_nnz; in FormFullA() local 232 new_nnz = *nonz * 2 - n; in FormFullA() 235 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 237 if ( !(a_val = (float*) SUPERLU_MALLOC( new_nnz * sizeof(float)) ) ) in FormFullA() 268 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 281 *nonz = new_nnz; in FormFullA()
|
H A D | creadrb.c | 199 register int i, j, k, col, new_nnz; in FormFullA() local 238 new_nnz = *nonz * 2 - n; in FormFullA() 241 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 243 if ( !(a_val = (complex*) SUPERLU_MALLOC( new_nnz * sizeof(complex)) ) ) in FormFullA() 274 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 287 *nonz = new_nnz; in FormFullA()
|
H A D | zreadrb.c | 199 register int i, j, k, col, new_nnz; in FormFullA() local 238 new_nnz = *nonz * 2 - n; in FormFullA() 241 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 243 if ( !(a_val = (doublecomplex*) SUPERLU_MALLOC( new_nnz * sizeof(doublecomplex)) ) ) in FormFullA() 274 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 287 *nonz = new_nnz; in FormFullA()
|
H A D | creadhb.c | 203 register int i, j, k, col, new_nnz; in FormFullA() local 242 new_nnz = *nonz * 2 - n; in FormFullA() 245 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 247 if ( !(a_val = (complex*) SUPERLU_MALLOC( new_nnz * sizeof(complex)) ) ) in FormFullA() 278 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 291 *nonz = new_nnz; in FormFullA()
|
H A D | zreadhb.c | 203 register int i, j, k, col, new_nnz; in FormFullA() local 242 new_nnz = *nonz * 2 - n; in FormFullA() 245 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 247 if ( !(a_val = (doublecomplex*) SUPERLU_MALLOC( new_nnz * sizeof(doublecomplex)) ) ) in FormFullA() 278 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 291 *nonz = new_nnz; in FormFullA()
|
/dports/math/superlu/superlu-5.2.2/SRC/ |
H A D | dreadrb.c | 190 register int i, j, k, col, new_nnz; in FormFullA() local 229 new_nnz = *nonz * 2 - n; in FormFullA() 232 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 234 if ( !(a_val = (double*) SUPERLU_MALLOC( new_nnz * sizeof(double)) ) ) in FormFullA() 265 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 278 *nonz = new_nnz; in FormFullA()
|
H A D | sreadrb.c | 190 register int i, j, k, col, new_nnz; in FormFullA() local 229 new_nnz = *nonz * 2 - n; in FormFullA() 232 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 234 if ( !(a_val = (float*) SUPERLU_MALLOC( new_nnz * sizeof(float)) ) ) in FormFullA() 265 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 278 *nonz = new_nnz; in FormFullA()
|
H A D | dreadhb.c | 193 register int i, j, k, col, new_nnz; in FormFullA() local 232 new_nnz = *nonz * 2 - n; in FormFullA() 235 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 237 if ( !(a_val = (double*) SUPERLU_MALLOC( new_nnz * sizeof(double)) ) ) in FormFullA() 268 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 281 *nonz = new_nnz; in FormFullA()
|
H A D | sreadhb.c | 193 register int i, j, k, col, new_nnz; in FormFullA() local 232 new_nnz = *nonz * 2 - n; in FormFullA() 235 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 237 if ( !(a_val = (float*) SUPERLU_MALLOC( new_nnz * sizeof(float)) ) ) in FormFullA() 268 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 281 *nonz = new_nnz; in FormFullA()
|
H A D | creadrb.c | 199 register int i, j, k, col, new_nnz; in FormFullA() local 238 new_nnz = *nonz * 2 - n; in FormFullA() 241 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 243 if ( !(a_val = (complex*) SUPERLU_MALLOC( new_nnz * sizeof(complex)) ) ) in FormFullA() 274 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 287 *nonz = new_nnz; in FormFullA()
|
H A D | zreadhb.c | 203 register int i, j, k, col, new_nnz; in FormFullA() local 242 new_nnz = *nonz * 2 - n; in FormFullA() 245 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 247 if ( !(a_val = (doublecomplex*) SUPERLU_MALLOC( new_nnz * sizeof(doublecomplex)) ) ) in FormFullA() 278 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 291 *nonz = new_nnz; in FormFullA()
|
H A D | creadhb.c | 203 register int i, j, k, col, new_nnz; in FormFullA() local 242 new_nnz = *nonz * 2 - n; in FormFullA() 245 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 247 if ( !(a_val = (complex*) SUPERLU_MALLOC( new_nnz * sizeof(complex)) ) ) in FormFullA() 278 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 291 *nonz = new_nnz; in FormFullA()
|
H A D | zreadrb.c | 199 register int i, j, k, col, new_nnz; in FormFullA() local 238 new_nnz = *nonz * 2 - n; in FormFullA() 241 if ( !(a_rowind = (int *) SUPERLU_MALLOC( new_nnz * sizeof(int)) ) ) in FormFullA() 243 if ( !(a_val = (doublecomplex*) SUPERLU_MALLOC( new_nnz * sizeof(doublecomplex)) ) ) in FormFullA() 274 printf("FormFullA: new_nnz = %d, k = %d\n", new_nnz, k); in FormFullA() 287 *nonz = new_nnz; in FormFullA()
|
/dports/science/cantera/cantera-2.5.1-611-gc4d6ecc15/ext/sundials/examples/sunmatrix/ |
H A D | dreadrb.c | 244 register sunindextype i, j, k, col, new_nnz; in FormFullA() local 283 new_nnz = *nonz * 2 - n; in FormFullA() 286 if ( !(a_rowind = (sunindextype *) malloc( new_nnz * sizeof(sunindextype)) ) ) in FormFullA() 288 if ( !(a_val = (realtype*) malloc( new_nnz * sizeof(realtype)) ) ) in FormFullA() 311 printf("FormFullA: new_nnz = " IFMT ", k = " IFMT "\n", new_nnz, k); in FormFullA() 324 *nonz = new_nnz; in FormFullA()
|
/dports/math/sundials/sundials-5.7.0/examples/sunmatrix/ |
H A D | dreadrb.c | 244 register sunindextype i, j, k, col, new_nnz; in FormFullA() local 283 new_nnz = *nonz * 2 - n; in FormFullA() 286 if ( !(a_rowind = (sunindextype *) malloc( new_nnz * sizeof(sunindextype)) ) ) in FormFullA() 288 if ( !(a_val = (realtype*) malloc( new_nnz * sizeof(realtype)) ) ) in FormFullA() 311 printf("FormFullA: new_nnz = " IFMT ", k = " IFMT "\n", new_nnz, k); in FormFullA() 324 *nonz = new_nnz; in FormFullA()
|