begin model noFinalize
| begin input variables
| end input variables;
| begin output variables
| end output variables;
| begin process 0
| | main function : main;
| | begin process variables
| | | MPI_REQUEST_NULL : pointer(36)<Record[MPIX_Comm_Record; id:int]>;
| | | | libmpi.c 85.0--85.55: "MPI_Request MPI_REQUEST_NULL = (MPIX_Comm_Record*)NULL;"
| | | MPI_STATUS_IGNORE : pointer(37)<Record[MPI_Status; MPI_SOURCE:int, MPI_TAG:int, SIZE:int]>;
| | | | libmpi.c 89.0--89.50: "MPI_Status *MPI_STATUS_IGNORE = (MPI_Status*)NULL;"
| | | MPIX_State : int;
| | | | libmpi.c 94.0--94.19: "int MPIX_State = 0;"
| | | myrank : int;
| | | | noFinalize.c 3.0--3.11: "int myrank;"
| | end process variables;
| | begin function main
| | | | noFinalize.c 5.0--5.11: "void main()"
| | | begin proper local variables
| | | | argc : int;
| | | | | noFinalize.c 6.1--6.10: "int argc;"
| | | | argv : pointer(38)<pointer(39)<char>>;
| | | | | noFinalize.c 7.1--7.13: "char **argv;"
| | | end proper local variables;
| | | start location : 0;
| | | begin location 0
| | | | kind : INVOCATION;
| | | | MPI_Init(&argc,&argv); goto location 1;
| | | | | noFinalize.c 9.1--9.24: "MPI_Init(&argc, &argv);"
| | | end location 0;
| | | begin location 1
| | | | kind : INVOCATION;
| | | | MPI_Comm_rank(MPI_COMM_WORLD,&myrank); goto location 2;
| | | | | noFinalize.c 10.1--10.40: "MPI_Comm_rank(MPI_COMM_WORLD, &myrank);"
| | | end location 1;
| | | begin location 2
| | | | kind : RETURN;
| | | | return null; goto location 3;
| | | | | noFinalize.c 11.0--11.0: "}"
| | | end location 2;
| | | begin location 3
| | | | kind : TERMINAL;
| | | end location 3;
| | end function main;
| | begin function MPI_Init
| | | | libmpi.c 101.0--101.37: "int MPI_Init(int *argc, char ***argv)"
| | | begin formal parameters
| | | | argc : pointer(40)<int>;
| | | | | libmpi.c 101.13--101.22: "int *argc"
| | | | argv : pointer(41)<pointer(38)<pointer(39)<char>>>;
| | | | | libmpi.c 101.24--101.36: "char ***argv"
| | | end formal parameters;
| | | start location : 0;
| | | begin location 0
| | | | kind : ASSERTION;
| | | | assert MPIX_State==MPIX_UNINITIALIZED; Attempt to call MPI_Init when MPI is already initialized goto location 1;
| | | | | libmpi.c 102.15--102.115: "assert MPIX_State == MPIX_UNINITIALIZED, "Attempt to call MPI_Init when MPI is already initialized";"
| | | end location 0;
| | | begin location 1
| | | | kind : ASSIGNMENT;
| | | | MPIX_State = MPIX_INITIALIZED; goto location 2;
| | | | | libmpi.c 103.2--103.32: "MPIX_State = MPIX_INITIALIZED;"
| | | end location 1;
| | | begin location 2
| | | | kind : RETURN;
| | | | return 0; goto location 3;
| | | | | libmpi.c 104.2--104.11: "return 0;"
| | | end location 2;
| | | begin location 3
| | | | kind : TERMINAL;
| | | end location 3;
| | end function MPI_Init;
| | begin function MPI_Comm_rank
| | | | libmpi.c 113.0--113.45: "int MPI_Comm_rank(MPI_Comm _comm, int *_rank)"
| | | begin formal parameters
| | | | _comm : int;
| | | | | libmpi.c 113.18--113.32: "MPI_Comm _comm"
| | | | _rank : pointer(40)<int>;
| | | | | libmpi.c 113.34--113.44: "int *_rank"
| | | end formal parameters;
| | | start location : 0;
| | | begin location 0
| | | | kind : ASSERTION;
| | | | assert MPIX_State==MPIX_INITIALIZED; Attempt to call MPI_Comm_rank when MPI is not initialized goto location 1;
| | | | | libmpi.c 114.15--114.114: "assert MPIX_State == MPIX_INITIALIZED, "Attempt to call MPI_Comm_rank when MPI is not initialized";"
| | | end location 0;
| | | begin location 1
| | | | kind : ASSERTION;
| | | | assert _comm==MPI_COMM_WORLD;  goto location 2;
| | | | | libmpi.c 116.15--116.46: "assert _comm == MPI_COMM_WORLD;"
| | | end location 1;
| | | begin location 2
| | | | kind : ASSIGNMENT;
| | | | *_rank = 0; goto location 3;
| | | | | libmpi.c 117.2--117.15: "*_rank = PID;"
| | | end location 2;
| | | begin location 3
| | | | kind : RETURN;
| | | | return 0; goto location 4;
| | | | | libmpi.c 118.2--118.11: "return 0;"
| | | end location 3;
| | | begin location 4
| | | | kind : TERMINAL;
| | | end location 4;
| | end function MPI_Comm_rank;
| end process 0;
| begin process 1
| | main function : main;
| | begin process variables
| | | MPI_REQUEST_NULL : pointer(36)<Record[MPIX_Comm_Record; id:int]>;
| | | | libmpi.c 85.0--85.55: "MPI_Request MPI_REQUEST_NULL = (MPIX_Comm_Record*)NULL;"
| | | MPI_STATUS_IGNORE : pointer(37)<Record[MPI_Status; MPI_SOURCE:int, MPI_TAG:int, SIZE:int]>;
| | | | libmpi.c 89.0--89.50: "MPI_Status *MPI_STATUS_IGNORE = (MPI_Status*)NULL;"
| | | MPIX_State : int;
| | | | libmpi.c 94.0--94.19: "int MPIX_State = 0;"
| | | myrank : int;
| | | | noFinalize.c 3.0--3.11: "int myrank;"
| | end process variables;
| | begin function main
| | | | noFinalize.c 5.0--5.11: "void main()"
| | | begin proper local variables
| | | | argc : int;
| | | | | noFinalize.c 6.1--6.10: "int argc;"
| | | | argv : pointer(38)<pointer(39)<char>>;
| | | | | noFinalize.c 7.1--7.13: "char **argv;"
| | | end proper local variables;
| | | start location : 0;
| | | begin location 0
| | | | kind : INVOCATION;
| | | | MPI_Init(&argc,&argv); goto location 1;
| | | | | noFinalize.c 9.1--9.24: "MPI_Init(&argc, &argv);"
| | | end location 0;
| | | begin location 1
| | | | kind : INVOCATION;
| | | | MPI_Comm_rank(MPI_COMM_WORLD,&myrank); goto location 2;
| | | | | noFinalize.c 10.1--10.40: "MPI_Comm_rank(MPI_COMM_WORLD, &myrank);"
| | | end location 1;
| | | begin location 2
| | | | kind : RETURN;
| | | | return null; goto location 3;
| | | | | noFinalize.c 11.0--11.0: "}"
| | | end location 2;
| | | begin location 3
| | | | kind : TERMINAL;
| | | end location 3;
| | end function main;
| | begin function MPI_Init
| | | | libmpi.c 101.0--101.37: "int MPI_Init(int *argc, char ***argv)"
| | | begin formal parameters
| | | | argc : pointer(40)<int>;
| | | | | libmpi.c 101.13--101.22: "int *argc"
| | | | argv : pointer(41)<pointer(38)<pointer(39)<char>>>;
| | | | | libmpi.c 101.24--101.36: "char ***argv"
| | | end formal parameters;
| | | start location : 0;
| | | begin location 0
| | | | kind : ASSERTION;
| | | | assert MPIX_State==MPIX_UNINITIALIZED; Attempt to call MPI_Init when MPI is already initialized goto location 1;
| | | | | libmpi.c 102.15--102.115: "assert MPIX_State == MPIX_UNINITIALIZED, "Attempt to call MPI_Init when MPI is already initialized";"
| | | end location 0;
| | | begin location 1
| | | | kind : ASSIGNMENT;
| | | | MPIX_State = MPIX_INITIALIZED; goto location 2;
| | | | | libmpi.c 103.2--103.32: "MPIX_State = MPIX_INITIALIZED;"
| | | end location 1;
| | | begin location 2
| | | | kind : RETURN;
| | | | return 0; goto location 3;
| | | | | libmpi.c 104.2--104.11: "return 0;"
| | | end location 2;
| | | begin location 3
| | | | kind : TERMINAL;
| | | end location 3;
| | end function MPI_Init;
| | begin function MPI_Comm_rank
| | | | libmpi.c 113.0--113.45: "int MPI_Comm_rank(MPI_Comm _comm, int *_rank)"
| | | begin formal parameters
| | | | _comm : int;
| | | | | libmpi.c 113.18--113.32: "MPI_Comm _comm"
| | | | _rank : pointer(40)<int>;
| | | | | libmpi.c 113.34--113.44: "int *_rank"
| | | end formal parameters;
| | | start location : 0;
| | | begin location 0
| | | | kind : ASSERTION;
| | | | assert MPIX_State==MPIX_INITIALIZED; Attempt to call MPI_Comm_rank when MPI is not initialized goto location 1;
| | | | | libmpi.c 114.15--114.114: "assert MPIX_State == MPIX_INITIALIZED, "Attempt to call MPI_Comm_rank when MPI is not initialized";"
| | | end location 0;
| | | begin location 1
| | | | kind : ASSERTION;
| | | | assert _comm==MPI_COMM_WORLD;  goto location 2;
| | | | | libmpi.c 116.15--116.46: "assert _comm == MPI_COMM_WORLD;"
| | | end location 1;
| | | begin location 2
| | | | kind : ASSIGNMENT;
| | | | *_rank = 1; goto location 3;
| | | | | libmpi.c 117.2--117.15: "*_rank = PID;"
| | | end location 2;
| | | begin location 3
| | | | kind : RETURN;
| | | | return 0; goto location 4;
| | | | | libmpi.c 118.2--118.11: "return 0;"
| | | end location 3;
| | | begin location 4
| | | | kind : TERMINAL;
| | | end location 4;
| | end function MPI_Comm_rank;
| end process 1;
| begin process 2
| | main function : main;
| | begin process variables
| | | MPI_REQUEST_NULL : pointer(36)<Record[MPIX_Comm_Record; id:int]>;
| | | | libmpi.c 85.0--85.55: "MPI_Request MPI_REQUEST_NULL = (MPIX_Comm_Record*)NULL;"
| | | MPI_STATUS_IGNORE : pointer(37)<Record[MPI_Status; MPI_SOURCE:int, MPI_TAG:int, SIZE:int]>;
| | | | libmpi.c 89.0--89.50: "MPI_Status *MPI_STATUS_IGNORE = (MPI_Status*)NULL;"
| | | MPIX_State : int;
| | | | libmpi.c 94.0--94.19: "int MPIX_State = 0;"
| | | myrank : int;
| | | | noFinalize.c 3.0--3.11: "int myrank;"
| | end process variables;
| | begin function main
| | | | noFinalize.c 5.0--5.11: "void main()"
| | | begin proper local variables
| | | | argc : int;
| | | | | noFinalize.c 6.1--6.10: "int argc;"
| | | | argv : pointer(38)<pointer(39)<char>>;
| | | | | noFinalize.c 7.1--7.13: "char **argv;"
| | | end proper local variables;
| | | start location : 0;
| | | begin location 0
| | | | kind : INVOCATION;
| | | | MPI_Init(&argc,&argv); goto location 1;
| | | | | noFinalize.c 9.1--9.24: "MPI_Init(&argc, &argv);"
| | | end location 0;
| | | begin location 1
| | | | kind : INVOCATION;
| | | | MPI_Comm_rank(MPI_COMM_WORLD,&myrank); goto location 2;
| | | | | noFinalize.c 10.1--10.40: "MPI_Comm_rank(MPI_COMM_WORLD, &myrank);"
| | | end location 1;
| | | begin location 2
| | | | kind : RETURN;
| | | | return null; goto location 3;
| | | | | noFinalize.c 11.0--11.0: "}"
| | | end location 2;
| | | begin location 3
| | | | kind : TERMINAL;
| | | end location 3;
| | end function main;
| | begin function MPI_Init
| | | | libmpi.c 101.0--101.37: "int MPI_Init(int *argc, char ***argv)"
| | | begin formal parameters
| | | | argc : pointer(40)<int>;
| | | | | libmpi.c 101.13--101.22: "int *argc"
| | | | argv : pointer(41)<pointer(38)<pointer(39)<char>>>;
| | | | | libmpi.c 101.24--101.36: "char ***argv"
| | | end formal parameters;
| | | start location : 0;
| | | begin location 0
| | | | kind : ASSERTION;
| | | | assert MPIX_State==MPIX_UNINITIALIZED; Attempt to call MPI_Init when MPI is already initialized goto location 1;
| | | | | libmpi.c 102.15--102.115: "assert MPIX_State == MPIX_UNINITIALIZED, "Attempt to call MPI_Init when MPI is already initialized";"
| | | end location 0;
| | | begin location 1
| | | | kind : ASSIGNMENT;
| | | | MPIX_State = MPIX_INITIALIZED; goto location 2;
| | | | | libmpi.c 103.2--103.32: "MPIX_State = MPIX_INITIALIZED;"
| | | end location 1;
| | | begin location 2
| | | | kind : RETURN;
| | | | return 0; goto location 3;
| | | | | libmpi.c 104.2--104.11: "return 0;"
| | | end location 2;
| | | begin location 3
| | | | kind : TERMINAL;
| | | end location 3;
| | end function MPI_Init;
| | begin function MPI_Comm_rank
| | | | libmpi.c 113.0--113.45: "int MPI_Comm_rank(MPI_Comm _comm, int *_rank)"
| | | begin formal parameters
| | | | _comm : int;
| | | | | libmpi.c 113.18--113.32: "MPI_Comm _comm"
| | | | _rank : pointer(40)<int>;
| | | | | libmpi.c 113.34--113.44: "int *_rank"
| | | end formal parameters;
| | | start location : 0;
| | | begin location 0
| | | | kind : ASSERTION;
| | | | assert MPIX_State==MPIX_INITIALIZED; Attempt to call MPI_Comm_rank when MPI is not initialized goto location 1;
| | | | | libmpi.c 114.15--114.114: "assert MPIX_State == MPIX_INITIALIZED, "Attempt to call MPI_Comm_rank when MPI is not initialized";"
| | | end location 0;
| | | begin location 1
| | | | kind : ASSERTION;
| | | | assert _comm==MPI_COMM_WORLD;  goto location 2;
| | | | | libmpi.c 116.15--116.46: "assert _comm == MPI_COMM_WORLD;"
| | | end location 1;
| | | begin location 2
| | | | kind : ASSIGNMENT;
| | | | *_rank = 2; goto location 3;
| | | | | libmpi.c 117.2--117.15: "*_rank = PID;"
| | | end location 2;
| | | begin location 3
| | | | kind : RETURN;
| | | | return 0; goto location 4;
| | | | | libmpi.c 118.2--118.11: "return 0;"
| | | end location 3;
| | | begin location 4
| | | | kind : TERMINAL;
| | | end location 4;
| | end function MPI_Comm_rank;
| end process 2;
end model noFinalize.
