xref: /petsc/src/mat/utils/gcreate.c (revision c6a45a9732aaf0679b0f4eb4ddc75ce99ee9558a)
1 
2 #include "sys.h"
3 #include "options.h"
4 #include "sysio.h"
5 #include "mat.h"
6 #include "comm.h"
7 
8 /*@C
9       MatCreateInitialMatrix - Reads from command line to determine
10            what type of matrix to create.
11 
12   Input Parameters:
13 .   m,n - matrix dimensions
14 
15   Output Parameter:
16 .   V - location to stash resulting matrix.
17 @*/
18 int MatCreateInitialMatrix(int m,int n,Mat *V)
19 {
20   if (OptionsHasName(0,0,"-dense")) {
21     fprintf(stdout,"Using BLAS+LAPACK sequential dense matrices\n");
22     return MatCreateSequentialDense(m,n,V);
23   }
24   fprintf(stdout,"Using standard sequential AIJ matrices\n");
25   return MatCreateSequentialAIJ(m,n,10,0,V);
26 }
27 
28