58 MPI_Init( &argc, &argv);
61 std::cout <<
"Usage: " << argv[0]
62 <<
" <Rocin input file><Output file name><Niter><Invert Tets>" << endl;
65 string inputfname(argv[1]);
66 string outputfname(argv[2]);
67 int niter = atoi(argv[3]);
68 int invert_tets = atoi(argv[4]);
70 std::cout <<
"niter = " << niter <<
"\ninvert_tets = " << invert_tets <<
"\n\n";
101 ostringstream rankstream;
102 rankstream << myrank+1;
104 const string wname(
"smoothed_mesh");
117 std::cout <<
"Smoothing the window\n";
118 ostringstream MyStream;
129 string MyString =
"00";
132 for (
int i = 1;
i < niter;
i++){
134 string::size_type len;
135 len = MyString.length();
136 MyString.erase(0,len+1);
138 MyStream <<
"00" <<
i;
139 MyString = MyStream.str();
here we put it at the!beginning of the common block The point to point and collective!routines know about but MPI_TYPE_STRUCT as yet does not!MPI_STATUS_IGNORE and MPI_STATUSES_IGNORE are similar objects!Until the underlying MPI library implements the C version of these are declared as arrays of MPI_STATUS_SIZE!The types and are OPTIONAL!Their values are zero if they are not available Note that!using these reduces the portability of MPI_IO INTEGER MPI_BOTTOM INTEGER MPI_DOUBLE_PRECISION INTEGER MPI_LOGICAL INTEGER MPI_2REAL INTEGER MPI_2DOUBLE_COMPLEX INTEGER MPI_LB INTEGER MPI_WTIME_IS_GLOBAL INTEGER MPI_COMM_WORLD
int get_comm_rank(MPI_Comm comm)
A Roccom mesh optimization module.
void COM_set_verbose(int i)
int COM_get_attribute_handle(const char *waname)
int get_comm_size(MPI_Comm comm)
void COM_print_profile(const char *fname, const char *header)
void COM_window_init_done(const char *w_str, int pane_changed=true)
void COM_set_profiling(int i)
void COM_call_function(const int wf, int argc,...)
void COM_init(int *argc, char ***argv)
void COM_new_attribute(const char *wa_str, const char loc, const int type, int ncomp, const char *unit)
Registering an attribute type.
#define COM_LOAD_MODULE_STATIC_DYNAMIC(moduleName, windowString)
void COM_resize_array(const char *wa_str, int pane_id=0, void **addr=NULL, int strd=-1, int cap=0)
Resize an attribute on a specific pane and return the address by setting addr.
int COM_get_function_handle(const char *wfname)