File: Group_tranks.java

package info (click to toggle)
mpj 0.44%2Bdfsg-3
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 7,600 kB
  • ctags: 6,809
  • sloc: java: 49,853; ansic: 2,508; xml: 596; sh: 311; perl: 156; makefile: 26
file content (24 lines) | stat: -rwxr-xr-x 596 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
import mpjdev.*;
import mpjbuf.*;
import mpi.*;
import java.util.Arrays;

public class Group_tranks {

	public static void main(String args[]) throws Exception{		

		MPI.Init(args);		
		Group grp = MPI.COMM_WORLD.Group();		
		int[] incl1 = {7,6,5,4};			
		int[] ranks1 = {0,1,2,3};		
		Group grp1 = grp.Incl(incl1);		
		int[] ranks2 = Group.Translate_ranks(grp1,ranks1,grp);

		for(int i=0 ; i<ranks2.length ; i++) {
			System.out.println("ranks2["+i+"]=<"+ranks2[i]+">");
		}
		
		try { Thread.currentThread().sleep(1000); }catch(Exception e){}		
		MPI.Finalize();	
	}
}