Projects
OpenHPC3:3.4:Factory
examples
_service:extract_file:hello.c
Log In
Username
Password
Overview
Repositories
Revisions
Requests
Users
Attributes
Meta
File _service:extract_file:hello.c of Package examples
#include "mpi.h" #include <stdio.h> #include <stdlib.h> #include <unistd.h> int main(int argc, char *argv[]) { int num_procs, num_local; char mach_name[MPI_MAX_PROCESSOR_NAME]; int mach_len; MPI_Init (&argc,&argv); MPI_Comm_size (MPI_COMM_WORLD, &num_procs); MPI_Comm_rank (MPI_COMM_WORLD, &num_local); MPI_Get_processor_name(mach_name,&mach_len); MPI_Barrier(MPI_COMM_WORLD); if(num_local == 0) printf("\n Hello, world (%i procs total)\n",num_procs); MPI_Barrier(MPI_COMM_WORLD); printf(" --> Process # %3i of %3i is alive. -> %s\n", num_local,num_procs,mach_name); MPI_Finalize(); return 0; }
Locations
Projects
Search
Status Monitor
Help
Open Build Service
OBS Manuals
API Documentation
OBS Portal
Reporting a Bug
Contact
Mailing List
Forums
Chat (IRC)
Twitter
Open Build Service (OBS)
is an
openSUSE project
.