60 #include "../epetra_test_err.h"
62 int main(
int argc,
char *argv[]) {
64 int i, ierr=0, returnierr=0;
70 MPI_Init(&argc,&argv);
73 MPI_Comm_size(MPI_COMM_WORLD, &size);
74 MPI_Comm_rank(MPI_COMM_WORLD, &rank);
86 if (argc>1)
if (argv[1][0]==
'-' && argv[1][1]==
'v') verbose =
true;
94 if (!verbose) Comm.SetTracebackMode(0);
96 int MyPID = Comm.
MyPID();
99 bool verbose1 = verbose;
101 if (verbose) verbose = (MyPID==0);
108 if (verbose1) cout << Comm << endl << flush;
112 int NumMyElements = 10000;
113 int NumGlobalElements = NumMyElements*NumProc+
EPETRA_MIN(NumProc,3);
114 if (MyPID < 3) NumMyElements++;
117 bool DistributedGlobal = (NumGlobalElements>NumMyElements);
121 cout <<
"NOT IMPLEMENTED YET!!!\n";
std::string EpetraExt_Version()
int main(int argc, char **argv)