| 216 | | if( (xmat=(double*)MALLOC( (sizeof(double)*(unsigned)(ncell*ncell) ))) == NULL ) |
| 217 | | BadMalloc(); |
| 218 | | if( (xmatsave=(double*)MALLOC( (sizeof(double)*(unsigned)(ncell*ncell) ))) == NULL ) |
| 219 | | BadMalloc(); |
| 220 | | if( (sink=(double*)MALLOC( (sizeof(double)*(unsigned)ncell ))) == NULL ) |
| 221 | | BadMalloc(); |
| 222 | | if( (source=(double*)MALLOC( (sizeof(double)*(unsigned)ncell ))) == NULL ) |
| 223 | | BadMalloc(); |
| 224 | | if( (sourcesave=(double*)MALLOC( (sizeof(double)*(unsigned)ncell ))) == NULL ) |
| 225 | | BadMalloc(); |
| 226 | | if( (ipiv=(int32*)MALLOC( (sizeof(int32)*(unsigned)ncell ))) == NULL ) |
| 227 | | BadMalloc(); |
| | 216 | xmat=(double*)MALLOC( (sizeof(double)*(unsigned)(ncell*ncell) )); |
| | 217 | xmatsave=(double*)MALLOC( (sizeof(double)*(unsigned)(ncell*ncell) )); |
| | 218 | sink=(double*)MALLOC( (sizeof(double)*(unsigned)ncell )); |
| | 219 | source=(double*)MALLOC( (sizeof(double)*(unsigned)ncell )); |
| | 220 | sourcesave=(double*)MALLOC( (sizeof(double)*(unsigned)ncell )); |
| | 221 | ipiv=(int32*)MALLOC( (sizeof(int32)*(unsigned)ncell )); |