Changeset 6862
- Timestamp:
- 12/30/10 07:47:47 (14 years ago)
- Location:
- issm/trunk/src/c
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/c/modules/Solverx/Solverx.cpp
r6858 r6862 36 36 #endif 37 37 38 39 38 /*Display message*/ 40 39 _printf_(VerboseModule()," Solving\n"); … … 51 50 if (strcmp(ksp_type,"preonly")==0)uf0=NULL; 52 51 #endif 53 54 52 55 53 /*If initial guess for solution exists, use it to create uf, otherwise, … … 61 59 MatGetLocalSize(Kff,&local_m,&local_n);uf=NewVec(local_n,fromlocalsize); 62 60 } 63 64 61 65 62 /*Process petsc options to see if we are not using special types of external solvers: */ … … 92 89 #endif 93 90 #endif 94 95 91 96 92 /*Prepare solver*/ … … 108 104 #endif 109 105 #endif 110 111 106 112 107 /*If initial guess for solution, use it, except if we are using the MUMPS direct solver, where any initial -
issm/trunk/src/c/modules/SystemMatricesx/SystemMatricesx.cpp
r6852 r6862 30 30 /*Display message*/ 31 31 _printf_(VerboseModule()," Generating matrices\n"); 32 33 34 32 35 33 /*retrive parameters: */ -
issm/trunk/src/c/toolkits/petsc/patches/NewMat.cpp
r6852 r6862 84 84 #endif 85 85 86 87 88 86 /*Determine local sizes: */ 89 87 m=PetscDetermineLocalSize(M); … … 97 95 MatSetSizes(outmatrix,m,n,M,N); 98 96 MatSetFromOptions(outmatrix); 99 100 101 97 102 98 /*preallocation according to type: */
Note:
See TracChangeset
for help on using the changeset viewer.