errcode.c

fortran并行计算包

    /* src/mpi/topo/graphdimsget.c */
    int i1 = MPI_COMM_WORLD;
    char s2[] = "pointer2";
    char s3[] = "pointer3";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_graphdims_get", "**mpi_graphdims_get %C %p %p", i1, s2, s3 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_graphdims_get %C %p %p" );
    }
    /* src/mpi/topo/dims_create.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**argarrayneg", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**argarrayneg" );
    {
    /* src/mpi/topo/dims_create.c */
    char s1[] = "string1";
    int i2 = 2;
    int i3 = 3;
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**argarrayneg", "**argarrayneg %s %d %d", s1, i2, i3 );
    ChkMsg( err, MPI_ERR_OTHER, "**argarrayneg %s %d %d" );
    }
    /* src/mpi/topo/dims_create.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**dimspartition", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**dimspartition" );
    /* src/mpi/topo/dims_create.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_dims_create", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_dims_create" );
    {
    /* src/mpi/topo/dims_create.c */
    int i1 = 1;
    int i2 = 2;
    char s3[] = "pointer3";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_dims_create", "**mpi_dims_create %d %d %p", i1, i2, s3 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_dims_create %d %d %p" );
    }
    /* src/mpi/topo/topo_test.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_topo_test", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_topo_test" );
    {
    /* src/mpi/topo/topo_test.c */
    int i1 = MPI_COMM_WORLD;
    char s2[] = "pointer2";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_topo_test", "**mpi_topo_test %C %p", i1, s2 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_topo_test %C %p" );
    }
    /* src/mpi/topo/cartdim_get.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_cartdim_get", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_cartdim_get" );
    {
    /* src/mpi/topo/cartdim_get.c */
    int i1 = MPI_COMM_WORLD;
    char s2[] = "pointer2";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_cartdim_get", "**mpi_cartdim_get %C %p", i1, s2 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_cartdim_get %C %p" );
    }
    /* src/mpi/topo/graphcreate.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_graph_create", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_graph_create" );
    {
    /* src/mpi/topo/graphcreate.c */
    int i1 = MPI_COMM_WORLD;
    int i2 = 2;
    char s3[] = "pointer3";
    char s4[] = "pointer4";
    int i5 = 5;
    char s6[] = "pointer6";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_graph_create", "**mpi_graph_create %C %d %p %p %d %p", i1, i2, s3, s4, i5, s6 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_graph_create %C %d %p %p %d %p" );
    }
    /* src/mpi/topo/graphcreate.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**topotoolarge", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**topotoolarge" );
    {
    /* src/mpi/topo/graphcreate.c */
    int i1 = 1;
    int i2 = 2;
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**topotoolarge", "**topotoolarge %d %d", i1, i2 );
    ChkMsg( err, MPI_ERR_OTHER, "**topotoolarge %d %d" );
    }
    /* src/mpi/topo/graphcreate.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**indexneg", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**indexneg" );
    {
    /* src/mpi/topo/graphcreate.c */
    int i1 = 1;
    int i2 = 2;
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**indexneg", "**indexneg %d %d", i1, i2 );
    ChkMsg( err, MPI_ERR_OTHER, "**indexneg %d %d" );
    }
    /* src/mpi/topo/graphcreate.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**indexnonmonotone", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**indexnonmonotone" );
    {
    /* src/mpi/topo/graphcreate.c */
    int i1 = 1;
    int i2 = 2;
    int i3 = 3;
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**indexnonmonotone", "**indexnonmonotone %d %d %d", i1, i2, i3 );
    ChkMsg( err, MPI_ERR_OTHER, "**indexnonmonotone %d %d %d" );
    }
    /* src/mpi/topo/graphcreate.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**edgeoutrange", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**edgeoutrange" );
    {
    /* src/mpi/topo/graphcreate.c */
    int i1 = 1;
    int i2 = 2;
    int i3 = 3;
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**edgeoutrange", "**edgeoutrange %d %d %d", i1, i2, i3 );
    ChkMsg( err, MPI_ERR_OTHER, "**edgeoutrange %d %d %d" );
    }
    /* src/mpi/topo/graphcreate.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**nulledge", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**nulledge" );
    {
    /* src/mpi/topo/graphcreate.c */
    int i1 = 1;
    int i2 = 2;
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**nulledge", "**nulledge %d %d", i1, i2 );
    ChkMsg( err, MPI_ERR_OTHER, "**nulledge %d %d" );
    }
    /* src/mpi/topo/cart_shift.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_cart_shift", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_cart_shift" );
    {
    /* src/mpi/topo/cart_shift.c */
    int i1 = MPI_COMM_WORLD;
    int i2 = 2;
    int i3 = 3;
    char s4[] = "pointer4";
    char s5[] = "pointer5";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_cart_shift", "**mpi_cart_shift %C %d %d %p %p", i1, i2, i3, s4, s5 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_cart_shift %C %d %d %p %p" );
    }
    /* src/mpi/topo/cart_map.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_cart_map", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_cart_map" );
    {
    /* src/mpi/topo/cart_map.c */
    int i1 = MPI_COMM_WORLD;
    int i2 = 2;
    char s3[] = "pointer3";
    char s4[] = "pointer4";
    char s5[] = "pointer5";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_cart_map", "**mpi_cart_map %C %d %p %p %p", i1, i2, s3, s4, s5 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_cart_map %C %d %p %p %p" );
    }
    /* src/mpi/topo/cart_get.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_cart_get", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_cart_get" );
    {
    /* src/mpi/topo/cart_get.c */
    int i1 = MPI_COMM_WORLD;
    int i2 = 2;
    char s3[] = "pointer3";
    char s4[] = "pointer4";
    char s5[] = "pointer5";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_cart_get", "**mpi_cart_get %C %d %p %p %p", i1, i2, s3, s4, s5 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_cart_get %C %d %p %p %p" );
    }
    /* src/mpi/romio/mpi2-other/array/darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "Invalid size argument", 0);
    ChkMsg( err, MPI_ERR_OTHER, "Invalid size argument" );
    /* src/mpi/romio/mpi2-other/array/darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "Invalid rank argument", 0);
    ChkMsg( err, MPI_ERR_OTHER, "Invalid rank argument" );
    /* src/mpi/romio/mpi2-other/array/darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "Invalid ndoms argument", 0);
    ChkMsg( err, MPI_ERR_OTHER, "Invalid ndoms argument" );
    /* src/mpi/romio/mpi2-other/array/darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "Invalid array_of_gsizes argument", 0);
    ChkMsg( err, MPI_ERR_OTHER, "Invalid array_of_gsizes argument" );
    /* src/mpi/romio/mpi2-other/array/darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "Invalid array_of_distribs argument", 0);
    ChkMsg( err, MPI_ERR_OTHER, "Invalid array_of_distribs argument" );
    /* src/mpi/romio/mpi2-other/array/darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "Invalid array_of_dargs argument", 0);
    ChkMsg( err, MPI_ERR_OTHER, "Invalid array_of_dargs argument" );
    /* src/mpi/romio/mpi2-other/array/darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "Invalid array_of_psizes argument", 0);
    ChkMsg( err, MPI_ERR_OTHER, "Invalid array_of_psizes argument" );
    /* src/mpi/romio/mpi2-other/array/darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "Invalid gsize argument", 0);
    ChkMsg( err, MPI_ERR_OTHER, "Invalid gsize argument" );
    /* src/mpi/romio/mpi2-other/array/darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "Invalid darg argument", 0);
    ChkMsg( err, MPI_ERR_OTHER, "Invalid darg argument" );
    /* src/mpi/romio/mpi2-other/array/darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "Invalid psize argument", 0);
    ChkMsg( err, MPI_ERR_OTHER, "Invalid psize argument" );
    /* src/mpi/romio/mpi2-other/array/darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "Invalid distrib argument", 0);
    ChkMsg( err, MPI_ERR_OTHER, "Invalid distrib argument" );
    /* src/mpi/romio/mpi2-other/array/darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "For MPI_DISTRIBUTE_NONE, the number of processes in that dimension of the grid must be 1", 0);
    ChkMsg( err, MPI_ERR_OTHER, "For MPI_DISTRIBUTE_NONE, the number of processes in that dimension of the grid must be 1" );
    /* src/mpi/romio/mpi2-other/array/darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "Invalid type argument", 0);
    ChkMsg( err, MPI_ERR_OTHER, "Invalid type argument" );
    /* src/mpi/romio/mpi2-other/array/darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "Invalid array size", 0);
    ChkMsg( err, MPI_ERR_OTHER, "Invalid array size" );
    /* src/mpi/romio/mpi2-other/array/darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "Invalid order argument", 0);
    ChkMsg( err, MPI_ERR_OTHER, "Invalid order argument" );
    /* src/mpi/romio/mpi2-other/array/darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "Internal error", 0);
    ChkMsg( err, MPI_ERR_OTHER, "Internal error" );
    /* src/mpi/romio/mpi2-other/array/subarray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "Invalid ndims argument", 0);
    ChkMsg( err, MPI_ERR_OTHER, "Invalid ndims argument" );
    /* src/mpi/romio/mpi2-other/array/subarray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "Invalid array_of_sizes argument", 0);
    ChkMsg( err, MPI_ERR_OTHER, "Invalid array_of_sizes argument" );
    /* src/mpi/romio/mpi2-other/array/subarray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "Invalid array_of_subsizes argument", 0);
    ChkMsg( err, MPI_ERR_OTHER, "Invalid array_of_subsizes argument" );
    /* src/mpi/romio/mpi2-other/array/subarray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "Invalid array_of_starts argument", 0);
    ChkMsg( err, MPI_ERR_OTHER, "Invalid array_of_starts argument" );
    /* src/mpi/romio/mpi2-other/array/subarray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "Invalid subsize argument", 0);
    ChkMsg( err, MPI_ERR_OTHER, "Invalid subsize argument" );
    /* src/mpi/romio/mpi2-other/array/subarray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "Invalid start argument", 0);
    ChkMsg( err, MPI_ERR_OTHER, "Invalid start argument" );