From 66c30b27215c91e1b90781fcab4aef1945d51a9c Mon Sep 17 00:00:00 2001 From: Gilles Gouaillardet Date: Fri, 15 May 2015 18:20:35 +0900 Subject: [PATCH 1/2] Add Fortran 2008 syntax to the manpages --- ompi/mpi/man/man3/MPI_Abort.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Accumulate.3in | 29 +++++++++++++++- ompi/mpi/man/man3/MPI_Add_error_class.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Add_error_code.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Add_error_string.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Aint_add.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Allgather.3in | 26 ++++++++++++++- ompi/mpi/man/man3/MPI_Allgatherv.3in | 27 ++++++++++++++- ompi/mpi/man/man3/MPI_Alloc_mem.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Allreduce.3in | 27 ++++++++++++++- ompi/mpi/man/man3/MPI_Alltoall.3in | 28 +++++++++++++++- ompi/mpi/man/man3/MPI_Alltoallv.3in | 30 ++++++++++++++++- ompi/mpi/man/man3/MPI_Alltoallw.3in | 32 +++++++++++++++++- ompi/mpi/man/man3/MPI_Barrier.3in | 16 ++++++++- ompi/mpi/man/man3/MPI_Bcast.3in | 22 ++++++++++++- ompi/mpi/man/man3/MPI_Bsend.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Bsend_init.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Buffer_attach.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Buffer_detach.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Cancel.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Cart_coords.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Cart_create.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Cart_get.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Cart_map.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Cart_rank.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Cart_shift.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Cart_sub.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Cartdim_get.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Close_port.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Comm_accept.3in | 15 ++++++++- .../mpi/man/man3/MPI_Comm_call_errhandler.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Comm_compare.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Comm_connect.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Comm_create.3in | 13 +++++++- .../man/man3/MPI_Comm_create_errhandler.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Comm_create_group.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Comm_create_keyval.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Comm_delete_attr.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Comm_disconnect.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Comm_dup.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Comm_dup_with_info.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Comm_free.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Comm_free_keyval.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Comm_get_attr.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Comm_get_errhandler.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Comm_get_info.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Comm_get_name.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Comm_get_parent.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Comm_group.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Comm_idup.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Comm_join.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Comm_rank.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Comm_remote_group.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Comm_remote_size.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Comm_set_attr.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Comm_set_errhandler.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Comm_set_info.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Comm_set_name.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Comm_size.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Comm_spawn.3in | 17 +++++++++- ompi/mpi/man/man3/MPI_Comm_spawn_multiple.3in | 19 ++++++++++- ompi/mpi/man/man3/MPI_Comm_split.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Comm_split_type.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Comm_test_inter.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Compare_and_swap.3in | 17 +++++++++- ompi/mpi/man/man3/MPI_Dims_create.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Dist_graph_create.3in | 17 +++++++++- .../man3/MPI_Dist_graph_create_adjacent.3in | 18 +++++++++- .../mpi/man/man3/MPI_Dist_graph_neighbors.3in | 15 ++++++++- .../man3/MPI_Dist_graph_neighbors_count.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Errhandler_free.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Error_class.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Error_string.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Exscan.3in | 26 ++++++++++++++- ompi/mpi/man/man3/MPI_Fetch_and_op.3in | 18 +++++++++- .../mpi/man/man3/MPI_File_call_errhandler.3in | 12 ++++++- ompi/mpi/man/man3/MPI_File_close.3in | 8 +++++ .../man/man3/MPI_File_create_errhandler.3in | 12 ++++++- ompi/mpi/man/man3/MPI_File_delete.3in | 9 +++++ ompi/mpi/man/man3/MPI_File_get_amode.3in | 9 +++++ ompi/mpi/man/man3/MPI_File_get_atomicity.3in | 9 +++++ .../mpi/man/man3/MPI_File_get_byte_offset.3in | 10 ++++++ ompi/mpi/man/man3/MPI_File_get_errhandler.3in | 12 ++++++- ompi/mpi/man/man3/MPI_File_get_group.3in | 9 +++++ ompi/mpi/man/man3/MPI_File_get_info.3in | 9 +++++ ompi/mpi/man/man3/MPI_File_get_position.3in | 9 +++++ .../man/man3/MPI_File_get_position_shared.3in | 9 +++++ ompi/mpi/man/man3/MPI_File_get_size.3in | 9 +++++ .../mpi/man/man3/MPI_File_get_type_extent.3in | 10 ++++++ ompi/mpi/man/man3/MPI_File_get_view.3in | 11 +++++++ ompi/mpi/man/man3/MPI_File_iread.3in | 12 +++++++ ompi/mpi/man/man3/MPI_File_iread_all.3in | 12 +++++++ ompi/mpi/man/man3/MPI_File_iread_at.3in | 13 ++++++++ ompi/mpi/man/man3/MPI_File_iread_at_all.3in | 13 ++++++++ ompi/mpi/man/man3/MPI_File_iread_shared.3in | 12 +++++++ ompi/mpi/man/man3/MPI_File_iwrite.3in | 12 +++++++ ompi/mpi/man/man3/MPI_File_iwrite_all.3in | 12 +++++++ ompi/mpi/man/man3/MPI_File_iwrite_at.3in | 13 ++++++++ ompi/mpi/man/man3/MPI_File_iwrite_at_all.3in | 13 ++++++++ ompi/mpi/man/man3/MPI_File_iwrite_shared.3in | 12 +++++++ ompi/mpi/man/man3/MPI_File_open.3in | 12 +++++++ ompi/mpi/man/man3/MPI_File_preallocate.3in | 9 +++++ ompi/mpi/man/man3/MPI_File_read.3in | 12 +++++++ ompi/mpi/man/man3/MPI_File_read_all.3in | 12 +++++++ ompi/mpi/man/man3/MPI_File_read_all_begin.3in | 11 +++++++ ompi/mpi/man/man3/MPI_File_read_all_end.3in | 10 ++++++ ompi/mpi/man/man3/MPI_File_read_at.3in | 13 ++++++++ ompi/mpi/man/man3/MPI_File_read_at_all.3in | 13 ++++++++ .../man/man3/MPI_File_read_at_all_begin.3in | 12 +++++++ .../mpi/man/man3/MPI_File_read_at_all_end.3in | 10 ++++++ ompi/mpi/man/man3/MPI_File_read_ordered.3in | 12 +++++++ .../man/man3/MPI_File_read_ordered_begin.3in | 11 +++++++ .../man/man3/MPI_File_read_ordered_end.3in | 10 ++++++ ompi/mpi/man/man3/MPI_File_read_shared.3in | 12 +++++++ ompi/mpi/man/man3/MPI_File_seek.3in | 10 ++++++ ompi/mpi/man/man3/MPI_File_seek_shared.3in | 10 ++++++ ompi/mpi/man/man3/MPI_File_set_atomicity.3in | 9 +++++ ompi/mpi/man/man3/MPI_File_set_errhandler.3in | 12 ++++++- ompi/mpi/man/man3/MPI_File_set_info.3in | 9 +++++ ompi/mpi/man/man3/MPI_File_set_size.3in | 9 +++++ ompi/mpi/man/man3/MPI_File_set_view.3in | 12 +++++++ ompi/mpi/man/man3/MPI_File_sync.3in | 8 +++++ ompi/mpi/man/man3/MPI_File_write.3in | 12 +++++++ ompi/mpi/man/man3/MPI_File_write_all.3in | 12 +++++++ .../mpi/man/man3/MPI_File_write_all_begin.3in | 11 +++++++ ompi/mpi/man/man3/MPI_File_write_all_end.3in | 10 ++++++ ompi/mpi/man/man3/MPI_File_write_at.3in | 13 ++++++++ ompi/mpi/man/man3/MPI_File_write_at_all.3in | 13 ++++++++ .../man/man3/MPI_File_write_at_all_begin.3in | 12 +++++++ .../man/man3/MPI_File_write_at_all_end.3in | 10 ++++++ ompi/mpi/man/man3/MPI_File_write_ordered.3in | 12 +++++++ .../man/man3/MPI_File_write_ordered_begin.3in | 11 +++++++ .../man/man3/MPI_File_write_ordered_end.3in | 10 ++++++ ompi/mpi/man/man3/MPI_File_write_shared.3in | 12 +++++++ ompi/mpi/man/man3/MPI_Finalize.3in | 10 +++++- ompi/mpi/man/man3/MPI_Finalized.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Free_mem.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Gather.3in | 26 ++++++++++++++- ompi/mpi/man/man3/MPI_Gatherv.3in | 27 ++++++++++++++- ompi/mpi/man/man3/MPI_Get.3in | 27 ++++++++++++++- ompi/mpi/man/man3/MPI_Get_accumulate.3in | 33 ++++++++++++++++++- ompi/mpi/man/man3/MPI_Get_address.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Get_count.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Get_elements.3in | 18 +++++++++- ompi/mpi/man/man3/MPI_Get_library_version.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Get_processor_name.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Get_version.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Graph_create.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Graph_get.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Graph_map.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Graph_neighbors.3in | 13 +++++++- .../man/man3/MPI_Graph_neighbors_count.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Graphdims_get.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Grequest_complete.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Grequest_start.3in | 16 ++++++++- ompi/mpi/man/man3/MPI_Group_compare.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Group_difference.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Group_excl.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Group_free.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Group_incl.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Group_intersection.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Group_range_excl.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Group_range_incl.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Group_rank.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Group_size.3in | 12 ++++++- .../man/man3/MPI_Group_translate_ranks.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Group_union.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Ibsend.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Improbe.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Imrecv.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Info_create.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Info_delete.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Info_dup.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Info_free.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Info_get.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Info_get_nkeys.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Info_get_nthkey.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Info_get_valuelen.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Info_set.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Init.3in | 10 +++++- ompi/mpi/man/man3/MPI_Init_thread.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Initialized.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Intercomm_create.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Intercomm_merge.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Iprobe.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Irecv.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Irsend.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Is_thread_main.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Isend.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Issend.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Lookup_name.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Mprobe.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Mrecv.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Neighbor_allgather.3in | 25 +++++++++++++- ompi/mpi/man/man3/MPI_Neighbor_allgatherv.3in | 27 ++++++++++++++- ompi/mpi/man/man3/MPI_Neighbor_alltoall.3in | 28 +++++++++++++++- ompi/mpi/man/man3/MPI_Neighbor_alltoallv.3in | 30 ++++++++++++++++- ompi/mpi/man/man3/MPI_Neighbor_alltoallw.3in | 32 +++++++++++++++++- ompi/mpi/man/man3/MPI_Op_create.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Op_free.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Open_port.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Pack.3in | 16 ++++++++- ompi/mpi/man/man3/MPI_Pack_external.3in | 18 +++++++++- ompi/mpi/man/man3/MPI_Pack_external_size.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Pack_size.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Pcontrol.3in | 10 +++++- ompi/mpi/man/man3/MPI_Probe.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Publish_name.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Put.3in | 27 ++++++++++++++- ompi/mpi/man/man3/MPI_Query_thread.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Recv.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Recv_init.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Reduce.3in | 27 ++++++++++++++- ompi/mpi/man/man3/MPI_Reduce_local.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Reduce_scatter.3in | 28 +++++++++++++++- .../mpi/man/man3/MPI_Reduce_scatter_block.3in | 28 +++++++++++++++- ompi/mpi/man/man3/MPI_Register_datarep.3in | 13 ++++++++ ompi/mpi/man/man3/MPI_Request_free.3in | 8 +++++ ompi/mpi/man/man3/MPI_Request_get_status.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Rsend.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Rsend_init.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Scan.3in | 25 +++++++++++++- ompi/mpi/man/man3/MPI_Scatter.3in | 26 ++++++++++++++- ompi/mpi/man/man3/MPI_Scatterv.3in | 26 ++++++++++++++- ompi/mpi/man/man3/MPI_Send.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Send_init.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Sendrecv.3in | 18 +++++++++- ompi/mpi/man/man3/MPI_Sendrecv_replace.3in | 16 ++++++++- ompi/mpi/man/man3/MPI_Sizeof.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Ssend.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Ssend_init.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Start.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Startall.3in | 12 ++++++- .../mpi/man/man3/MPI_Status_set_cancelled.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Status_set_elements.3in | 18 +++++++++- ompi/mpi/man/man3/MPI_Test.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Test_cancelled.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Testall.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Testany.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Testsome.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Topo_test.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Type_commit.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Type_contiguous.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Type_create_darray.3in | 17 +++++++++- .../man/man3/MPI_Type_create_f90_complex.3in | 12 ++++++- .../man/man3/MPI_Type_create_f90_integer.3in | 12 ++++++- .../mpi/man/man3/MPI_Type_create_f90_real.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Type_create_hvector.3in | 15 ++++++++- .../man3/MPI_Type_create_indexed_block.3in | 23 ++++++++++++- ompi/mpi/man/man3/MPI_Type_create_keyval.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Type_create_resized.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Type_create_struct.3in | 16 ++++++++- .../mpi/man/man3/MPI_Type_create_subarray.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Type_delete_attr.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Type_dup.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Type_free.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Type_free_keyval.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Type_get_attr.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Type_get_contents.3in | 18 +++++++++- ompi/mpi/man/man3/MPI_Type_get_envelope.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Type_get_extent.3in | 16 ++++++++- ompi/mpi/man/man3/MPI_Type_get_name.3in | 13 +++++++- .../mpi/man/man3/MPI_Type_get_true_extent.3in | 16 ++++++++- ompi/mpi/man/man3/MPI_Type_indexed.3in | 24 +++++++++++++- ompi/mpi/man/man3/MPI_Type_match_size.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Type_set_attr.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Type_set_name.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Type_size.3in | 16 ++++++++- ompi/mpi/man/man3/MPI_Type_vector.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Unpack.3in | 17 +++++++++- ompi/mpi/man/man3/MPI_Unpack_external.3in | 18 +++++++++- ompi/mpi/man/man3/MPI_Unpublish_name.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Wait.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Waitall.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Waitany.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Waitsome.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Win_allocate.3in | 17 +++++++++- ompi/mpi/man/man3/MPI_Win_allocate_shared.3in | 17 +++++++++- ompi/mpi/man/man3/MPI_Win_attach.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Win_call_errhandler.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Win_complete.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Win_create.3in | 16 ++++++++- ompi/mpi/man/man3/MPI_Win_create_dynamic.3in | 13 +++++++- .../man/man3/MPI_Win_create_errhandler.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Win_create_keyval.3in | 15 ++++++++- ompi/mpi/man/man3/MPI_Win_delete_attr.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Win_fence.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Win_flush.3in | 16 ++++++++- ompi/mpi/man/man3/MPI_Win_flush_local.3in | 16 ++++++++- ompi/mpi/man/man3/MPI_Win_free.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Win_free_keyval.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Win_get_attr.3in | 14 +++++++- ompi/mpi/man/man3/MPI_Win_get_errhandler.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Win_get_group.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Win_get_info.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Win_get_name.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Win_lock.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Win_lock_all.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Win_post.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Win_set_attr.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Win_set_errhandler.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Win_set_info.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Win_set_name.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Win_shared_query.3in | 16 ++++++++- ompi/mpi/man/man3/MPI_Win_start.3in | 13 +++++++- ompi/mpi/man/man3/MPI_Win_sync.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Win_test.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Win_unlock.3in | 12 ++++++- ompi/mpi/man/man3/MPI_Win_unlock_all.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Win_wait.3in | 11 ++++++- ompi/mpi/man/man3/MPI_Wtick.3in | 9 ++++- ompi/mpi/man/man3/MPI_Wtime.3in | 9 ++++- 312 files changed, 4107 insertions(+), 255 deletions(-) diff --git a/ompi/mpi/man/man3/MPI_Abort.3in b/ompi/mpi/man/man3/MPI_Abort.3in index 8b292f9f88..ecb39aec45 100644 --- a/ompi/mpi/man/man3/MPI_Abort.3in +++ b/ompi/mpi/man/man3/MPI_Abort.3in @@ -18,10 +18,20 @@ int MPI_Abort(MPI_Comm \fIcomm\fP, int\fI errorcode\fP) .SH Fortran Syntax .ft R .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_ABORT(\fICOMM\fP, \fIERRORCODE\fP, \fIIERROR\fP) INTEGER \fICOMM\fP,\fI ERRORCODE\fP,\fI IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Abort(\fIcomm\fP, \fIerrorcode\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(IN) :: \fIerrorcode\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Accumulate.3in b/ompi/mpi/man/man3/MPI_Accumulate.3in index 4d11966b96..cfcdb950e3 100644 --- a/ompi/mpi/man/man3/MPI_Accumulate.3in +++ b/ompi/mpi/man/man3/MPI_Accumulate.3in @@ -27,7 +27,8 @@ int MPI_Raccumulate(const void *\fIorigin_addr\fP, int \fIorigin_count\fP, .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_ACCUMULATE(\fIORIGIN_ADDR, ORIGIN_COUNT, ORIGIN_DATATYPE, TARGET_RANK, TARGET_DISP, TARGET_COUNT, TARGET_DATATYPE, OP, WIN, IERROR\fP) \fIORIGIN_ADDR\fP(*) @@ -42,6 +43,32 @@ MPI_RACCUMULATE(\fIORIGIN_ADDR, ORIGIN_COUNT, ORIGIN_DATATYPE, TARGET_RANK, INTEGER \fIORIGIN_COUNT, ORIGIN_DATATYPE, TARGET_RANK, TARGET_COUNT, TARGET_DATATYPE, OP, WIN, REQUEST, IERROR \fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Accumulate(\fIorigin_addr\fP, \fIorigin_count\fP, \fIorigin_datatype\fP, \fItarget_rank\fP, + \fItarget_disp\fP, \fItarget_count\fP, \fItarget_datatype\fP, \fIop\fP, \fIwin\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIorigin_addr\fP + INTEGER, INTENT(IN) :: \fIorigin_count\fP, \fItarget_rank\fP, \fItarget_count\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIorigin_datatype\fP, \fItarget_datatype\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fItarget_disp\fP + TYPE(MPI_Op), INTENT(IN) :: \fIop\fP + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Raccumulate(\fIorigin_addr\fP, \fIorigin_count\fP, \fIorigin_datatype\fP, \fItarget_rank\fP, + \fItarget_disp\fP, \fItarget_count\fP, \fItarget_datatype\fP, \fIop\fP, \fIwin\fP, \fIrequest,\fP + \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIorigin_addr\fP + INTEGER, INTENT(IN) :: \fIorigin_count\fP, \fItarget_rank\fP, \fItarget_count\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIorigin_datatype\fP, \fItarget_datatype\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fItarget_disp\fP + TYPE(MPI_Op), INTENT(IN) :: \fIop\fP + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Add_error_class.3in b/ompi/mpi/man/man3/MPI_Add_error_class.3in index e1a8ac872a..7e970c8db8 100644 --- a/ompi/mpi/man/man3/MPI_Add_error_class.3in +++ b/ompi/mpi/man/man3/MPI_Add_error_class.3in @@ -21,10 +21,19 @@ int MPI_Add_error_class(int *\fIerrorclass\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_ADD_ERROR_CLASS(\fIERRORCLASS, IERROR\fP) INTEGER \fIERRORCLASS, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Add_error_class(\fIerrorclass\fP, \fIierror\fP) + INTEGER, INTENT(OUT) :: \fIerrorclass\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Add_error_code.3in b/ompi/mpi/man/man3/MPI_Add_error_code.3in index ab4fa8b2f7..a1f3a88279 100644 --- a/ompi/mpi/man/man3/MPI_Add_error_code.3in +++ b/ompi/mpi/man/man3/MPI_Add_error_code.3in @@ -20,10 +20,20 @@ int MPI_Add_error_code(int \fIerrorclass\fP, int *\fIerrorcode\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_ADD_ERROR_CODE(\fIERRORCLASS, ERRORCODE, IERROR\fP) INTEGER \fI ERRORCLASS, ERRORCODE, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Add_error_code(\fIerrorclass\fP, \fIerrorcode\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIerrorclass\fP + INTEGER, INTENT(OUT) :: \fIerrorcode\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Add_error_string.3in b/ompi/mpi/man/man3/MPI_Add_error_string.3in index 0956bccba6..8d9879cff8 100644 --- a/ompi/mpi/man/man3/MPI_Add_error_string.3in +++ b/ompi/mpi/man/man3/MPI_Add_error_string.3in @@ -22,11 +22,21 @@ int MPI_Add_error_string(int \fIerrorcode\fP, const char *\fIstring\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_ADD_ERROR_STRING(\fIERRORCODE, STRING, IERROR\fP) INTEGER \fIERRORCODE, IERROR\fP CHARACTER*(*) \fISTRING\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Add_error_string(\fIerrorcode\fP, \fIstring\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIerrorcode\fP + CHARACTER(LEN=*), INTENT(IN) :: \fIstring\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Aint_add.3in b/ompi/mpi/man/man3/MPI_Aint_add.3in index bd0ac974dc..800e2a1b97 100644 --- a/ompi/mpi/man/man3/MPI_Aint_add.3in +++ b/ompi/mpi/man/man3/MPI_Aint_add.3in @@ -21,7 +21,18 @@ MPI_Aint MPI_Aint_diff(MPI_Aint \fIaddr1\fP, MPI_Aint \fIaddr2\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' +INTEGER(KIND=MPI_ADDRESS_KIND) MPI_AINT_ADD(\fIBASE, DISP\fP) + INTEGER(KIND=MPI_ADDRESS_KIND) \fIBASE, DISP\fP + +INTEGER(KIND=MPI_ADDRESS_KIND) MPI_AINT_DIFF(\fIADDR1, ADDR2\fP) + INTEGER(KIND=MPI_ADDRESS_KIND) \fIADDR1, ADDR2\fP + +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 INTEGER(KIND=MPI_ADDRESS_KIND) MPI_AINT_ADD(\fIBASE, DISP\fP) INTEGER(KIND=MPI_ADDRESS_KIND) \fIBASE, DISP\fP diff --git a/ompi/mpi/man/man3/MPI_Allgather.3in b/ompi/mpi/man/man3/MPI_Allgather.3in index 59d34c6e48..b3fcb9f636 100644 --- a/ompi/mpi/man/man3/MPI_Allgather.3in +++ b/ompi/mpi/man/man3/MPI_Allgather.3in @@ -24,7 +24,8 @@ int MPI_Iallgather(const void\fI *sendbuf\fP, int \fI sendcount\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_ALLGATHER(\fISENDBUF\fP,\fI SENDCOUNT\fP,\fI SENDTYPE\fP,\fI RECVBUF\fP,\fI RECVCOUNT\fP,\fI RECVTYPE\fP,\fI COMM\fP,\fI IERROR\fP) \fISENDBUF\fP (*), \fIRECVBUF\fP (*) @@ -37,6 +38,29 @@ MPI_IALLGATHER(\fISENDBUF, SENDCOUNT, SENDTYPE, RECVBUF, RECVCOUNT, INTEGER \fISENDCOUNT, SENDTYPE, RECVCOUNT, RECVTYPE, COMM\fP INTEGER \fIREQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Allgather(\fIsendbuf\fP, \fIsendcount\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcount\fP, \fIrecvtype\fP, + \fIcomm\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIsendbuf\fP + TYPE(*), DIMENSION(..) :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcount\fP, \fIrecvcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Iallgather(\fIsendbuf\fP, \fIsendcount\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcount\fP, \fIrecvtype\fP, + \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIsendbuf\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcount\fP, \fIrecvcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Allgatherv.3in b/ompi/mpi/man/man3/MPI_Allgatherv.3in index b075f58cc3..c630a198cd 100644 --- a/ompi/mpi/man/man3/MPI_Allgatherv.3in +++ b/ompi/mpi/man/man3/MPI_Allgatherv.3in @@ -25,7 +25,8 @@ int MPI_Iallgatherv(const void\fI *sendbuf\fP, int\fI sendcount\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_ALLGATHERV(\fISENDBUF\fP,\fI SENDCOUNT\fP, \fISENDTYPE\fP,\fI RECVBUF\fP, \fIRECVCOUNT\fP,\fI DISPLS\fP, \fIRECVTYPE\fP,\fI COMM\fP,\fI IERROR\fP) \fISENDBUF\fP(*), \fIRECVBUF\fP(*) @@ -38,6 +39,30 @@ MPI_IALLGATHERV(\fISENDBUF, SENDCOUNT, SENDTYPE, RECVBUF, INTEGER \fISENDCOUNT, SENDTYPE, RECVCOUNT\fP(*), INTEGER \fIDISPLS\fP(*)\fI, RECVTYPE, COMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Allgatherv(\fIsendbuf\fP, \fIsendcount\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcounts\fP, \fIdispls\fP, + \fIrecvtype\fP, \fIcomm\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIsendbuf\fP + TYPE(*), DIMENSION(..) :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcount\fP, \fIrecvcounts(*)\fP, \fIdispls(*)\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Iallgatherv(\fIsendbuf\fP, \fIsendcount\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcounts\fP, \fIdispls\fP, + \fIrecvtype\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIsendbuf\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcount\fP + INTEGER, INTENT(IN), ASYNCHRONOUS :: \fIrecvcounts(*)\fP, \fIdispls(*)\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Alloc_mem.3in b/ompi/mpi/man/man3/MPI_Alloc_mem.3in index a6a851ccf7..fd71bc2c4b 100644 --- a/ompi/mpi/man/man3/MPI_Alloc_mem.3in +++ b/ompi/mpi/man/man3/MPI_Alloc_mem.3in @@ -17,11 +17,23 @@ int MPI_Alloc_mem(MPI_Aint \fIsize\fP, MPI_Info \fIinfo\fP, void *\fIbaseptr\fP) .fi .SH Fortran Syntax (see FORTRAN NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_ALLOC_MEM(\fISIZE, INFO, BASEPTR, IERROR\fP) INTEGER \fIINFO, IERROR\fP INTEGER(KIND=MPI_ADDRESS_KIND) \fISIZE, BASEPTR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Alloc_mem(\fIsize\fP, \fIinfo\fP, \fIbaseptr\fP, \fIierror\fP) + USE, INTRINSIC :: \fIISO_C_BINDING\fP, \fIONLY \fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fIsize\fP + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + TYPE(C_PTR), INTENT(OUT) :: \fIbaseptr\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Allreduce.3in b/ompi/mpi/man/man3/MPI_Allreduce.3in index bad1c72be3..45a74c29c4 100644 --- a/ompi/mpi/man/man3/MPI_Allreduce.3in +++ b/ompi/mpi/man/man3/MPI_Allreduce.3in @@ -23,7 +23,8 @@ int MPI_Iallreduce(const void \fI*sendbuf\fP, void \fI*recvbuf\fP, int\fI count\ .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_ALLREDUCE(\fISENDBUF\fP,\fI RECVBUF\fP, \fICOUNT\fP,\fI DATATYPE\fP,\fI OP\fP, \fICOMM\fP, \fIIERROR\fP) \fISENDBUF\fP(*), \fIRECVBUF\fP(*) INTEGER \fICOUNT\fP,\fI DATATYPE\fP,\fI OP\fP,\fI COMM\fP,\fI IERROR\fP @@ -32,6 +33,30 @@ MPI_IALLREDUCE(\fISENDBUF, RECVBUF, COUNT, DATATYPE, OP, COMM, REQUEST, IERROR\f \fISENDBUF\fP(*)\fI, RECVBUF\fP(*) INTEGER \fICOUNT, DATATYPE, OP, COMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Allreduce(\fIsendbuf\fP, \fIrecvbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIop\fP, \fIcomm\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIsendbuf\fP + TYPE(*), DIMENSION(..) :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Op), INTENT(IN) :: \fIop\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Iallreduce(\fIsendbuf\fP, \fIrecvbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIop\fP, \fIcomm\fP, \fIrequest\fP, + \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIsendbuf\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Op), INTENT(IN) :: \fIop\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Alltoall.3in b/ompi/mpi/man/man3/MPI_Alltoall.3in index f5be926a6d..6f8e7a572c 100644 --- a/ompi/mpi/man/man3/MPI_Alltoall.3in +++ b/ompi/mpi/man/man3/MPI_Alltoall.3in @@ -26,7 +26,8 @@ int MPI_Ialltoall(const void *\fIsendbuf\fP, int \fIsendcount\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_ALLTOALL(\fISENDBUF, SENDCOUNT, SENDTYPE, RECVBUF, RECVCOUNT, RECVTYPE, COMM, IERROR\fP) @@ -41,6 +42,31 @@ MPI_IALLTOALL(\fISENDBUF, SENDCOUNT, SENDTYPE, RECVBUF, RECVCOUNT, INTEGER \fISENDCOUNT, SENDTYPE, RECVCOUNT, RECVTYPE\fP INTEGER \fICOMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Alltoall(\fIsendbuf\fP, \fIsendcount\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcount\fP, \fIrecvtype\fP, + \fIcomm\fP, \fIierror\fP) + + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIsendbuf\fP + TYPE(*), DIMENSION(..) :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcount\fP, \fIrecvcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Ialltoall(\fIsendbuf\fP, \fIsendcount\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcount\fP, \fIrecvtype\fP, + \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIsendbuf\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcount\fP, \fIrecvcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Alltoallv.3in b/ompi/mpi/man/man3/MPI_Alltoallv.3in index bbc8b53ea2..02b9b8ad9e 100644 --- a/ompi/mpi/man/man3/MPI_Alltoallv.3in +++ b/ompi/mpi/man/man3/MPI_Alltoallv.3in @@ -28,7 +28,8 @@ int MPI_Ialltoallv(const void *\fIsendbuf\fP, const int \fIsendcounts\fP[], .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_ALLTOALLV(\fISENDBUF, SENDCOUNTS, SDISPLS, SENDTYPE, RECVBUF, RECVCOUNTS, RDISPLS, RECVTYPE, COMM, IERROR\fP) @@ -46,6 +47,33 @@ MPI_IALLTOALLV(\fISENDBUF, SENDCOUNTS, SDISPLS, SENDTYPE, INTEGER \fIRECVCOUNTS(*), RDISPLS(*), RECVTYPE\fP INTEGER \fICOMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Alltoallv(\fIsendbuf\fP, \fIsendcounts\fP, \fIsdispls\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcounts\fP, + \fIrdispls\fP, \fIrecvtype\fP, \fIcomm\fP, \fIierror\fP) + + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIsendbuf\fP + TYPE(*), DIMENSION(..) :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcounts(*)\fP, \fIsdispls(*)\fP, \fIrecvcounts(*),\fP + \fIrdispls(*)\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Ialltoallv(\fIsendbuf\fP, \fIsendcounts\fP, \fIsdispls\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcounts\fP, + \fIrdispls\fP, \fIrecvtype\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIsendbuf\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIrecvbuf\fP + INTEGER, INTENT(IN), ASYNCHRONOUS :: \fIsendcounts(*)\fP, \fIsdispls(*),\fP + \fIrecvcounts(*)\fP, \fIrdispls(*)\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Alltoallw.3in b/ompi/mpi/man/man3/MPI_Alltoallw.3in index fbc0c38485..4dd86983d8 100644 --- a/ompi/mpi/man/man3/MPI_Alltoallw.3in +++ b/ompi/mpi/man/man3/MPI_Alltoallw.3in @@ -29,7 +29,8 @@ int MPI_Ialltoallw(const void *\fIsendbuf\fP, const int \fIsendcounts\fP[], .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_ALLTOALLW(\fISENDBUF, SENDCOUNTS, SDISPLS, SENDTYPES, RECVBUF, RECVCOUNTS, RDISPLS, RECVTYPES, COMM, IERROR\fP) @@ -46,6 +47,35 @@ MPI_IALLTOALLW(\fISENDBUF, SENDCOUNTS, SDISPLS, SENDTYPES, INTEGER \fIRECVCOUNTS(*), RDISPLS(*), RECVTYPES(*)\fP INTEGER \fICOMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Alltoallw(\fIsendbuf\fP, \fIsendcounts\fP, \fIsdispls\fP, \fIsendtypes\fP, \fIrecvbuf\fP, \fIrecvcounts\fP, + \fIrdispls\fP, \fIrecvtypes\fP, \fIcomm\fP, \fIierror\fP) + + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIsendbuf\fP + TYPE(*), DIMENSION(..) :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcounts(*)\fP, \fIsdispls(*)\fP, \fIrecvcounts(*),\fP + \fIrdispls(*)\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtypes(*)\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIrecvtypes(*)\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Ialltoallw(\fIsendbuf\fP, \fIsendcounts\fP, \fIsdispls\fP, \fIsendtypes\fP, \fIrecvbuf\fP, + \fIrecvcounts\fP, \fIrdispls\fP, \fIrecvtypes\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIsendbuf\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIrecvbuf\fP + INTEGER, INTENT(IN), ASYNCHRONOUS :: \fIsendcounts(*)\fP, \fIsdispls(*),\fP + \fIrecvcounts(*)\fP, \fIrdispls(*)\fP + TYPE(MPI_Datatype), INTENT(IN), ASYNCHRONOUS :: \fIsendtypes(*),\fP + \fIrecvtypes(*)\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Barrier.3in b/ompi/mpi/man/man3/MPI_Barrier.3in index 3511c6d04f..edf34dd042 100644 --- a/ompi/mpi/man/man3/MPI_Barrier.3in +++ b/ompi/mpi/man/man3/MPI_Barrier.3in @@ -19,13 +19,27 @@ int MPI_Ibarrier(MPI_Comm \fIcomm\fP, MPI_Request \fI*request\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_BARRIER(\fICOMM\fP,\fI IERROR\fP) INTEGER \fICOMM\fP,\fI IERROR\fP MPI_IBARRIER(\fICOMM\fP, \fIREQUEST\fP, \fIIERROR\fP) INTEGER \fICOMM\fP, \fIREQUEST\fP, \fIIERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Barrier(\fIcomm\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Ibarrier(\fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Bcast.3in b/ompi/mpi/man/man3/MPI_Bcast.3in index c3608a43db..8c4688c34d 100644 --- a/ompi/mpi/man/man3/MPI_Bcast.3in +++ b/ompi/mpi/man/man3/MPI_Bcast.3in @@ -21,7 +21,8 @@ int MPI_Ibcast(void \fI*buffer\fP, int\fI count\fP, MPI_Datatype\fI datatype\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_BCAST(\fIBUFFER\fP,\fI COUNT\fP, \fIDATATYPE\fP,\fI ROOT\fP,\fI COMM\fP,\fI IERROR\fP) \fIBUFFER\fP(*) INTEGER \fICOUNT\fP,\fI DATATYPE\fP,\fI ROOT\fP,\fI COMM\fP,\fI IERROR\fP @@ -30,6 +31,25 @@ MPI_IBCAST(\fIBUFFER\fP,\fI COUNT\fP, \fIDATATYPE\fP,\fI ROOT\fP,\fI COMM\fP, \f \fIBUFFER\fP(*) INTEGER \fICOUNT\fP,\fI DATATYPE\fP,\fI ROOT\fP,\fI COMM\fP, \fIREQUEST\fP,\fI IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Bcast(\fIbuffer\fP, \fIcount\fP, \fIdatatype\fP, \fIroot\fP, \fIcomm\fP, \fIierror\fP) + TYPE(*), DIMENSION(..) :: \fIbuffer\fP + INTEGER, INTENT(IN) :: \fIcount\fP, \fIroot\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Ibcast(\fIbuffer\fP, \fIcount\fP, \fIdatatype\fP, \fIroot\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIbuffer\fP + INTEGER, INTENT(IN) :: \fIcount\fP, \fIroot\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Bsend.3in b/ompi/mpi/man/man3/MPI_Bsend.3in index cd258181bb..a21911156a 100644 --- a/ompi/mpi/man/man3/MPI_Bsend.3in +++ b/ompi/mpi/man/man3/MPI_Bsend.3in @@ -19,11 +19,23 @@ int MPI_Bsend(const void \fI*buf\fP, int\fI count\fP, MPI_Datatype\fI datatype\f .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_BSEND(\fIBUF\fP,\fI COUNT\fP,\fIDATATYPE\fP,\fI DEST\fP,\fI TAG\fP,\fI COMM\fP,\fI IERROR\fP) \fIBUF\fP(*) INTEGER \fICOUNT\fP,\fI DATATYPE\fP,\fI DEST\fP,\fI TAG\fP,\fI COMM\fP,\fI IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Bsend(\fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIdest\fP, \fItag\fP, \fIcomm\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP, \fIdest\fP, \fItag\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Bsend_init.3in b/ompi/mpi/man/man3/MPI_Bsend_init.3in index 6836793f3c..c1499f26a8 100644 --- a/ompi/mpi/man/man3/MPI_Bsend_init.3in +++ b/ompi/mpi/man/man3/MPI_Bsend_init.3in @@ -19,13 +19,26 @@ int MPI_Bsend_init(const void \fI*buf\fP, int\fI count\fP, MPI_Datatype\fI datat .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_BSEND_INIT(\fIBUF\fP,\fI COUNT\fP, \fIDATATYPE\fP,\fI DEST\fP,\fI TAG\fP,\fI COMM\fP,\fI REQUEST\fP, \fIIERROR\fP) \fIBUF\fP(\fI*\fP) INTEGER \fICOUNT\fP,\fI DATATYPE\fP, \fIDEST\fP,\fI TAG\fP, INTEGER \fICOMM\fP,\fI REQUEST\fP,\fI IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Bsend_init(\fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIdest\fP, \fItag\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP, \fIdest\fP, \fItag\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Buffer_attach.3in b/ompi/mpi/man/man3/MPI_Buffer_attach.3in index 5adfa02d26..12fabcdf0d 100644 --- a/ompi/mpi/man/man3/MPI_Buffer_attach.3in +++ b/ompi/mpi/man/man3/MPI_Buffer_attach.3in @@ -17,11 +17,21 @@ int MPI_Buffer_attach(void \fI*buf\fP, int\fI size\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_BUFFER_ATTACH(\fIBUF\fP,\fI SIZE\fP, \fIIERROR\fP) \fIBUF\fP(\fI*\fP) INTEGER \fISIZE\fP,\fI IERROR \fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Buffer_attach(\fIbuffer\fP, \fIsize\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIbuffer\fP + INTEGER, INTENT(IN) :: \fIsize\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Buffer_detach.3in b/ompi/mpi/man/man3/MPI_Buffer_detach.3in index 98e8acb142..fff83ccda7 100644 --- a/ompi/mpi/man/man3/MPI_Buffer_detach.3in +++ b/ompi/mpi/man/man3/MPI_Buffer_detach.3in @@ -17,11 +17,22 @@ int MPI_Buffer_detach(void \fI*buf\fP, int\fI *size\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_BUFFER_DETACH(\fIBUF\fP,\fI SIZE\fP, \fIIERROR\fP) \fIBUF\fP(\fI*\fP) INTEGER \fISIZE\fP,\fI IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Buffer_detach(\fIbuffer_addr\fP, \fIsize\fP, \fIierror\fP) + USE, INTRINSIC :: \fIISO_C_BINDING\fP, \fIONLY \fP + TYPE(C_PTR), INTENT(OUT) :: \fIbuffer_addr\fP + INTEGER, INTENT(OUT) :: \fIsize\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Cancel.3in b/ompi/mpi/man/man3/MPI_Cancel.3in index d7e2379cce..a50182d732 100644 --- a/ompi/mpi/man/man3/MPI_Cancel.3in +++ b/ompi/mpi/man/man3/MPI_Cancel.3in @@ -17,10 +17,19 @@ int MPI_Cancel(MPI_Request\fI *request\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_CANCEL(\fIREQUEST\fP, \fIIERROR\fP) INTEGER \fIREQUEST\fP, \fIIERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Cancel(\fIrequest\fP, \fIierror\fP) + TYPE(MPI_Request), INTENT(IN) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Cart_coords.3in b/ompi/mpi/man/man3/MPI_Cart_coords.3in index e18c5ce481..c84da760db 100644 --- a/ompi/mpi/man/man3/MPI_Cart_coords.3in +++ b/ompi/mpi/man/man3/MPI_Cart_coords.3in @@ -18,10 +18,21 @@ int MPI_Cart_coords(MPI_Comm \fIcomm\fP, int\fI rank\fP, int\fI maxdims\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_CART_COORDS(\fICOMM\fP,\fI RANK\fP,\fI MAXDIMS\fP,\fI COORDS\fP, \fIIERROR\fP) INTEGER \fICOMM\fP,\fI RANK\fP,\fI MAXDIMS\fP,\fI COORDS(\fI*\fP)\fP,\fI IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Cart_coords(\fIcomm\fP, \fIrank\fP, \fImaxdims\fP, \fIcoords\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(IN) :: \fIrank\fP, \fImaxdims\fP + INTEGER, INTENT(OUT) :: \fIcoords(maxdims)\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Cart_create.3in b/ompi/mpi/man/man3/MPI_Cart_create.3in index 5a04beabf4..6a7cb599e2 100644 --- a/ompi/mpi/man/man3/MPI_Cart_create.3in +++ b/ompi/mpi/man/man3/MPI_Cart_create.3in @@ -19,12 +19,24 @@ int MPI_Cart_create(MPI_Comm\fI comm_old\fP, int\fI ndims\fP, const int\fI dims\ .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_CART_CREATE(\fICOMM_OLD\fP,\fI NDIMS\fP,\fI DIMS\fP,\fI PERIODS\fP,\fI REORDER\fP, \fICOMM_CART\fP,\fI IERROR\fP) INTEGER \fICOMM_OLD\fP,\fI NDIMS\fP,\fI DIMS\fP(*),\fI COMM_CART\fP,\fI IERROR\fP LOGICAL \fIPERIODS\fI(*),\fI REORDER\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Cart_create(\fIcomm_old\fP, \fIndims\fP, \fIdims\fP, \fIperiods\fP, \fIreorder\fP, \fIcomm_cart\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm_old\fP + INTEGER, INTENT(IN) :: \fIndims\fP, \fIdims(ndims)\fP + LOGICAL, INTENT(IN) :: \fIperiods(ndims)\fP, \fIreorder\fP + TYPE(MPI_Comm), INTENT(OUT) :: \fIcomm_cart\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Cart_get.3in b/ompi/mpi/man/man3/MPI_Cart_get.3in index af1b85730b..49b8d13518 100644 --- a/ompi/mpi/man/man3/MPI_Cart_get.3in +++ b/ompi/mpi/man/man3/MPI_Cart_get.3in @@ -18,11 +18,23 @@ int MPI_Cart_get(MPI_Comm\fI comm\fP, int\fI maxdims\fP, int\fI dims\fP[], int\f .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_CART_GET(\fICOMM\fP, \fIMAXDIMS\fP, \fIDIMS\fP, \fIPERIODS\fP, \fICOORDS\fP, \fIIERROR\fP) INTEGER \fICOMM\fP, \fIMAXDIMS\fP, \fIDIMS\fP(*), \fICOORDS\fP(*), \fIIERROR\fP LOGICAL \fIPERIODS\fP(*) +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Cart_get(\fIcomm\fP, \fImaxdims\fP, \fIdims\fP, \fIperiods\fP, \fIcoords\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(IN) :: \fImaxdims\fP + INTEGER, INTENT(OUT) :: \fIdims(maxdims)\fP, \fIcoords(maxdims)\fP + LOGICAL, INTENT(OUT) :: \fIperiods(maxdims)\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Cart_map.3in b/ompi/mpi/man/man3/MPI_Cart_map.3in index 7f99d39a0c..39c54a0b0a 100644 --- a/ompi/mpi/man/man3/MPI_Cart_map.3in +++ b/ompi/mpi/man/man3/MPI_Cart_map.3in @@ -19,11 +19,23 @@ int MPI_Cart_map(MPI_Comm \fIcomm\fP, int\fI ndims\fP, const int\fI dims\fP[], .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_CART_MAP(\fICOMM, NDIMS, DIMS, PERIODS, NEWRANK, IERROR\fP) INTEGER \fICOMM, NDIMS, DIMS(*), NEWRANK, IERROR\fP LOGICAL \fIPERIODS\fP(*) +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Cart_map(\fIcomm\fP, \fIndims\fP, \fIdims\fP, \fIperiods\fP, \fInewrank\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(IN) :: \fIndims\fP, \fIdims(ndims)\fP + LOGICAL, INTENT(IN) :: \fIperiods(ndims)\fP + INTEGER, INTENT(OUT) :: \fInewrank\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Cart_rank.3in b/ompi/mpi/man/man3/MPI_Cart_rank.3in index 324b54c2e1..30e756f909 100644 --- a/ompi/mpi/man/man3/MPI_Cart_rank.3in +++ b/ompi/mpi/man/man3/MPI_Cart_rank.3in @@ -17,10 +17,21 @@ int MPI_Cart_rank(MPI_Comm \fIcomm\fP, int\fI coords\fP[], int\fI *rank\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_CART_RANK(\fICOMM, COORDS, RANK, IERROR\fP) INTEGER \fICOMM, COORDS(*), RANK, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Cart_rank(\fIcomm\fP, \fIcoords\fP, \fIrank\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(IN) :: \fIcoords(*)\fP + INTEGER, INTENT(OUT) :: \fIrank\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Cart_shift.3in b/ompi/mpi/man/man3/MPI_Cart_shift.3in index 505417f510..142e4b6a8c 100644 --- a/ompi/mpi/man/man3/MPI_Cart_shift.3in +++ b/ompi/mpi/man/man3/MPI_Cart_shift.3in @@ -18,12 +18,23 @@ int MPI_Cart_shift(MPI_Comm \fIcomm\fP, int\fI direction\fP, int\fI disp\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_CART_SHIFT(\fICOMM, DIRECTION, DISP, RANK_SOURCE, RANK_DEST, IERROR\fP) INTEGER \fICOMM, DIRECTION, DISP, RANK_SOURCE\fP INTEGER \fIRANK_DEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Cart_shift(\fIcomm\fP, \fIdirection\fP, \fIdisp\fP, \fIrank_source\fP, \fIrank_dest\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(IN) :: \fIdirection\fP, \fIdisp\fP + INTEGER, INTENT(OUT) :: \fIrank_source\fP, \fIrank_dest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Cart_sub.3in b/ompi/mpi/man/man3/MPI_Cart_sub.3in index 80f4c9b7b4..84206bd6dd 100644 --- a/ompi/mpi/man/man3/MPI_Cart_sub.3in +++ b/ompi/mpi/man/man3/MPI_Cart_sub.3in @@ -18,11 +18,22 @@ int MPI_Cart_sub(MPI_Comm \fIcomm\fP, const int\fI remain_dims\fP[], MPI_Comm\fI .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_CART_SUB(\fICOMM, REMAIN_DIMS, COMM_NEW, IERROR\fP) INTEGER \fICOMM, COMM_NEW, IERROR\fP LOGICAL \fIREMAIN_DIMS\fP(*) +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Cart_sub(\fIcomm\fP, \fIremain_dims\fP, \fInewcomm\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + LOGICAL, INTENT(IN) :: \fIremain_dims(*)\fP + TYPE(MPI_Comm), INTENT(OUT) :: \fInewcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Cartdim_get.3in b/ompi/mpi/man/man3/MPI_Cartdim_get.3in index 9159adfa42..7a2f5e1385 100644 --- a/ompi/mpi/man/man3/MPI_Cartdim_get.3in +++ b/ompi/mpi/man/man3/MPI_Cartdim_get.3in @@ -17,10 +17,20 @@ int MPI_Cartdim_get(MPI_Comm\fI comm\fP, int\fI *ndims\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_CARTDIM_GET(\fICOMM, NDIMS, IERROR\fP) INTEGER \fICOMM, NDIMS, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Cartdim_get(\fIcomm\fP, \fIndims\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(OUT) :: \fIndims\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Close_port.3in b/ompi/mpi/man/man3/MPI_Close_port.3in index 9899fe3572..056ac6aabd 100644 --- a/ompi/mpi/man/man3/MPI_Close_port.3in +++ b/ompi/mpi/man/man3/MPI_Close_port.3in @@ -18,11 +18,20 @@ int MPI_Close_port(const char *\fIport_name\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_CLOSE_PORT(\fIPORT_NAME, IERROR\fP) CHARACTER*(*) \fIPORT_NAME\fP INTEGER \fIIERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Close_port(\fIport_name\fP, \fIierror\fP) + CHARACTER(LEN=*), INTENT(IN) :: \fIport_name\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_accept.3in b/ompi/mpi/man/man3/MPI_Comm_accept.3in index 021bd0b715..43e3bab3c8 100644 --- a/ompi/mpi/man/man3/MPI_Comm_accept.3in +++ b/ompi/mpi/man/man3/MPI_Comm_accept.3in @@ -18,11 +18,24 @@ int MPI_Comm_accept(const char *\fIport_name\fP, MPI_Info \fIinfo\fP, int \fIroo .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_ACCEPT(\fIPORT_NAME, INFO, ROOT, COMM, NEWCOMM, IERROR\fP) CHARACTER*(*) \fIPORT_NAME\fP INTEGER \fIINFO, ROOT, COMM, NEWCOMM, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_accept(\fIport_name\fP, \fIinfo\fP, \fIroot\fP, \fIcomm\fP, \fInewcomm\fP, \fIierror\fP) + CHARACTER(LEN=*), INTENT(IN) :: \fIport_name\fP + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + INTEGER, INTENT(IN) :: \fIroot\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Comm), INTENT(OUT) :: \fInewcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_call_errhandler.3in b/ompi/mpi/man/man3/MPI_Comm_call_errhandler.3in index f5b82b0599..3d1902f894 100644 --- a/ompi/mpi/man/man3/MPI_Comm_call_errhandler.3in +++ b/ompi/mpi/man/man3/MPI_Comm_call_errhandler.3in @@ -20,10 +20,20 @@ int MPI_Comm_call_errhandler(MPI_Comm \fIcomm\fP, int \fIerrorcode\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_CALL_ERRHANDLER(\fICOMM, ERRORCODE, IERROR\fP) INTEGER \fICOMM, ERRORCODE, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_call_errhandler(\fIcomm\fP, \fIerrorcode\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(IN) :: \fIerrorcode\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_compare.3in b/ompi/mpi/man/man3/MPI_Comm_compare.3in index 8ca324755b..f3f442e959 100644 --- a/ompi/mpi/man/man3/MPI_Comm_compare.3in +++ b/ompi/mpi/man/man3/MPI_Comm_compare.3in @@ -17,10 +17,20 @@ int MPI_Comm_compare(MPI_Comm \fIcomm1\fP, MPI_Comm\fI comm2\fP, int\fI *result\ .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_COMPARE(\fICOMM1, COMM2, RESULT, IERROR\fP) INTEGER \fICOMM1, COMM2, RESULT, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_compare(\fIcomm1\fP, \fIcomm2\fP, \fIresult\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm1\fP, \fIcomm2\fP + INTEGER, INTENT(OUT) :: \fIresult\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_connect.3in b/ompi/mpi/man/man3/MPI_Comm_connect.3in index b3c8029960..4960e4c919 100644 --- a/ompi/mpi/man/man3/MPI_Comm_connect.3in +++ b/ompi/mpi/man/man3/MPI_Comm_connect.3in @@ -19,11 +19,24 @@ int MPI_Comm_connect(const gchar *\fIport_name\fP, MPI_Info \fIinfo\fP, int \fIr .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_CONNECT(\fIPORT_NAME, INFO, ROOT, COMM, NEWCOMM, IERROR\fP) CHARACTER*(*) \fIPORT_NAME\fP INTEGER \fIINFO, ROOT, COMM, NEWCOMM, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_connect(\fIport_name\fP, \fIinfo\fP, \fIroot\fP, \fIcomm\fP, \fInewcomm\fP, \fIierror\fP) + CHARACTER(LEN=*), INTENT(IN) :: \fIport_name\fP + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + INTEGER, INTENT(IN) :: \fIroot\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Comm), INTENT(OUT) :: \fInewcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_create.3in b/ompi/mpi/man/man3/MPI_Comm_create.3in index 1a32519c74..86a7e51b25 100644 --- a/ompi/mpi/man/man3/MPI_Comm_create.3in +++ b/ompi/mpi/man/man3/MPI_Comm_create.3in @@ -18,10 +18,21 @@ int MPI_Comm_create(MPI_Comm \fIcomm\fP, MPI_Group\fI group\fP, MPI_Comm\fI *new .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_CREATE(\fICOMM, GROUP, NEWCOMM, IERROR\fP) INTEGER \fICOMM, GROUP, NEWCOMM, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_create(\fIcomm\fP, \fIgroup\fP, \fInewcomm\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Group), INTENT(IN) :: \fIgroup\fP + TYPE(MPI_Comm), INTENT(OUT) :: \fInewcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_create_errhandler.3in b/ompi/mpi/man/man3/MPI_Comm_create_errhandler.3in index ffae73f665..23c122d441 100644 --- a/ompi/mpi/man/man3/MPI_Comm_create_errhandler.3in +++ b/ompi/mpi/man/man3/MPI_Comm_create_errhandler.3in @@ -18,11 +18,21 @@ int MPI_Comm_create_errhandler(MPI_Comm_errhandler_function \fI*function\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_CREATE_ERRHANDLER(\fIFUNCTION, ERRHANDLER, IERROR\fP) EXTERNAL \fIFUNCTION\fP INTEGER \fIERRHANDLER, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_create_errhandler(\fIcomm_errhandler_fn\fP, \fIerrhandler\fP, \fIierror\fP) + PROCEDURE(MPI_Comm_errhandler_function) :: \fIcomm_errhandler_fn\fP + TYPE(MPI_Errhandler), INTENT(OUT) :: \fIerrhandler\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_create_group.3in b/ompi/mpi/man/man3/MPI_Comm_create_group.3in index c700c00cc7..f9ab41c98b 100644 --- a/ompi/mpi/man/man3/MPI_Comm_create_group.3in +++ b/ompi/mpi/man/man3/MPI_Comm_create_group.3in @@ -18,10 +18,22 @@ int MPI_Comm_create_group(MPI_Comm \fIcomm\fP, MPI_Group\fI group\fP, int\fI tag .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_CREATE_GROUP(\fICOMM, GROUP, TAG, NEWCOMM, IERROR\fP) INTEGER \fICOMM, GROUP, TAG, NEWCOMM, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_create_group(\fIcomm\fP, \fIgroup\fP, \fItag\fP, \fInewcomm\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Group), INTENT(IN) :: \fIgroup\fP + INTEGER, INTENT(IN) :: \fItag\fP + TYPE(MPI_Comm), INTENT(OUT) :: \fInewcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Comm_create_keyval.3in b/ompi/mpi/man/man3/MPI_Comm_create_keyval.3in index ff6be05219..465b956dab 100644 --- a/ompi/mpi/man/man3/MPI_Comm_create_keyval.3in +++ b/ompi/mpi/man/man3/MPI_Comm_create_keyval.3in @@ -20,7 +20,8 @@ int MPI_Comm_create_keyval(MPI_Comm_copy_attr_function .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_CREATE_KEYVAL(\fICOMM_COPY_ATTR_FN, COMM_DELETE_ATTR_FN, COMM_KEYVAL, EXTRA_STATE, IERROR\fP) @@ -28,6 +29,18 @@ MPI_COMM_CREATE_KEYVAL(\fICOMM_COPY_ATTR_FN, COMM_DELETE_ATTR_FN, INTEGER \fICOMM_KEYVAL, IERROR \fP INTEGER(KIND=MPI_ADDRESS_KIND) \fIEXTRA_STATE\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_create_keyval(\fIcomm_copy_attr_fn\fP, \fIcomm_delete_attr_fn\fP, \fIcomm_keyval\fP, + \fIextra_state\fP, \fIierror\fP) + PROCEDURE(MPI_Comm_copy_attr_function) :: \fIcomm_copy_attr_fn\fP + PROCEDURE(MPI_Comm_delete_attr_function) :: \fIcomm_delete_attr_fn\fP + INTEGER, INTENT(OUT) :: \fIcomm_keyval\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fIextra_state\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_delete_attr.3in b/ompi/mpi/man/man3/MPI_Comm_delete_attr.3in index 24f26451e8..a5a2a42e4d 100644 --- a/ompi/mpi/man/man3/MPI_Comm_delete_attr.3in +++ b/ompi/mpi/man/man3/MPI_Comm_delete_attr.3in @@ -17,10 +17,20 @@ int MPI_Comm_delete_attr(MPI_Comm \fIcomm\fP, int \fIcomm_keyval\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_DELETE_ATTR(\fICOMM, COMM_KEYVAL, IERROR\fP) INTEGER \fICOMM, COMM_KEYVAL, IERROR \fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_delete_attr(\fIcomm\fP, \fIcomm_keyval\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(IN) :: \fIcomm_keyval\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_disconnect.3in b/ompi/mpi/man/man3/MPI_Comm_disconnect.3in index d1da8f3a54..6bf0b3b367 100644 --- a/ompi/mpi/man/man3/MPI_Comm_disconnect.3in +++ b/ompi/mpi/man/man3/MPI_Comm_disconnect.3in @@ -17,10 +17,19 @@ int MPI_Comm_disconnect(MPI_Comm *\fIcomm\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_DISCONNECT(\fICOMM, IERROR\fP) INTEGER \fICOMM, IERROR \fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_disconnect(\fIcomm\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(INOUT) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_dup.3in b/ompi/mpi/man/man3/MPI_Comm_dup.3in index c0ab489eb9..e4ce630bb3 100644 --- a/ompi/mpi/man/man3/MPI_Comm_dup.3in +++ b/ompi/mpi/man/man3/MPI_Comm_dup.3in @@ -17,10 +17,20 @@ int MPI_Comm_dup(MPI_Comm \fIcomm\fP, MPI_Comm\fI *newcomm\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_DUP(\fICOMM, NEWCOMM, IERROR\fP) INTEGER \fICOMM, NEWCOMM, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_dup(\fIcomm\fP, \fInewcomm\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Comm), INTENT(OUT) :: \fInewcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_dup_with_info.3in b/ompi/mpi/man/man3/MPI_Comm_dup_with_info.3in index fdae7e7d8f..dcad64f539 100644 --- a/ompi/mpi/man/man3/MPI_Comm_dup_with_info.3in +++ b/ompi/mpi/man/man3/MPI_Comm_dup_with_info.3in @@ -18,10 +18,21 @@ int MPI_Comm_dup_with_info(MPI_Comm \fIcomm\fP, MPI_Info \fIinfo\fP, MPI_Comm\fI .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_DUP_WITH_INFO(\fICOMM, INFO, NEWCOMM, IERROR\fP) INTEGER \fICOMM, INFO, NEWCOMM, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_dup_with_info(\fIcomm\fP, \fIinfo\fP, \fInewcomm\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + TYPE(MPI_Comm), INTENT(OUT) :: \fInewcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETER .ft R diff --git a/ompi/mpi/man/man3/MPI_Comm_free.3in b/ompi/mpi/man/man3/MPI_Comm_free.3in index ec8acc8b05..b8416894ff 100644 --- a/ompi/mpi/man/man3/MPI_Comm_free.3in +++ b/ompi/mpi/man/man3/MPI_Comm_free.3in @@ -17,10 +17,19 @@ int MPI_Comm_free(MPI_Comm *\fIcomm\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_FREE(\fICOMM, IERROR\fP) INTEGER \fICOMM, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_free(\fIcomm\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(INOUT) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_free_keyval.3in b/ompi/mpi/man/man3/MPI_Comm_free_keyval.3in index e9ca795011..542fd771e2 100644 --- a/ompi/mpi/man/man3/MPI_Comm_free_keyval.3in +++ b/ompi/mpi/man/man3/MPI_Comm_free_keyval.3in @@ -17,10 +17,19 @@ int MPI_Comm_free_keyval(int *\fIcomm_keyval\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_FREE_KEYVAL(\fICOMM_KEYVAL, IERROR\fP) INTEGER \fICOMM_KEYVAL, IERROR \fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_free_keyval(\fIcomm_keyval\fP, \fIierror\fP) + INTEGER, INTENT(INOUT) :: \fIcomm_keyval\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_get_attr.3in b/ompi/mpi/man/man3/MPI_Comm_get_attr.3in index c746386b03..ad9d198af6 100644 --- a/ompi/mpi/man/man3/MPI_Comm_get_attr.3in +++ b/ompi/mpi/man/man3/MPI_Comm_get_attr.3in @@ -18,12 +18,24 @@ int MPI_Comm_get_attr(MPI_Comm \fIcomm\fP, int \fIcomm_keyval\fP, .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_GET_ATTR(\fICOMM, COMM_KEYVAL, ATTRIBUTE_VAL, FLAG, IERROR\fP) INTEGER \fICOMM, COMM_KEYVAL, IERROR \fP INTEGER(KIND=MPI_ADDRESS_KIND) \fIATTRIBUTE_VAL\fP LOGICAL \fIFLAG\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_get_attr(\fIcomm\fP, \fIcomm_keyval\fP, \fIattribute_val\fP, \fIflag\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(IN) :: \fIcomm_keyval\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(OUT) :: \fIattribute_val\fP + LOGICAL, INTENT(OUT) :: \fIflag\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_get_errhandler.3in b/ompi/mpi/man/man3/MPI_Comm_get_errhandler.3in index 50cb3fcf49..6d3ccf2d3a 100644 --- a/ompi/mpi/man/man3/MPI_Comm_get_errhandler.3in +++ b/ompi/mpi/man/man3/MPI_Comm_get_errhandler.3in @@ -18,10 +18,20 @@ int MPI_Comm_get_errhandler(MPI_Comm \fIcomm\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_GET_ERRHANDLER(\fICOMM, ERRHANDLER, IERROR\fP) INTEGER \fICOMM, ERRHANDLER, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_get_errhandler(\fIcomm\fP, \fIerrhandler\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Errhandler), INTENT(OUT) :: \fIerrhandler\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_get_info.3in b/ompi/mpi/man/man3/MPI_Comm_get_info.3in index 636f5c8ddb..09067e0012 100644 --- a/ompi/mpi/man/man3/MPI_Comm_get_info.3in +++ b/ompi/mpi/man/man3/MPI_Comm_get_info.3in @@ -17,10 +17,20 @@ int MPI_Comm_get_info(MPI_Comm \fIcomm\fP, MPI_Info \fI*info_used\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_GET_INFO(\fICOMM, INFO_USED, IERROR\fP) INTEGER \fICOMM, INFO_USED, IERROR \fP . +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_get_info(\fIcomm\fP, \fIinfo_used\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Info), INTENT(OUT) :: \fIinfo_used\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Comm_get_name.3in b/ompi/mpi/man/man3/MPI_Comm_get_name.3in index c0566643c0..0e635f21e8 100644 --- a/ompi/mpi/man/man3/MPI_Comm_get_name.3in +++ b/ompi/mpi/man/man3/MPI_Comm_get_name.3in @@ -17,11 +17,22 @@ int MPI_Comm_get_name(MPI_Comm \fIcomm\fP, char *\fIcomm_name\fP, int *\fIresult .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_GET_NAME(\fICOMM, COMM_NAME, RESULTLEN, IERROR\fP) INTEGER \fICOMM, RESULTLEN, IERROR \fP CHARACTER*(*) \fICOMM_NAME\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_get_name(\fIcomm\fP, \fIcomm_name\fP, \fIresultlen\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + CHARACTER(LEN=MPI_MAX_OBJECT_NAME), INTENT(OUT) :: \fIcomm_name\fP + INTEGER, INTENT(OUT) :: \fIresultlen\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_get_parent.3in b/ompi/mpi/man/man3/MPI_Comm_get_parent.3in index 7fd445232f..6c5feed693 100644 --- a/ompi/mpi/man/man3/MPI_Comm_get_parent.3in +++ b/ompi/mpi/man/man3/MPI_Comm_get_parent.3in @@ -17,10 +17,19 @@ int MPI_Comm_get_parent(MPI_Comm *\fIparent\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_GET_PARENT(\fIPARENT, IERROR\fP) INTEGER \fIPARENT, IERROR \fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_get_parent(\fIparent\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(OUT) :: \fIparent\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_group.3in b/ompi/mpi/man/man3/MPI_Comm_group.3in index 27342e08ff..4ae6d7b230 100644 --- a/ompi/mpi/man/man3/MPI_Comm_group.3in +++ b/ompi/mpi/man/man3/MPI_Comm_group.3in @@ -17,10 +17,20 @@ int MPI_Comm_group(MPI_Comm \fIcomm\fP, MPI_Group *\fIgroup\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_GROUP(\fICOMM, GROUP, IERROR\fP) INTEGER \fICOMM, GROUP, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_group(\fIcomm\fP, \fIgroup\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Group), INTENT(OUT) :: \fIgroup\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_idup.3in b/ompi/mpi/man/man3/MPI_Comm_idup.3in index 8dc5ee3acd..b13dea4066 100644 --- a/ompi/mpi/man/man3/MPI_Comm_idup.3in +++ b/ompi/mpi/man/man3/MPI_Comm_idup.3in @@ -18,10 +18,21 @@ int MPI_Comm_idup(MPI_Comm \fIcomm\fP, MPI_Comm\fI *newcomm\fP, MPI_Request\fI * .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_IDUP(\fICOMM, NEWCOMM, REQUEST, IERROR\fP) INTEGER \fICOMM, NEWCOMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_idup(\fIcomm\fP, \fInewcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Comm), INTENT(OUT) :: \fInewcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETER .ft R diff --git a/ompi/mpi/man/man3/MPI_Comm_join.3in b/ompi/mpi/man/man3/MPI_Comm_join.3in index 7ab0e9e5ef..fb5c835979 100644 --- a/ompi/mpi/man/man3/MPI_Comm_join.3in +++ b/ompi/mpi/man/man3/MPI_Comm_join.3in @@ -19,10 +19,20 @@ int MPI_Comm_join(int \fIfd\fP, MPI_Comm *\fIintercomm\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_JOIN(\fIFD, INTERCOMM, IERROR\fP) INTEGER \fIFD, INTERCOMM, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_join(\fIfd\fP, \fIintercomm\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIfd\fP + TYPE(MPI_Comm), INTENT(OUT) :: \fIintercomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_rank.3in b/ompi/mpi/man/man3/MPI_Comm_rank.3in index 414ae19120..538467167a 100644 --- a/ompi/mpi/man/man3/MPI_Comm_rank.3in +++ b/ompi/mpi/man/man3/MPI_Comm_rank.3in @@ -17,10 +17,20 @@ int MPI_Comm_rank(MPI_Comm \fIcomm\fP, int\fI *rank\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_RANK(\fICOMM, RANK, IERROR\fP) INTEGER \fICOMM, RANK, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_rank(\fIcomm\fP, \fIrank\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(OUT) :: \fIrank\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_remote_group.3in b/ompi/mpi/man/man3/MPI_Comm_remote_group.3in index b33608e7aa..036441cb9a 100644 --- a/ompi/mpi/man/man3/MPI_Comm_remote_group.3in +++ b/ompi/mpi/man/man3/MPI_Comm_remote_group.3in @@ -17,10 +17,20 @@ int MPI_Comm_remote_group(MPI_Comm \fIcomm\fP, MPI_Group\fI *group\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_REMOTE_GROUP(\fICOMM, GROUP, IERROR\fP) INTEGER \fICOMM, GROUP, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_remote_group(\fIcomm\fP, \fIgroup\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Group), INTENT(OUT) :: \fIgroup\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_remote_size.3in b/ompi/mpi/man/man3/MPI_Comm_remote_size.3in index f1f8009b90..5ac636dff5 100644 --- a/ompi/mpi/man/man3/MPI_Comm_remote_size.3in +++ b/ompi/mpi/man/man3/MPI_Comm_remote_size.3in @@ -17,10 +17,20 @@ int MPI_Comm_remote_size(MPI_Comm \fIcomm\fP, int\fI *size\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_REMOTE_SIZE(\fICOMM, SIZE, IERROR\fP) INTEGER \fICOMM, SIZE, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_remote_size(\fIcomm\fP, \fIsize\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(OUT) :: \fIsize\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_set_attr.3in b/ompi/mpi/man/man3/MPI_Comm_set_attr.3in index d5f5e7c957..81b4996bdc 100644 --- a/ompi/mpi/man/man3/MPI_Comm_set_attr.3in +++ b/ompi/mpi/man/man3/MPI_Comm_set_attr.3in @@ -17,11 +17,22 @@ int MPI_Comm_set_attr(MPI_Comm \fIcomm\fP, int \fIcomm_keyval\fP, void *\fIattri .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_SET_ATTR(\fICOMM, COMM_KEYVAL, ATTRIBUTE_VAL, IERROR\fP) INTEGER \fICOMM, COMM_KEYVAL, IERROR \fP INTEGER(KIND=MPI_ADDRESS_KIND) \fIATTRIBUTE_VAL\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_set_attr(\fIcomm\fP, \fIcomm_keyval\fP, \fIattribute_val\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(IN) :: \fIcomm_keyval\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fIattribute_val\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_set_errhandler.3in b/ompi/mpi/man/man3/MPI_Comm_set_errhandler.3in index 216f652a20..4ca4030dd5 100644 --- a/ompi/mpi/man/man3/MPI_Comm_set_errhandler.3in +++ b/ompi/mpi/man/man3/MPI_Comm_set_errhandler.3in @@ -18,10 +18,20 @@ int MPI_Comm_set_errhandler(MPI_Comm \fIcomm\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_SET_ERRHANDLER(\fICOMM, ERRHANDLER, IERROR\fP) INTEGER \fICOMM, ERRHANDLER, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_set_errhandler(\fIcomm\fP, \fIerrhandler\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Errhandler), INTENT(IN) :: \fIerrhandler\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_set_info.3in b/ompi/mpi/man/man3/MPI_Comm_set_info.3in index 552bb0ce12..d768ec5131 100644 --- a/ompi/mpi/man/man3/MPI_Comm_set_info.3in +++ b/ompi/mpi/man/man3/MPI_Comm_set_info.3in @@ -17,10 +17,20 @@ int MPI_Comm_set_info(MPI_Comm \fIcomm\fP, MPI_Info \fIinfo\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_SET_INFO(\fICOMM, INFO, IERROR\fP) INTEGER \fICOMM, INFO, IERROR \fP . +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_set_info(\fIcomm\fP, \fIinfo\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Comm_set_name.3in b/ompi/mpi/man/man3/MPI_Comm_set_name.3in index d40ee07e71..2a6d2d9bd9 100644 --- a/ompi/mpi/man/man3/MPI_Comm_set_name.3in +++ b/ompi/mpi/man/man3/MPI_Comm_set_name.3in @@ -18,11 +18,21 @@ int MPI_Comm_set_name(MPI_Comm \fIcomm\fP, const char *\fIcomm_name\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_SET_NAME(\fICOMM, COMM_NAME, IERROR\fP) INTEGER \fICOMM, IERROR \fP CHARACTER*(*) \fICOMM_NAME\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_set_name(\fIcomm\fP, \fIcomm_name\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + CHARACTER(LEN=*), INTENT(IN) :: \fIcomm_name\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_size.3in b/ompi/mpi/man/man3/MPI_Comm_size.3in index cd9bbae3fb..a4f738ed16 100644 --- a/ompi/mpi/man/man3/MPI_Comm_size.3in +++ b/ompi/mpi/man/man3/MPI_Comm_size.3in @@ -17,10 +17,20 @@ int MPI_Comm_size(MPI_Comm \fIcomm\fP, int *\fIsize\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_SIZE(\fICOMM, SIZE, IERROR\fP) INTEGER \fICOMM, SIZE, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_size(\fIcomm\fP, \fIsize\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(OUT) :: \fIsize\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_spawn.3in b/ompi/mpi/man/man3/MPI_Comm_spawn.3in index 1a2d2531ac..54b9087458 100644 --- a/ompi/mpi/man/man3/MPI_Comm_spawn.3in +++ b/ompi/mpi/man/man3/MPI_Comm_spawn.3in @@ -20,7 +20,8 @@ int MPI_Comm_spawn(const char *\fIcommand\fP, char *\fIargv\fP[], int \fImaxproc .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_SPAWN(\fICOMMAND, ARGV, MAXPROCS, INFO, ROOT, COMM, INTERCOMM, ARRAY_OF_ERRCODES, IERROR\fP) @@ -28,6 +29,20 @@ MPI_COMM_SPAWN(\fICOMMAND, ARGV, MAXPROCS, INFO, ROOT, COMM, INTEGER \fIINFO, MAXPROCS, ROOT, COMM, INTERCOMM, ARRAY_OF_ERRCODES(*), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_spawn(\fIcommand\fP, \fIargv\fP, \fImaxprocs\fP, \fIinfo\fP, \fIroot\fP, \fIcomm\fP, \fIintercomm\fP, + \fIarray_of_errcodes\fP, \fIierror\fP) + CHARACTER(LEN=*), INTENT(IN) :: \fIcommand\fP, \fIargv(*)\fP + INTEGER, INTENT(IN) :: \fImaxprocs\fP, \fIroot\fP + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Comm), INTENT(OUT) :: \fIintercomm\fP + INTEGER :: \fIarray_of_errcodes(*)\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_spawn_multiple.3in b/ompi/mpi/man/man3/MPI_Comm_spawn_multiple.3in index f46ec5d19c..41ba586cc5 100644 --- a/ompi/mpi/man/man3/MPI_Comm_spawn_multiple.3in +++ b/ompi/mpi/man/man3/MPI_Comm_spawn_multiple.3in @@ -21,7 +21,8 @@ int MPI_Comm_spawn_multiple(int \fIcount\fP, char *\fIarray_of_commands\fP[], .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_SPAWN_MULTIPLE(\fICOUNT, ARRAY_OF_COMMANDS, ARRAY_OF_ARGV, ARRAY_OF_MAXPROCS, ARRAY_OF_INFO, ROOT, COMM, INTERCOMM, ARRAY_OF_ERRCODES, IERROR\fP) @@ -29,6 +30,22 @@ MPI_COMM_SPAWN_MULTIPLE(\fICOUNT, ARRAY_OF_COMMANDS, ARRAY_OF_ARGV, COMM, INTERCOMM, ARRAY_OF_ERRCODES(*), IERROR\fP CHARACTER*(*) \fIARRAY_OF_COMMANDS\fP(*), \fIARRAY_OF_ARGV\fP(\fICOUNT\fP, *) +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_spawn_multiple(\fIcount\fP, \fIarray_of_commands\fP, \fIarray_of_argv\fP, + \fIarray_of_maxprocs\fP, \fIarray_of_info\fP, \fIroot\fP, \fIcomm\fP, \fIintercomm,\fP + \fIarray_of_errcodes\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIcount\fP, \fIarray_of_maxprocs(*)\fP, \fIroot\fP + CHARACTER(LEN=*), INTENT(IN) :: \fIarray_of_commands(*)\fP + CHARACTER(LEN=*), INTENT(IN) :: \fIarray_of_argv(count\fP, \fI*)\fP + TYPE(MPI_Info), INTENT(IN) :: \fIarray_of_info(*)\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Comm), INTENT(OUT) :: \fIintercomm\fP + INTEGER :: \fIarray_of_errcodes(*)\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_split.3in b/ompi/mpi/man/man3/MPI_Comm_split.3in index 438b7b8113..a721f56fbe 100644 --- a/ompi/mpi/man/man3/MPI_Comm_split.3in +++ b/ompi/mpi/man/man3/MPI_Comm_split.3in @@ -18,10 +18,21 @@ int MPI_Comm_split(MPI_Comm \fIcomm\fP, int\fI color\fP, int\fI key\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_SPLIT(\fICOMM, COLOR, KEY, NEWCOMM, IERROR\fP) INTEGER \fICOMM, COLOR, KEY, NEWCOMM, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_split(\fIcomm\fP, \fIcolor\fP, \fIkey\fP, \fInewcomm\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(IN) :: \fIcolor\fP, \fIkey\fP + TYPE(MPI_Comm), INTENT(OUT) :: \fInewcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Comm_split_type.3in b/ompi/mpi/man/man3/MPI_Comm_split_type.3in index 9f07fcf238..09df426fae 100644 --- a/ompi/mpi/man/man3/MPI_Comm_split_type.3in +++ b/ompi/mpi/man/man3/MPI_Comm_split_type.3in @@ -19,10 +19,22 @@ int MPI_Comm_split_type(MPI_Comm \fIcomm\fP, int\fI split_type\fP, int\fI key\fP .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_SPLIT_TYPE(\fICOMM, SPLIT_TYPE, KEY, INFO, NEWCOMM, IERROR\fP) INTEGER \fICOMM, SPLIT_TYPE, KEY, INFO, NEWCOMM, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_split_type(\fIcomm\fP, \fIsplit_type\fP, \fIkey\fP, \fIinfo\fP, \fInewcomm\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(IN) :: \fIsplit_type\fP, \fIkey\fP + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + TYPE(MPI_Comm), INTENT(OUT) :: \fInewcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Comm_test_inter.3in b/ompi/mpi/man/man3/MPI_Comm_test_inter.3in index c128a1a2e2..9896896ad4 100644 --- a/ompi/mpi/man/man3/MPI_Comm_test_inter.3in +++ b/ompi/mpi/man/man3/MPI_Comm_test_inter.3in @@ -17,11 +17,21 @@ int MPI_Comm_test_inter(MPI_Comm \fIcomm\fP, int\fI *flag\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMM_TEST_INTER(\fICOMM, FLAG, IERROR\fP) INTEGER \fICOMM, IERROR\fP LOGICAL \fIFLAG \fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Comm_test_inter(\fIcomm\fP, \fIflag\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + LOGICAL, INTENT(OUT) :: \fIflag\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Compare_and_swap.3in b/ompi/mpi/man/man3/MPI_Compare_and_swap.3in index 7361704782..830445a92d 100644 --- a/ompi/mpi/man/man3/MPI_Compare_and_swap.3in +++ b/ompi/mpi/man/man3/MPI_Compare_and_swap.3in @@ -20,13 +20,28 @@ int MPI_Compare_and_swap(const void *\fIorigin_addr\fP, const void *\fIcompar_ad .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_COMPARE_AND_SWAP(\fIORIGIN_ADDR, COMPARE_ADDR, RESULT_ADDR, DATATYPE, TARGET_RANK, TARGET_DISP, WIN, IERROR\fP) \fIORIGIN_ADDR\fP, \fICOMPARE_ADDR\fP, \fIRESULT_ADDR\fP(*) INTEGER(KIND=MPI_ADDRESS_KIND) \fITARGET_DISP\fP INTEGER \fIDATATYPE, TARGET_RANK, WIN, IERROR \fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Compare_and_swap(\fIorigin_addr\fP, \fIcompare_addr\fP, \fIresult_addr\fP, \fIdatatype\fP, + \fItarget_rank\fP, \fItarget_disp\fP, \fIwin\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIorigin_addr\fP, \fIcompare_addr\fP + TYPE(*), DIMENSION(..) :: \fIresult_addr\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER, INTENT(IN) :: \fItarget_rank\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fItarget_disp\fP + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Dims_create.3in b/ompi/mpi/man/man3/MPI_Dims_create.3in index 37c1e691c9..2033264cd5 100644 --- a/ompi/mpi/man/man3/MPI_Dims_create.3in +++ b/ompi/mpi/man/man3/MPI_Dims_create.3in @@ -17,10 +17,20 @@ int MPI_Dims_create(int \fInnodes\fP, int\fI ndims\fP, int\fI dims\fP[]) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_DIMS_CREATE(\fINNODES, NDIMS, DIMS, IERROR\fP) INTEGER \fINNODES, NDIMS, DIMS(*), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Dims_create(\fInnodes\fP, \fIndims\fP, \fIdims\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fInnodes\fP, \fIndims\fP + INTEGER, INTENT(INOUT) :: \fIdims(ndims)\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Dist_graph_create.3in b/ompi/mpi/man/man3/MPI_Dist_graph_create.3in index 96a4c83ebd..4964391d00 100644 --- a/ompi/mpi/man/man3/MPI_Dist_graph_create.3in +++ b/ompi/mpi/man/man3/MPI_Dist_graph_create.3in @@ -20,13 +20,28 @@ int MPI_Dist_graph_create(MPI_Comm \fIcomm_old\fP, int\fI n\fP, const int\fI sou .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_DIST_GRAPH_CREATE(\fICOMM_OLD, N, SOURCES, DEGREES, DESTINATIONS, WEIGHTS, INFO, REORDER, COMM_DIST_GRAPH, IERROR\fP) INTEGER \fICOMM_OLD, N, SOURCES(*), DEGRES(*), WEIGHTS(*), INFO\fP INTEGER \fICOMM_DIST_GRAPH, IERROR\fP LOGICAL \fIREORDER\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Dist_Graph_create(\fIcomm_old\fP, \fIn\fP, \fIsources\fP, \fIdegrees\fP, \fIdestinations\fP, \fIweights\fP, + \fIinfo\fP, \fIreorder\fP, \fIcomm_dist_graph\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm_old\fP + INTEGER, INTENT(IN) :: \fIn\fP, \fIsources(n)\fP, \fIdegrees(n)\fP, \fIdestinations(*)\fP + INTEGER, INTENT(IN) :: \fIweights(*)\fP + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + LOGICAL, INTENT(IN) :: reorder + TYPE(MPI_Comm), INTENT(OUT) :: \fIcomm_dist_graph\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Dist_graph_create_adjacent.3in b/ompi/mpi/man/man3/MPI_Dist_graph_create_adjacent.3in index b3c247686f..a5ec8de790 100644 --- a/ompi/mpi/man/man3/MPI_Dist_graph_create_adjacent.3in +++ b/ompi/mpi/man/man3/MPI_Dist_graph_create_adjacent.3in @@ -20,13 +20,29 @@ int MPI_Dist_graph_create_adjacent(MPI_Comm \fIcomm_old\fP, int\fI indegree\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_DIST_GRAPH_CREATE_ADJACENT(\fICOMM_OLD, INDEGREE, SOURCES, SOURCEWEIGHTS, OUTDEGREE, DESTINATIONS, DESTWEIGHTS, INFO, REORDER, COMM_DIST_GRAPH, IERROR\fP) INTEGER \fICOMM_OLD, INDEGREE, SOURCES(*), SOURCEWEIGHTS(*), OUTDEGREE, DESTINATIONS(*), DESTWEIGHTS(*), INFO\fP INTEGER \fICOMM_DIST_GRAPH, IERROR\fP LOGICAL \fIREORDER\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Dist_Graph_create_adjacent(\fIcomm_old\fP, \fIndegree\fP, \fIsources\fP, \fIsourceweights\fP, + \fIoutdegree\fP, \fIdestinations\fP, \fIdestweights\fP, \fIinfo\fP, \fIreorder\fP, + \fIcomm_dist_graph\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm_old\fP + INTEGER, INTENT(IN) :: \fIindegree\fP, \fIsources(indegree)\fP, \fIoutdegree\fP, \fIdestinations(outdegree)\fP + INTEGER, INTENT(IN) :: \fIsourceweights(*)\fP, \fIdestweights(*)\fP + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + LOGICAL, INTENT(IN) :: reorder + TYPE(MPI_Comm), INTENT(OUT) :: \fIcomm_dist_graph\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Dist_graph_neighbors.3in b/ompi/mpi/man/man3/MPI_Dist_graph_neighbors.3in index c77e1d8a96..2ad96f625e 100644 --- a/ompi/mpi/man/man3/MPI_Dist_graph_neighbors.3in +++ b/ompi/mpi/man/man3/MPI_Dist_graph_neighbors.3in @@ -19,12 +19,25 @@ int MPI_Dist_graph_neighbors(MPI_Comm \fIcomm\fP, int \fImaxindegree\fP, int \fI .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_DIST_GRAPH_NEIGHBORS(COMM, MAXINDEGREE, SOURCES, SOURCEWEIGHTS, MAXOUTDEGREE, DESTINATIONS, DESTWEIGHTS, IERROR) INTEGER COMM, MAXINDEGREE, SOURCES(*), SOURCEWEIGHTS(*), MAXOUTDEGREE, DESTINATIONS(*), DESTWEIGHTS(*), IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Dist_Graph_neighbors(\fIcomm\fP, \fImaxindegree\fP, \fIsources\fP, \fIsourceweights\fP, + \fImaxoutdegree\fP, \fIdestinations\fP, \fIdestweights\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(IN) :: \fImaxindegree\fP, \fImaxoutdegree\fP + INTEGER, INTENT(OUT) :: \fIsources(maxindegree)\fP, \fIdestinations(maxoutdegree)\fP + INTEGER :: sourceweights(*), destweights(*) + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Dist_graph_neighbors_count.3in b/ompi/mpi/man/man3/MPI_Dist_graph_neighbors_count.3in index 2a4642f176..7a24fe2c04 100644 --- a/ompi/mpi/man/man3/MPI_Dist_graph_neighbors_count.3in +++ b/ompi/mpi/man/man3/MPI_Dist_graph_neighbors_count.3in @@ -19,11 +19,22 @@ int MPI_Dist_graph_neighbors_count(MPI_Comm \fIcomm\fP, int\fI *indegree\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_DIST_GRAPH_NEIGHBORS_COUNT(\fICOMM, INDEGREE, OUTDEGREE, WEIGHTED, IERROR\fP) INTEGER \fICOMM, INDEGREE, OUTDEGREE, IERROR\fP LOGICAL \fIWEIGHTED\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Dist_graph_neighbors_count(\fIcomm\fP, \fIindegree\fP, \fIoutdegree\fP, \fIweighted\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(IN) :: \fIindegree\fP, \fIoutdegree\fP + INTEGER, INTENT(OUT) :: \fIweighted\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Errhandler_free.3in b/ompi/mpi/man/man3/MPI_Errhandler_free.3in index 96300c6873..4b7f9f23db 100644 --- a/ompi/mpi/man/man3/MPI_Errhandler_free.3in +++ b/ompi/mpi/man/man3/MPI_Errhandler_free.3in @@ -17,10 +17,19 @@ int MPI_Errhandler_free(MPI_Errhandler *\fIerrhandler\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_ERRHANDLER_FREE(\fIERRHANDLER, IERROR\fP) INTEGER \fIERRHANDLER, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Errhandler_free(\fIerrhandler\fP, \fIierror\fP) + TYPE(MPI_Errhandler), INTENT(INOUT) :: \fIerrhandler\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Error_class.3in b/ompi/mpi/man/man3/MPI_Error_class.3in index bd892fdea0..09d6b8dd72 100644 --- a/ompi/mpi/man/man3/MPI_Error_class.3in +++ b/ompi/mpi/man/man3/MPI_Error_class.3in @@ -17,10 +17,20 @@ int MPI_Error_class(int \fIerrorcode\fP, int\fI *errorclass\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_ERROR_CLASS(\fIERRORCODE, ERRORCLASS, IERROR\fP) INTEGER \fIERRORCODE, ERRORCLASS, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Error_class(\fIerrorcode\fP, \fIerrorclass\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIerrorcode\fP + INTEGER, INTENT(OUT) :: \fIerrorclass\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Error_string.3in b/ompi/mpi/man/man3/MPI_Error_string.3in index db67d55b87..f0b7ef8f33 100644 --- a/ompi/mpi/man/man3/MPI_Error_string.3in +++ b/ompi/mpi/man/man3/MPI_Error_string.3in @@ -17,11 +17,22 @@ int MPI_Error_string(int \fIerrorcode\fP, char\fI *string\fP, int\fI *resultlen\ .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_ERROR_STRING(\fIERRORCODE, STRING, RESULTLEN, IERROR\fP) INTEGER \fIERRORCODE, RESULTLEN, IERROR\fP CHARACTER*(*) \fISTRING\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Error_string(\fIerrorcode\fP, \fIstring\fP, \fIresultlen\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIerrorcode\fP + CHARACTER(LEN=MPI_MAX_ERROR_STRING), INTENT(OUT) :: \fIstring\fP + INTEGER, INTENT(OUT) :: \fIresultlen\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Exscan.3in b/ompi/mpi/man/man3/MPI_Exscan.3in index c55e99ef71..5da0f0a703 100644 --- a/ompi/mpi/man/man3/MPI_Exscan.3in +++ b/ompi/mpi/man/man3/MPI_Exscan.3in @@ -25,7 +25,8 @@ int MPI_Iexscan(const void *\fIsendbuf\fP, void *\fIrecvbuf\fP, int \fIcount\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_EXSCAN(\fISENDBUF, RECVBUF, COUNT, DATATYPE, OP, COMM, IERROR\fP) \fISENDBUF(*), RECVBUF(*)\fP INTEGER \fICOUNT, DATATYPE, OP, COMM, IERROR\fP @@ -34,6 +35,29 @@ MPI_IEXSCAN(\fISENDBUF, RECVBUF, COUNT, DATATYPE, OP, COMM, REQUEST, IERROR\fP) \fISENDBUF(*), RECVBUF(*)\fP INTEGER \fICOUNT, DATATYPE, OP, COMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Exscan(\fIsendbuf\fP, \fIrecvbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIop\fP, \fIcomm\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIsendbuf\fP + TYPE(*), DIMENSION(..) :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Op), INTENT(IN) :: \fIop\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Iexscan(\fIsendbuf\fP, \fIrecvbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIop\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIsendbuf\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Op), INTENT(IN) :: \fIop\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Fetch_and_op.3in b/ompi/mpi/man/man3/MPI_Fetch_and_op.3in index dfddfe816a..fc380a3aef 100644 --- a/ompi/mpi/man/man3/MPI_Fetch_and_op.3in +++ b/ompi/mpi/man/man3/MPI_Fetch_and_op.3in @@ -20,13 +20,29 @@ int MPI_Fetch_and_op(const void *\fIorigin_addr\fP, void *\fIresult_addr\fP, .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_FETCH_AND_OP(\fIORIGIN_ADDR, RESULT_ADDR, DATATYPE, TARGET_RANK, TARGET_DISP, OP, WIN, IERROR\fP) \fIORIGIN_ADDR\fP, \fIRESULT_ADDR\fP(*) INTEGER(KIND=MPI_ADDRESS_KIND) \fITARGET_DISP\fP INTEGER \fIDATATYPE, TARGET_RANK, OP, WIN, IERROR \fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Fetch_and_op(\fIorigin_addr\fP, \fIresult_addr\fP, \fIdatatype\fP, \fItarget_rank\fP, + \fItarget_disp\fP, \fIop\fP, \fIwin\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIorigin_addr\fP + TYPE(*), DIMENSION(..) :: \fIresult_addr\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER, INTENT(IN) :: \fItarget_rank\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fItarget_disp\fP + TYPE(MPI_Op), INTENET(IN) :: \fIop\fP + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_File_call_errhandler.3in b/ompi/mpi/man/man3/MPI_File_call_errhandler.3in index 4b9e356a5c..c72185db68 100644 --- a/ompi/mpi/man/man3/MPI_File_call_errhandler.3in +++ b/ompi/mpi/man/man3/MPI_File_call_errhandler.3in @@ -20,10 +20,20 @@ int MPI_File_call_errhandler(MPI_File \fIfh\fP, int \fIerrorcode\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_FILE_CALL_ERRHANDLER(\fIFH, ERRORCODE, IERROR\fP) INTEGER \fIFH, IERRORCODE, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_call_errhandler(\fIfh\fP, \fIerrorcode\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER, INTENT(IN) :: \fIerrorcode\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_close.3in b/ompi/mpi/man/man3/MPI_File_close.3in index b4ca0411e2..407b54bf5b 100644 --- a/ompi/mpi/man/man3/MPI_File_close.3in +++ b/ompi/mpi/man/man3/MPI_File_close.3in @@ -21,6 +21,14 @@ C Syntax MPI_FILE_CLOSE(\fIFH\fP,\fI IERROR\fP) INTEGER FH, IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_close(\fIfh\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(INOUT) :: \fIfh\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_create_errhandler.3in b/ompi/mpi/man/man3/MPI_File_create_errhandler.3in index f917634c6f..7076b7c8c6 100644 --- a/ompi/mpi/man/man3/MPI_File_create_errhandler.3in +++ b/ompi/mpi/man/man3/MPI_File_create_errhandler.3in @@ -18,11 +18,21 @@ int MPI_File_create_errhandler(MPI_File_errhandler_function \fI*function\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_FILE_CREATE_ERRHANDLER(\fIFUNCTION, ERRHANDLER, IERROR\fP) EXTERNAL \fIFUNCTION\fP INTEGER \fIERRHANDLER, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_create_errhandler(\fIfile_errhandler_fn\fP, \fIerrhandler\fP, \fIierror\fP) + PROCEDURE(MPI_File_errhandler_function) :: \fIfile_errhandler_fn\fP + TYPE(MPI_Errhandler), INTENT(OUT) :: \fIerrhandler\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_delete.3in b/ompi/mpi/man/man3/MPI_File_delete.3in index 5169f7e66b..17d99e2060 100644 --- a/ompi/mpi/man/man3/MPI_File_delete.3in +++ b/ompi/mpi/man/man3/MPI_File_delete.3in @@ -23,6 +23,15 @@ C Syntax CHARACTER*(*) \fIFILENAME\fP INTEGER \fIINFO, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_delete(\fIfilename\fP, \fIinfo\fP, \fIierror\fP) + CHARACTER(LEN=*), INTENT(IN) :: \fIfilename\fP + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_get_amode.3in b/ompi/mpi/man/man3/MPI_File_get_amode.3in index dfa82d4a79..583307e1c3 100644 --- a/ompi/mpi/man/man3/MPI_File_get_amode.3in +++ b/ompi/mpi/man/man3/MPI_File_get_amode.3in @@ -21,6 +21,15 @@ C Syntax MPI_FILE_GET_AMODE(\fIFH\fP,\fI AMODE\fP, \fI IERROR\fP) INTEGER FH, AMODE, IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_get_amode(\fIfh\fP, \fIamode\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER, INTENT(OUT) :: \fIamode\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_get_atomicity.3in b/ompi/mpi/man/man3/MPI_File_get_atomicity.3in index 85afe966d7..fab66f1e06 100644 --- a/ompi/mpi/man/man3/MPI_File_get_atomicity.3in +++ b/ompi/mpi/man/man3/MPI_File_get_atomicity.3in @@ -22,6 +22,15 @@ C Syntax INTEGER \FIFH, IERROR\FP LOGICAL \FIFLAG\FP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_get_atomicity(\fIfh\fP, \fIflag\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + LOGICAL, INTENT(OUT) :: \fIflag\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_get_byte_offset.3in b/ompi/mpi/man/man3/MPI_File_get_byte_offset.3in index ff92b4898f..2551176508 100644 --- a/ompi/mpi/man/man3/MPI_File_get_byte_offset.3in +++ b/ompi/mpi/man/man3/MPI_File_get_byte_offset.3in @@ -23,6 +23,16 @@ C Syntax INTEGER \fIFH, IERROR\fP INTEGER(KIND=MPI_OFFSET_KIND) \fIOFFSET, DISP\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_get_byte_offset(\fIfh\fP, \fIoffset\fP, \fIdisp\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER(KIND=MPI_OFFSET_KIND), INTENT(IN) :: \fIoffset\fP + INTEGER(KIND=MPI_OFFSET_KIND), INTENT(OUT) :: \fIdisp\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_get_errhandler.3in b/ompi/mpi/man/man3/MPI_File_get_errhandler.3in index 482c0a617c..89ec740ade 100644 --- a/ompi/mpi/man/man3/MPI_File_get_errhandler.3in +++ b/ompi/mpi/man/man3/MPI_File_get_errhandler.3in @@ -18,10 +18,20 @@ int MPI_File_get_errhandler(MPI_File \fIfile\fP, MPI_Errhandler\fI .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_FILE_GET_ERRHANDLER(\fIFILE, ERRHANDLER, IERROR\fP) INTEGER \fIFILE, ERRHANDLER, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_get_errhandler(\fIfile\fP, \fIerrhandler\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfile\fP + TYPE(MPI_Errhandler), INTENT(OUT) :: \fIerrhandler\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax #include diff --git a/ompi/mpi/man/man3/MPI_File_get_group.3in b/ompi/mpi/man/man3/MPI_File_get_group.3in index bdbd2349c3..c53e96258e 100644 --- a/ompi/mpi/man/man3/MPI_File_get_group.3in +++ b/ompi/mpi/man/man3/MPI_File_get_group.3in @@ -21,6 +21,15 @@ C Syntax MPI_FILE_GET_GROUP(\fIFH\fP,\fI GROUP\fP, \fI IERROR\fP) INTEGER FH, GROUP, IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_get_group(\fIfh\fP, \fIgroup\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(MPI_Group), INTENT(OUT) :: \fIgroup\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_get_info.3in b/ompi/mpi/man/man3/MPI_File_get_info.3in index 5effc76796..0e62f25f0e 100644 --- a/ompi/mpi/man/man3/MPI_File_get_info.3in +++ b/ompi/mpi/man/man3/MPI_File_get_info.3in @@ -22,6 +22,15 @@ C Syntax MPI_FILE_GET_INFO(\fIFH\fP, \fIINFO_USED\fP, \fIIERROR\fP) INTEGER FH, INFO_USED, IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_get_info(\fIfh\fP, \fIinfo_used\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(MPI_Info), INTENT(OUT) :: \fIinfo_used\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_get_position.3in b/ompi/mpi/man/man3/MPI_File_get_position.3in index 897495c9cb..f73b136919 100644 --- a/ompi/mpi/man/man3/MPI_File_get_position.3in +++ b/ompi/mpi/man/man3/MPI_File_get_position.3in @@ -22,6 +22,15 @@ C Syntax INTEGER \fIFH, IERROR\fP INTEGER(KIND=MPI_OFFSET_KIND) \fIOFFSET\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_get_position(\fIfh\fP, \fIoffset\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER(KIND=MPI_OFFSET_KIND), INTENT(OUT) :: \fIoffset\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_get_position_shared.3in b/ompi/mpi/man/man3/MPI_File_get_position_shared.3in index 400d42fbaf..91af3d2cc1 100644 --- a/ompi/mpi/man/man3/MPI_File_get_position_shared.3in +++ b/ompi/mpi/man/man3/MPI_File_get_position_shared.3in @@ -22,6 +22,15 @@ C Syntax INTEGER \fIFH, IERROR\fP INTEGER(KIND=MPI_OFFSET_KIND) \fIOFFSET\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_get_position_shared(\fIfh\fP, \fIoffset\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER(KIND=MPI_OFFSET_KIND), INTENT(OUT) :: \fIoffset\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_get_size.3in b/ompi/mpi/man/man3/MPI_File_get_size.3in index 363cc178e0..f9c60cf81f 100644 --- a/ompi/mpi/man/man3/MPI_File_get_size.3in +++ b/ompi/mpi/man/man3/MPI_File_get_size.3in @@ -22,6 +22,15 @@ C Syntax INTEGER \fIFH, ERROR\fP INTEGER(KIND=MPI_OFFSET_KIND) \fISIZE\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_get_size(\fIfh\fP, \fIsize\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER(KIND=MPI_OFFSET_KIND), INTENT(OUT) :: \fIsize\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_get_type_extent.3in b/ompi/mpi/man/man3/MPI_File_get_type_extent.3in index 6ef1c2ecd4..99183e5f71 100644 --- a/ompi/mpi/man/man3/MPI_File_get_type_extent.3in +++ b/ompi/mpi/man/man3/MPI_File_get_type_extent.3in @@ -23,6 +23,16 @@ C Syntax INTEGER \fIFH, DATATYPE, IERROR\fP INTEGER(KIND=MPI_ADDRESS_KIND) \fIEXTENT\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_get_type_extent(\fIfh\fP, \fIdatatype\fP, \fIextent\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(OUT) :: \fIextent\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_get_view.3in b/ompi/mpi/man/man3/MPI_File_get_view.3in index c5552116dd..feae01f5b5 100644 --- a/ompi/mpi/man/man3/MPI_File_get_view.3in +++ b/ompi/mpi/man/man3/MPI_File_get_view.3in @@ -26,6 +26,17 @@ C Syntax CHARACTER*(*) \fIDATAREP\fP INTEGER(KIND=MPI_OFFSET_KIND) \fIDISP\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_get_view(\fIfh\fP, \fIdisp\fP, \fIetype\fP, \fIfiletype\fP, \fIdatarep\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER(KIND=MPI_OFFSET_KIND), INTENT(OUT) :: \fIdisp\fP + TYPE(MPI_Datatype), INTENT(OUT) :: \fIetype\fP, \fIfiletype\fP + CHARACTER(LEN=*), INTENT(OUT) :: \fIdatarep\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_iread.3in b/ompi/mpi/man/man3/MPI_File_iread.3in index c4f6706484..f53b90f66a 100644 --- a/ompi/mpi/man/man3/MPI_File_iread.3in +++ b/ompi/mpi/man/man3/MPI_File_iread.3in @@ -23,6 +23,18 @@ C Syntax BUF(*) INTEGER FH, COUNT, DATATYPE, REQUEST, IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_iread(\fIfh\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIrequest\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_iread_all.3in b/ompi/mpi/man/man3/MPI_File_iread_all.3in index 716e423a3e..0503720c65 100644 --- a/ompi/mpi/man/man3/MPI_File_iread_all.3in +++ b/ompi/mpi/man/man3/MPI_File_iread_all.3in @@ -23,6 +23,18 @@ C Syntax BUF(*) INTEGER FH, COUNT, DATATYPE, REQUEST, IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_iread_all(\fIfh\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIrequest\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT/OUTPUT PARAMETER .ft R diff --git a/ompi/mpi/man/man3/MPI_File_iread_at.3in b/ompi/mpi/man/man3/MPI_File_iread_at.3in index b39b4ef236..c6412f8e68 100644 --- a/ompi/mpi/man/man3/MPI_File_iread_at.3in +++ b/ompi/mpi/man/man3/MPI_File_iread_at.3in @@ -25,6 +25,19 @@ C Syntax INTEGER \fIFH, COUNT, DATATYPE, REQUEST, IERROR\fP INTEGER(KIND=MPI_OFFSET_KIND) \fIOFFSET\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_iread_at(\fIfh\fP, \fIoffset\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIrequest\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER(KIND=MPI_OFFSET_KIND), INTENT(IN) :: \fIoffset\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_iread_at_all.3in b/ompi/mpi/man/man3/MPI_File_iread_at_all.3in index b5166801d3..37d170187f 100644 --- a/ompi/mpi/man/man3/MPI_File_iread_at_all.3in +++ b/ompi/mpi/man/man3/MPI_File_iread_at_all.3in @@ -25,6 +25,19 @@ C Syntax INTEGER \fIFH, COUNT, DATATYPE, REQUEST, IERROR\fP INTEGER(KIND=MPI_OFFSET_KIND) \fIOFFSET\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_iread_at_all(\fIfh\fP, \fIoffset\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIrequest\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER(KIND=MPI_OFFSET_KIND), INTENT(IN) :: offset + TYPE(*), DIMENSION(..) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_File_iread_shared.3in b/ompi/mpi/man/man3/MPI_File_iread_shared.3in index 01af358e3a..9f2ca3575f 100644 --- a/ompi/mpi/man/man3/MPI_File_iread_shared.3in +++ b/ompi/mpi/man/man3/MPI_File_iread_shared.3in @@ -23,6 +23,18 @@ C Syntax BUF(*) INTEGER FH, COUNT, DATATYPE, REQUEST, IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_iread_shared(\fIfh\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIrequest\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_iwrite.3in b/ompi/mpi/man/man3/MPI_File_iwrite.3in index db2ff9507f..015b79f819 100644 --- a/ompi/mpi/man/man3/MPI_File_iwrite.3in +++ b/ompi/mpi/man/man3/MPI_File_iwrite.3in @@ -24,6 +24,18 @@ C Syntax BUF(*) INTEGER FH, COUNT, DATATYPE, REQUEST, IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_iwrite(\fIfh\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIrequest\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_iwrite_all.3in b/ompi/mpi/man/man3/MPI_File_iwrite_all.3in index 3fc0a03049..9374b69150 100644 --- a/ompi/mpi/man/man3/MPI_File_iwrite_all.3in +++ b/ompi/mpi/man/man3/MPI_File_iwrite_all.3in @@ -24,6 +24,18 @@ C Syntax BUF(*) INTEGER FH, COUNT, DATATYPE, REQUEST, IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_iwrite_all(\fIfh\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIrequest\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT/OUTPUT PARAMETER .ft R diff --git a/ompi/mpi/man/man3/MPI_File_iwrite_at.3in b/ompi/mpi/man/man3/MPI_File_iwrite_at.3in index 48519b3ae9..93fe4d18cf 100644 --- a/ompi/mpi/man/man3/MPI_File_iwrite_at.3in +++ b/ompi/mpi/man/man3/MPI_File_iwrite_at.3in @@ -25,6 +25,19 @@ C Syntax INTEGER \fIFH, COUNT, DATATYPE, REQUEST, IERROR\fP INTEGER(KIND=MPI_OFFSET_KIND) \fIOFFSET\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_iwrite_at(\fIfh\fP, \fIoffset\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIrequest\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER(KIND=MPI_OFFSET_KIND), INTENT(IN) :: \fIoffset\fP + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_iwrite_at_all.3in b/ompi/mpi/man/man3/MPI_File_iwrite_at_all.3in index ea9cab315e..31f087e929 100644 --- a/ompi/mpi/man/man3/MPI_File_iwrite_at_all.3in +++ b/ompi/mpi/man/man3/MPI_File_iwrite_at_all.3in @@ -25,6 +25,19 @@ C Syntax INTEGER \fIFH, COUNT, DATATYPE, REQUEST, IERROR\fP INTEGER(KIND=MPI_OFFSET_KIND) \fIOFFSET\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_iwrite_at_all(\fIfh\fP, \fIoffset\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIrequest\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER(KIND=MPI_OFFSET_KIND), INTENT(IN) :: offset + TYPE(*), DIMENSION(..) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT/OUTPUT PARAMETER .ft R diff --git a/ompi/mpi/man/man3/MPI_File_iwrite_shared.3in b/ompi/mpi/man/man3/MPI_File_iwrite_shared.3in index 59a48d3acb..8391a777ea 100644 --- a/ompi/mpi/man/man3/MPI_File_iwrite_shared.3in +++ b/ompi/mpi/man/man3/MPI_File_iwrite_shared.3in @@ -26,6 +26,18 @@ C Syntax BUF(*) INTEGER FH, COUNT, DATATYPE, REQUEST, IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_iwrite_shared(\fIfh\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIrequest\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_open.3in b/ompi/mpi/man/man3/MPI_File_open.3in index de6189fbd8..5d51ba96fc 100644 --- a/ompi/mpi/man/man3/MPI_File_open.3in +++ b/ompi/mpi/man/man3/MPI_File_open.3in @@ -24,6 +24,18 @@ C Syntax CHARACTER*(*) FILENAME INTEGER COMM, AMODE, INFO, FH, IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_open(\fIcomm\fP, \fIfilename\fP, \fIamode\fP, \fIinfo\fP, \fIfh\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + CHARACTER(LEN=*), INTENT(IN) :: \fIfilename\fP + INTEGER, INTENT(IN) :: \fIamode\fP + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + TYPE(MPI_File), INTENT(OUT) :: \fIfh\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_preallocate.3in b/ompi/mpi/man/man3/MPI_File_preallocate.3in index afa235d3d5..886f3119f3 100644 --- a/ompi/mpi/man/man3/MPI_File_preallocate.3in +++ b/ompi/mpi/man/man3/MPI_File_preallocate.3in @@ -22,6 +22,15 @@ C Syntax INTEGER \fIFH, IERROR\fP INTEGER(KIND=MPI_OFFSET_KIND) \fISIZE\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_preallocate(\fIfh\fP, \fIsize\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER(KIND=MPI_OFFSET_KIND), INTENT(IN) :: \fIsize\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_read.3in b/ompi/mpi/man/man3/MPI_File_read.3in index b6e2aa2f06..7c19ee6035 100644 --- a/ompi/mpi/man/man3/MPI_File_read.3in +++ b/ompi/mpi/man/man3/MPI_File_read.3in @@ -25,6 +25,18 @@ C Syntax INTEGER FH, COUNT, DATATYPE, STATUS(MPI_STATUS_SIZE), IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_read(\fIfh\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_read_all.3in b/ompi/mpi/man/man3/MPI_File_read_all.3in index 83ae7f80a7..a81a625470 100644 --- a/ompi/mpi/man/man3/MPI_File_read_all.3in +++ b/ompi/mpi/man/man3/MPI_File_read_all.3in @@ -25,6 +25,18 @@ C Syntax INTEGER FH, COUNT, DATATYPE, STATUS(MPI_STATUS_SIZE), IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_read_all(\fIfh\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_read_all_begin.3in b/ompi/mpi/man/man3/MPI_File_read_all_begin.3in index 3362149901..befbf2047a 100644 --- a/ompi/mpi/man/man3/MPI_File_read_all_begin.3in +++ b/ompi/mpi/man/man3/MPI_File_read_all_begin.3in @@ -23,6 +23,17 @@ C Syntax \fIBUF\fP(*) INTEGER \fIFH, COUNT, DATATYPE, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_read_all_begin(\fIfh\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_read_all_end.3in b/ompi/mpi/man/man3/MPI_File_read_all_end.3in index 3c27f1ffa9..4b21d5a529 100644 --- a/ompi/mpi/man/man3/MPI_File_read_all_end.3in +++ b/ompi/mpi/man/man3/MPI_File_read_all_end.3in @@ -23,6 +23,16 @@ C Syntax BUF(*) INTEGER FH, STATUS(MPI_STATUS_SIZE), IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_read_all_end(\fIfh\fP, \fIbuf\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIbuf\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_read_at.3in b/ompi/mpi/man/man3/MPI_File_read_at.3in index feb07bef02..cc1c742c8c 100644 --- a/ompi/mpi/man/man3/MPI_File_read_at.3in +++ b/ompi/mpi/man/man3/MPI_File_read_at.3in @@ -26,6 +26,19 @@ C Syntax INTEGER \fIFH, COUNT, DATATYPE, STATUS(MPI_STATUS_SIZE), IERROR\fP INTEGER(KIND=MPI_OFFSET_KIND) \fIOFFSET\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_read_at(\fIfh\fP, \fIoffset\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER(KIND=MPI_OFFSET_KIND), INTENT(IN) :: \fIoffset\fP + TYPE(*), DIMENSION(..) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_read_at_all.3in b/ompi/mpi/man/man3/MPI_File_read_at_all.3in index 3c39b8ac80..c97cdcf762 100644 --- a/ompi/mpi/man/man3/MPI_File_read_at_all.3in +++ b/ompi/mpi/man/man3/MPI_File_read_at_all.3in @@ -26,6 +26,19 @@ C Syntax INTEGER \fIFH, COUNT, DATATYPE, STATUS(MPI_STATUS_SIZE), IERROR\fP INTEGER(KIND=MPI_OFFSET_KIND) \fIOFFSET\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_read_at_all(\fIfh\fP, \fIoffset\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER(KIND=MPI_OFFSET_KIND), INTENT(IN) :: \fIoffset\fP + TYPE(*), DIMENSION(..) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_read_at_all_begin.3in b/ompi/mpi/man/man3/MPI_File_read_at_all_begin.3in index 75d8708d47..951dd2c721 100644 --- a/ompi/mpi/man/man3/MPI_File_read_at_all_begin.3in +++ b/ompi/mpi/man/man3/MPI_File_read_at_all_begin.3in @@ -26,6 +26,18 @@ C Syntax INTEGER \fIFH, COUNT, DATATYPE, IERROR\fP INTEGER(KIND=MPI_OFFSET_KIND) \fIOFFSET\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_read_at_all_begin(\fIfh\fP, \fIoffset\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER(KIND=MPI_OFFSET_KIND), INTENT(IN) :: \fIoffset\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_read_at_all_end.3in b/ompi/mpi/man/man3/MPI_File_read_at_all_end.3in index 0a3bc21f9a..8e40286e5f 100644 --- a/ompi/mpi/man/man3/MPI_File_read_at_all_end.3in +++ b/ompi/mpi/man/man3/MPI_File_read_at_all_end.3in @@ -23,6 +23,16 @@ C Syntax BUF(*) INTEGER FH, STATUS(MPI_STATUS_SIZE), IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_read_at_all_end(\fIfh\fP, \fIbuf\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIbuf\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_read_ordered.3in b/ompi/mpi/man/man3/MPI_File_read_ordered.3in index 14d0d02ee7..0aa1c441ff 100644 --- a/ompi/mpi/man/man3/MPI_File_read_ordered.3in +++ b/ompi/mpi/man/man3/MPI_File_read_ordered.3in @@ -25,6 +25,18 @@ C Syntax \fIBUF\fP(*) INTEGER \fIFH, COUNT, DATATYPE, STATUS(MPI_STATUS_SIZE), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_read_ordered(\fIfh\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_read_ordered_begin.3in b/ompi/mpi/man/man3/MPI_File_read_ordered_begin.3in index e5e6b87750..e81099f0d2 100644 --- a/ompi/mpi/man/man3/MPI_File_read_ordered_begin.3in +++ b/ompi/mpi/man/man3/MPI_File_read_ordered_begin.3in @@ -23,6 +23,17 @@ C Syntax BUF(*) INTEGER FH, COUNT, DATATYPE, IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_read_ordered_begin(\fIfh\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_read_ordered_end.3in b/ompi/mpi/man/man3/MPI_File_read_ordered_end.3in index 0b4b2d8a7b..562b0827f9 100644 --- a/ompi/mpi/man/man3/MPI_File_read_ordered_end.3in +++ b/ompi/mpi/man/man3/MPI_File_read_ordered_end.3in @@ -23,6 +23,16 @@ C Syntax BUF(*) INTEGER FH, STATUS(MPI_STATUS_SIZE), IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_read_ordered_end(\fIfh\fP, \fIbuf\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIbuf\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_read_shared.3in b/ompi/mpi/man/man3/MPI_File_read_shared.3in index 50da61878b..c05346d0fe 100644 --- a/ompi/mpi/man/man3/MPI_File_read_shared.3in +++ b/ompi/mpi/man/man3/MPI_File_read_shared.3in @@ -25,6 +25,18 @@ MPI_Datatype \fIdatatype\fP, MPI_Status \fI*status\fP) INTEGER FH, COUNT, DATATYPE, STATUS(MPI_STATUS_SIZE), IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_read_shared(\fIfh\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_seek.3in b/ompi/mpi/man/man3/MPI_File_seek.3in index 0e62b379d7..012ec59f38 100644 --- a/ompi/mpi/man/man3/MPI_File_seek.3in +++ b/ompi/mpi/man/man3/MPI_File_seek.3in @@ -23,6 +23,16 @@ C Syntax INTEGER \fIFH, WHENCE, IERROR\fP INTEGER(KIND=MPI_OFFSET_KIND) \fIOFFSET\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_seek(\fIfh\fP, \fIoffset\fP, \fIwhence\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER(KIND=MPI_OFFSET_KIND), INTENT(IN) :: \fIoffset\fP + INTEGER, INTENT(IN) :: \fIwhence\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_seek_shared.3in b/ompi/mpi/man/man3/MPI_File_seek_shared.3in index 55a3cfa30f..29c6de64d0 100644 --- a/ompi/mpi/man/man3/MPI_File_seek_shared.3in +++ b/ompi/mpi/man/man3/MPI_File_seek_shared.3in @@ -23,6 +23,16 @@ C Syntax INTEGER \fIFH, WHENCE, IERROR\fP INTEGER(KIND=MPI_OFFSET_KIND) \fIOFFSET\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_seek_shared(\fIfh\fP, \fIoffset\fP, \fIwhence\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER(KIND=MPI_OFFSET_KIND), INTENT(IN) :: \fIoffset\fP + INTEGER, INTENT(IN) :: \fIwhence\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_set_atomicity.3in b/ompi/mpi/man/man3/MPI_File_set_atomicity.3in index ce7f94f291..e954dca48d 100644 --- a/ompi/mpi/man/man3/MPI_File_set_atomicity.3in +++ b/ompi/mpi/man/man3/MPI_File_set_atomicity.3in @@ -21,6 +21,15 @@ C Syntax MPI_FILE_SET_ATOMICITY(\fIFH\fP,\fI FLAG\fP,\fI IERROR\fP) INTEGER FH, FLAG, IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_set_atomicity(\fIfh\fP, \fIflag\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + LOGICAL, INTENT(IN) :: \fIflag\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_set_errhandler.3in b/ompi/mpi/man/man3/MPI_File_set_errhandler.3in index fd0a4a0689..b7decfe1fc 100644 --- a/ompi/mpi/man/man3/MPI_File_set_errhandler.3in +++ b/ompi/mpi/man/man3/MPI_File_set_errhandler.3in @@ -18,10 +18,20 @@ int MPI_File_set_errhandler(MPI_File \fIfile\fP, MPI_Errhandler .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_FILE_SET_ERRHANDLER(\fIFILE, ERRHANDLER, IERROR\fP) INTEGER \fIFILE, ERRHANDLER, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_set_errhandler(\fIfile\fP, \fIerrhandler\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfile\fP + TYPE(MPI_Errhandler), INTENT(IN) :: \fIerrhandler\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_set_info.3in b/ompi/mpi/man/man3/MPI_File_set_info.3in index e59236b8f3..5aa822f13c 100644 --- a/ompi/mpi/man/man3/MPI_File_set_info.3in +++ b/ompi/mpi/man/man3/MPI_File_set_info.3in @@ -21,6 +21,15 @@ C Syntax MPI_FILE_SET_INFO(\fIFH\fP, \fIINFO\fP, \fIIERROR\fP) INTEGER FH, INFO, IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_set_info(\fIfh\fP, \fIinfo\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_set_size.3in b/ompi/mpi/man/man3/MPI_File_set_size.3in index 38602412c1..a687f6e0c3 100644 --- a/ompi/mpi/man/man3/MPI_File_set_size.3in +++ b/ompi/mpi/man/man3/MPI_File_set_size.3in @@ -22,6 +22,15 @@ C Syntax INTEGER \fIFH, IERROR\fP INTEGER(KIND=MPI_OFFSET_KIND) \fISIZE\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_set_size(\fIfh\fP, \fIsize\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER(KIND=MPI_OFFSET_KIND), INTENT(IN) :: \fIsize\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_set_view.3in b/ompi/mpi/man/man3/MPI_File_set_view.3in index 7da244988a..0fab466d3e 100644 --- a/ompi/mpi/man/man3/MPI_File_set_view.3in +++ b/ompi/mpi/man/man3/MPI_File_set_view.3in @@ -26,6 +26,18 @@ C Syntax CHARACTER*(*) \fIDATAREP\fP INTEGER(KIND=MPI_OFFSET_KIND) \fIDISP\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_set_view(\fIfh\fP, \fIdisp\fP, \fIetype\fP, \fIfiletype\fP, \fIdatarep\fP, \fIinfo\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER(KIND=MPI_OFFSET_KIND), INTENT(IN) :: \fIdisp\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIetype\fP, \fIfiletype\fP + CHARACTER(LEN=*), INTENT(IN) :: \fIdatarep\fP + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_sync.3in b/ompi/mpi/man/man3/MPI_File_sync.3in index 5c72651fa2..1d26efcae2 100644 --- a/ompi/mpi/man/man3/MPI_File_sync.3in +++ b/ompi/mpi/man/man3/MPI_File_sync.3in @@ -21,6 +21,14 @@ C Syntax MPI_FILE_SYNC(\fIFH\fP, \fIIERROR\fP) INTEGER FH, IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_sync(\fIfh\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_write.3in b/ompi/mpi/man/man3/MPI_File_write.3in index ca95b4b519..b25edfad7d 100644 --- a/ompi/mpi/man/man3/MPI_File_write.3in +++ b/ompi/mpi/man/man3/MPI_File_write.3in @@ -27,6 +27,18 @@ C Syntax INTEGER \fIFH, COUNT, DATATYPE, STATUS(MPI_STATUS_SIZE), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_write(\fIfh\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_write_all.3in b/ompi/mpi/man/man3/MPI_File_write_all.3in index e8f555d04e..5b70456b8a 100644 --- a/ompi/mpi/man/man3/MPI_File_write_all.3in +++ b/ompi/mpi/man/man3/MPI_File_write_all.3in @@ -26,6 +26,18 @@ C Syntax INTEGER FH, COUNT, DATATYPE, STATUS(MPI_STATUS_SIZE), IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_write_all(\fIfh\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_write_all_begin.3in b/ompi/mpi/man/man3/MPI_File_write_all_begin.3in index 7178fcb0aa..4cf80fe25f 100644 --- a/ompi/mpi/man/man3/MPI_File_write_all_begin.3in +++ b/ompi/mpi/man/man3/MPI_File_write_all_begin.3in @@ -24,6 +24,17 @@ C Syntax BUF(*) INTEGER FH, COUNT, DATATYPE, IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_write_all_begin(\fIfh\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_write_all_end.3in b/ompi/mpi/man/man3/MPI_File_write_all_end.3in index 685ce6fd8d..aca5ca38de 100644 --- a/ompi/mpi/man/man3/MPI_File_write_all_end.3in +++ b/ompi/mpi/man/man3/MPI_File_write_all_end.3in @@ -23,6 +23,16 @@ C Syntax BUF(*) INTEGER FH, STATUS, IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_write_all_end(\fIfh\fP, \fIbuf\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIbuf\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_write_at.3in b/ompi/mpi/man/man3/MPI_File_write_at.3in index d48218cfe1..89c39a952a 100644 --- a/ompi/mpi/man/man3/MPI_File_write_at.3in +++ b/ompi/mpi/man/man3/MPI_File_write_at.3in @@ -26,6 +26,19 @@ C Syntax INTEGER \fIFH, COUNT, DATATYPE, STATUS(MPI_STATUS_SIZE), IERROR\fP INTEGER(KIND=MPI_OFFSET_KIND) \fIOFFSET\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_write_at(\fIfh\fP, \fIoffset\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER(KIND=MPI_OFFSET_KIND), INTENT(IN) :: \fIoffset\fP + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_write_at_all.3in b/ompi/mpi/man/man3/MPI_File_write_at_all.3in index 9f38aea619..60a1a62e25 100644 --- a/ompi/mpi/man/man3/MPI_File_write_at_all.3in +++ b/ompi/mpi/man/man3/MPI_File_write_at_all.3in @@ -26,6 +26,19 @@ C Syntax INTEGER \fIFH, COUNT, DATATYPE, STATUS(MPI_STATUS_SIZE), IERROR\fP INTEGER(KIND=MPI_OFFSET_KIND) \fIOFFSET\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_write_at_all(\fIfh\fP, \fIoffset\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER(KIND=MPI_OFFSET_KIND), INTENT(IN) :: \fIoffset\fP + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_write_at_all_begin.3in b/ompi/mpi/man/man3/MPI_File_write_at_all_begin.3in index 1c071a1c13..cb65a32c9a 100644 --- a/ompi/mpi/man/man3/MPI_File_write_at_all_begin.3in +++ b/ompi/mpi/man/man3/MPI_File_write_at_all_begin.3in @@ -25,6 +25,18 @@ C Syntax INTEGER \fIFH, COUNT, DATATYPE, IERROR\fP INTEGER(KIND=MPI_OFFSET_KIND) \fIOFFSET\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_write_at_all_begin(\fIfh\fP, \fIoffset\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + INTEGER(KIND=MPI_OFFSET_KIND), INTENT(IN) :: \fIoffset\fP + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_write_at_all_end.3in b/ompi/mpi/man/man3/MPI_File_write_at_all_end.3in index 14c597a33a..cd13d3ef8b 100644 --- a/ompi/mpi/man/man3/MPI_File_write_at_all_end.3in +++ b/ompi/mpi/man/man3/MPI_File_write_at_all_end.3in @@ -24,6 +24,16 @@ C Syntax BUF(*) INTEGER FH, STATUS(MPI_STATUS_SIZE), IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_write_at_all_end(\fIfh\fP, \fIbuf\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIbuf\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_write_ordered.3in b/ompi/mpi/man/man3/MPI_File_write_ordered.3in index efeff3b61f..8273553ec0 100644 --- a/ompi/mpi/man/man3/MPI_File_write_ordered.3in +++ b/ompi/mpi/man/man3/MPI_File_write_ordered.3in @@ -26,6 +26,18 @@ C Syntax \fIBUF\fP(*) INTEGER \fIFH, COUNT, DATATYPE, STATUS(MPI_STATUS_SIZE), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_write_ordered(\fIfh\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_write_ordered_begin.3in b/ompi/mpi/man/man3/MPI_File_write_ordered_begin.3in index 80f6ebe58e..6432fcabce 100644 --- a/ompi/mpi/man/man3/MPI_File_write_ordered_begin.3in +++ b/ompi/mpi/man/man3/MPI_File_write_ordered_begin.3in @@ -24,6 +24,17 @@ C Syntax BUF(*) INTEGER FH, COUNT, DATATYPE, IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_write_ordered_begin(\fIfh\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_write_ordered_end.3in b/ompi/mpi/man/man3/MPI_File_write_ordered_end.3in index 4134561124..e5a8b0c193 100644 --- a/ompi/mpi/man/man3/MPI_File_write_ordered_end.3in +++ b/ompi/mpi/man/man3/MPI_File_write_ordered_end.3in @@ -24,6 +24,16 @@ C Syntax BUF(*) INTEGER FH, STATUS(MPI_STATUS_SIZE), IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_write_ordered_end(\fIfh\fP, \fIbuf\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIbuf\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_File_write_shared.3in b/ompi/mpi/man/man3/MPI_File_write_shared.3in index a893ccd921..5b1e44941e 100644 --- a/ompi/mpi/man/man3/MPI_File_write_shared.3in +++ b/ompi/mpi/man/man3/MPI_File_write_shared.3in @@ -25,6 +25,18 @@ C Syntax INTEGER \fIFH, COUNT, DATATYPE, STATUS(MPI_STATUS_SIZE), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_File_write_shared(\fIfh\fP, \fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_File), INTENT(IN) :: \fIfh\fP + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Finalize.3in b/ompi/mpi/man/man3/MPI_Finalize.3in index a4ffcc689b..9899706f98 100644 --- a/ompi/mpi/man/man3/MPI_Finalize.3in +++ b/ompi/mpi/man/man3/MPI_Finalize.3in @@ -17,10 +17,18 @@ int MPI_Finalize() .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_FINALIZE(\fIIERROR\fP) INTEGER \fIIERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Finalize(\fIierror\fP) + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Finalized.3in b/ompi/mpi/man/man3/MPI_Finalized.3in index dae99f003b..bfad7f4a2e 100644 --- a/ompi/mpi/man/man3/MPI_Finalized.3in +++ b/ompi/mpi/man/man3/MPI_Finalized.3in @@ -17,11 +17,20 @@ int MPI_Finalized(int \fI*flag\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_FINALIZED(\fIFLAG\fP, \fIIERROR\fP) LOGICAL \fIFLAG\fP INTEGER \fIIERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Finalized(\fIflag\fP, \fIierror\fP) + LOGICAL, INTENT(OUT) :: \fIflag\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Free_mem.3in b/ompi/mpi/man/man3/MPI_Free_mem.3in index 56cbdcf348..5106add107 100644 --- a/ompi/mpi/man/man3/MPI_Free_mem.3in +++ b/ompi/mpi/man/man3/MPI_Free_mem.3in @@ -17,11 +17,20 @@ int MPI_Free_mem(void *\fIbase\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_FREE_MEM(\fIBASE, IERROR\fP) \fIBASE\fP(*) INTEGER \fIIERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Free_mem(\fIbase\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIbase\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Gather.3in b/ompi/mpi/man/man3/MPI_Gather.3in index e8ae67bb7a..ecc8ab2712 100644 --- a/ompi/mpi/man/man3/MPI_Gather.3in +++ b/ompi/mpi/man/man3/MPI_Gather.3in @@ -24,7 +24,8 @@ int MPI_Igather(const void \fI*sendbuf\fP, int\fI sendcount\fP, MPI_Datatype\fI .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GATHER(\fISENDBUF, SENDCOUNT, SENDTYPE, RECVBUF, RECVCOUNT, RECVTYPE, ROOT, COMM, IERROR\fP) \fISENDBUF(*), RECVBUF(*)\fP @@ -37,6 +38,29 @@ MPI_IGATHER(\fISENDBUF, SENDCOUNT, SENDTYPE, RECVBUF, RECVCOUNT, INTEGER \fISENDCOUNT, SENDTYPE, RECVCOUNT, RECVTYPE, ROOT\fP INTEGER \fICOMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Gather(\fIsendbuf\fP, \fIsendcount\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcount\fP, \fIrecvtype\fP, + \fIroot\fP, \fIcomm\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIsendbuf\fP + TYPE(*), DIMENSION(..) :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcount\fP, \fIrecvcount\fP, \fIroot\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Igather(\fIsendbuf\fP, \fIsendcount\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcount\fP, \fIrecvtype\fP, + \fIroot\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIsendbuf\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcount\fP, \fIrecvcount\fP, \fIroot\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Gatherv.3in b/ompi/mpi/man/man3/MPI_Gatherv.3in index c3c71ea2ec..7c38c56bce 100644 --- a/ompi/mpi/man/man3/MPI_Gatherv.3in +++ b/ompi/mpi/man/man3/MPI_Gatherv.3in @@ -24,7 +24,8 @@ int MPI_Igatherv(const void *\fIsendbuf\fP, int\fI sendcount\fP, MPI_Datatype\fI .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GATHERV(\fISENDBUF, SENDCOUNT, SENDTYPE, RECVBUF, RECVCOUNTS, DISPLS, RECVTYPE, ROOT, COMM, IERROR\fP) \fISENDBUF(*), RECVBUF(*)\fP @@ -37,6 +38,30 @@ MPI_IGATHERV(\fISENDBUF, SENDCOUNT, SENDTYPE, RECVBUF, RECVCOUNTS, INTEGER \fISENDCOUNT, SENDTYPE, RECVCOUNTS(*), DISPLS(*)\fP INTEGER \fIRECVTYPE, ROOT, COMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Gatherv(\fIsendbuf\fP, \fIsendcount\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcounts\fP, \fIdispls\fP, + \fIrecvtype\fP, \fIroot\fP, \fIcomm\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIsendbuf\fP + TYPE(*), DIMENSION(..) :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcount\fP, \fIrecvcounts(*)\fP, \fIdispls(*)\fP, \fIroot\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Igatherv(\fIsendbuf\fP, \fIsendcount\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcounts\fP, \fIdispls\fP, + \fIrecvtype\fP, \fIroot\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIsendbuf\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcount\fP, \fIroot\fP + INTEGER, INTENT(IN), ASYNCHRONOUS :: \fIrecvcounts(*)\fP, \fIdispls(*)\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Get.3in b/ompi/mpi/man/man3/MPI_Get.3in index 553ce88e39..991834ca72 100644 --- a/ompi/mpi/man/man3/MPI_Get.3in +++ b/ompi/mpi/man/man3/MPI_Get.3in @@ -25,7 +25,8 @@ MPI_Rget(void *\fIorigin_addr\fP, int \fIorigin_count\fP, MPI_Datatype .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GET(\fIORIGIN_ADDR, ORIGIN_COUNT, ORIGIN_DATATYPE, TARGET_RANK, TARGET_DISP, TARGET_COUNT, TARGET_DATATYPE, WIN, IERROR\fP) \fIORIGIN_ADDR\fP(*) @@ -40,6 +41,30 @@ MPI_RGET(\fIORIGIN_ADDR, ORIGIN_COUNT, ORIGIN_DATATYPE, TARGET_RANK, INTEGER \fIORIGIN_COUNT, ORIGIN_DATATYPE, TARGET_RANK, TARGET_COUNT, TARGET_DATATYPE, WIN, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Get(\fIorigin_addr\fP, \fIorigin_count\fP, \fIorigin_datatype\fP, \fItarget_rank\fP, + \fItarget_disp\fP, \fItarget_count\fP, \fItarget_datatype\fP, \fIwin\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIorigin_addr\fP + INTEGER, INTENT(IN) :: \fIorigin_count\fP, \fItarget_rank\fP, \fItarget_count\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIorigin_datatype\fP, \fItarget_datatype\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fItarget_disp\fP + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Rget(\fIorigin_addr\fP, \fIorigin_count\fP, \fIorigin_datatype\fP, \fItarget_rank\fP, + \fItarget_disp\fP, \fItarget_count\fP, \fItarget_datatype\fP, \fIwin\fP, \fIrequest,\fP + \fIierror\fP) + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIorigin_addr\fP + INTEGER, INTENT(IN) :: \fIorigin_count\fP, \fItarget_rank\fP, \fItarget_count\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIorigin_datatype\fP, \fItarget_datatype\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fItarget_disp\fP + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Get_accumulate.3in b/ompi/mpi/man/man3/MPI_Get_accumulate.3in index f1c0449b31..903024f7c3 100644 --- a/ompi/mpi/man/man3/MPI_Get_accumulate.3in +++ b/ompi/mpi/man/man3/MPI_Get_accumulate.3in @@ -29,7 +29,8 @@ int MPI_Rget_accumulate(const void *\fIorigin_addr\fP, int \fIorigin_count\fP, .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GET_ACCUMULATE(\fIORIGIN_ADDR, ORIGIN_COUNT, ORIGIN_DATATYPE, RESULT_ADDR, RESULT_COUNT, RESULT_DATATYPE, TARGET_RANK, TARGET_DISP, TARGET_COUNT, TARGET_DATATYPE, OP, WIN, IERROR\fP) @@ -46,6 +47,36 @@ MPI_RGET_ACCUMULATE(\fIORIGIN_ADDR, ORIGIN_COUNT, ORIGIN_DATATYPE, RESULT_ADDR, INTEGER \fIORIGIN_COUNT, ORIGIN_DATATYPE, TARGET_COUNT, TARGET_DATATYPE, TARGET_RANK, TARGET_COUNT, TARGET_DATATYPE, OP, WIN, REQUEST, IERROR \fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Get_accumulate(\fIorigin_addr\fP, \fIorigin_count\fP, \fIorigin_datatype\fP, \fIresult_addr\fP, + \fIresult_count\fP, \fIresult_datatype\fP, \fItarget_rank\fP, \fItarget_disp\fP, + \fItarget_count\fP, \fItarget_datatype\fP, \fIop\fP, \fIwin\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIorigin_addr\fP + TYPE(*), DIMENSION(..) :: \fIresult_addr\fP + INTEGER, INTENT(IN) :: \fIorigin_count\fP, \fIresult_count\fP, \fItarget_rank\fP, \fItarget_count\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIorigin_datatype\fP, \fItarget_datatype\fP, \fIresult_datatype\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fItarget_dist\fP + TYPE(MPI_Op), INTENT(IN) :: \fIop\fP + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Rget_accumulate(\fIorigin_addr\fP, \fIorigin_count\fP, \fIorigin_datatype\fP, + \fIresult_addr\fP, \fIresult_count\fP, \fIresult_datatype\fP, \fItarget_rank\fP, + \fItarget_disp\fP, \fItarget_count\fP, \fItarget_datatype\fP, \fIop\fP, \fIwin\fP, \fIrequest\fP, + \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIorigin_addr\fP + TYPE(*), DIMENSION(..) :: \fIresult_addr\fP + INTEGER, INTENT(IN) :: \fIorigin_count\fP, \fIresult_count\fP, \fItarget_rank\fP, \fItarget_count\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIorigin_datatype\fP, \fItarget_datatype\fP, \fIresult_datatype\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fItarget_dist\fP + TYPE(MPI_Op), INTENT(IN) :: \fIop\fP + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Get_address.3in b/ompi/mpi/man/man3/MPI_Get_address.3in index 45634f6557..8f643c5ac1 100644 --- a/ompi/mpi/man/man3/MPI_Get_address.3in +++ b/ompi/mpi/man/man3/MPI_Get_address.3in @@ -18,11 +18,21 @@ int MPI_Get_address(const void *\fIlocation\fP, MPI_Aint *\fIaddress\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GET_ADDRESS(\fILOCATION, ADDRESS, IERROR\fP) \fILOCATION\fP(*) INTEGER \fIADDRESS, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Get_address(\fIlocation\fP, \fIaddress\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIlocation\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(OUT) :: \fIaddress\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Get_count.3in b/ompi/mpi/man/man3/MPI_Get_count.3in index 81eb522a30..4f97fe60a4 100644 --- a/ompi/mpi/man/man3/MPI_Get_count.3in +++ b/ompi/mpi/man/man3/MPI_Get_count.3in @@ -18,10 +18,21 @@ int MPI_Get_count(const MPI_Status *\fIstatus\fP, MPI_Datatype\fI datatype\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GET_COUNT(\fISTATUS, DATATYPE, COUNT, IERROR\fP) INTEGER \fISTATUS(MPI_STATUS_SIZE), DATATYPE, COUNT, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Get_count(\fIstatus\fP, \fIdatatype\fP, \fIcount\fP, \fIierror\fP) + TYPE(MPI_Status), INTENT(IN) :: \fIstatus\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER, INTENT(OUT) :: \fIcount\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Get_elements.3in b/ompi/mpi/man/man3/MPI_Get_elements.3in index 1f1bd9fa07..ade19a402a 100644 --- a/ompi/mpi/man/man3/MPI_Get_elements.3in +++ b/ompi/mpi/man/man3/MPI_Get_elements.3in @@ -21,7 +21,8 @@ int MPI_Get_elements_x(const MPI_Status *\fIstatus\fP, MPI_Datatype\fI datatype\ .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GET_ELEMENTS(\fISTATUS, DATATYPE, COUNT, IERROR\fP) INTEGER \fISTATUS(MPI_STATUS_SIZE), DATATYPE, COUNT, IERROR\fP MPI_GET_ELEMENTS_X(\fISTATUS, DATATYPE, COUNT, IERROR\fP) @@ -29,6 +30,21 @@ MPI_GET_ELEMENTS_X(\fISTATUS, DATATYPE, COUNT, IERROR\fP) INTEGER(KIND=MPI_COUNT_KIND) \fICOUNT\fP INTEGER \fIIERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Get_elements(\fIstatus\fP, \fIdatatype\fP, \fIcount\fP, \fIierror\fP) + TYPE(MPI_Status), INTENT(IN) :: \fIstatus\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER, INTENT(OUT) :: \fIcount\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP +MPI_Get_elements_x(\fIstatus\fP, \fIdatatype\fP, \fIcount\fP, \fIierror\fP) + TYPE(MPI_Status), INTENT(IN) :: \fIstatus\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER(KIND = MPI_COUNT_KIND), INTENT(OUT) :: \fIcount\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Get_library_version.3in b/ompi/mpi/man/man3/MPI_Get_library_version.3in index ebe9346bda..f1fed57ace 100644 --- a/ompi/mpi/man/man3/MPI_Get_library_version.3in +++ b/ompi/mpi/man/man3/MPI_Get_library_version.3in @@ -17,11 +17,21 @@ int MPI_Get_library_version(char \fI*version\fP, int \fI*resultlen\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GET_LIBRARY_VERSION(\fIVERSION\fP, \fIRESULTLEN\fP, \fIIERROR\fP) CHARACTER*(*) \fINAME\fP INTEGER \fIRESULTLEN\fP, \fIIERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Get_library_version(\fIversion\fP, \fIresulten\fP, \fIierror\fP) + CHARACTER(LEN=MPI_MAX_LIBRARY_VERSION_STRING), INTENT(OUT) :: \fIversion\fP + INTEGER, INTENT(OUT) :: \fIresultlen\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Get_processor_name.3in b/ompi/mpi/man/man3/MPI_Get_processor_name.3in index a59997f7da..6c546e94f9 100644 --- a/ompi/mpi/man/man3/MPI_Get_processor_name.3in +++ b/ompi/mpi/man/man3/MPI_Get_processor_name.3in @@ -17,11 +17,21 @@ int MPI_Get_processor_name(char *\fIname\fP, int *\fIresultlen\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GET_PROCESSOR_NAME(\fINAME, RESULTLEN, IERROR\fP) CHARACTER*(*) \fINAME\fP INTEGER \fIRESULTLEN, IERROR \fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Get_processor_name(\fIname\fP, \fIresultlen\fP, \fIierror\fP) + CHARACTER(LEN=MPI_MAX_PROCESSOR_NAME), INTENT(OUT) :: \fIname\fP + INTEGER, INTENT(OUT) :: \fIresultlen\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Get_version.3in b/ompi/mpi/man/man3/MPI_Get_version.3in index 4444872342..ec06521e49 100644 --- a/ompi/mpi/man/man3/MPI_Get_version.3in +++ b/ompi/mpi/man/man3/MPI_Get_version.3in @@ -17,10 +17,19 @@ int MPI_Get_version(int \fI*version\fP, int \fI*subversion\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GET_VERSION(\fIVERSION\fP, \fISUBVERSION\fP, \fIIERROR\fP) INTEGER \fIVERSION\fP, \fISUBVERSION\fP, \fIIERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Get_version(\fIversion\fP, \fIsubversion\fP, \fIierror\fP) + INTEGER, INTENT(OUT) :: \fIversion\fP, \fIsubversion\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Graph_create.3in b/ompi/mpi/man/man3/MPI_Graph_create.3in index fe586375d6..e8155b9fdb 100644 --- a/ompi/mpi/man/man3/MPI_Graph_create.3in +++ b/ompi/mpi/man/man3/MPI_Graph_create.3in @@ -19,13 +19,26 @@ int MPI_Graph_create(MPI_Comm \fIcomm_old\fP, int\fI nnodes\fP, const int\fI ind .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GRAPH_CREATE(\fICOMM_OLD, NNODES, INDEX, EDGES, REORDER, COMM_GRAPH, IERROR\fP) INTEGER \fICOMM_OLD, NNODES, INDEX(*), EDGES(*)\fP INTEGER \fICOMM_GRAPH, IERROR\fP LOGICAL \fIREORDER\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Graph_create(\fIcomm_old\fP, \fInnodes\fP, \fIindex\fP, \fIedges\fP, \fIreorder\fP, \fIcomm_graph\fP, + \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm_old\fP + INTEGER, INTENT(IN) :: \fInnodes\fP, \fIindex(nnodes)\fP, \fIedges(*)\fP + LOGICAL, INTENT(IN) :: \fIreorder\fP + TYPE(MPI_Comm), INTENT(OUT) :: \fIcomm_graph\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Graph_get.3in b/ompi/mpi/man/man3/MPI_Graph_get.3in index 4ae1dc2ba7..fa6e78c089 100644 --- a/ompi/mpi/man/man3/MPI_Graph_get.3in +++ b/ompi/mpi/man/man3/MPI_Graph_get.3in @@ -18,11 +18,22 @@ int MPI_Graph_get(MPI_Comm \fIcomm\fP, int\fI maxindex\fP, int\fI maxedges\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GRAPH_GET(\fICOMM, MAXINDEX, MAXEDGES, INDEX, EDGES, IERROR\fP) INTEGER \fICOMM, MAXINDEX, MAXEDGES, INDEX(*)\fP INTEGER \fIEDGES(*), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Graph_get(\fIcomm\fP, \fImaxindex\fP, \fImaxedges\fP, \fIindex\fP, \fIedges\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(IN) :: \fImaxindex\fP, \fImaxedges\fP + INTEGER, INTENT(OUT) :: \fIindex(maxindex)\fP, \fIedges(maxedges)\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Graph_map.3in b/ompi/mpi/man/man3/MPI_Graph_map.3in index 79f4b747be..8a1142ced4 100644 --- a/ompi/mpi/man/man3/MPI_Graph_map.3in +++ b/ompi/mpi/man/man3/MPI_Graph_map.3in @@ -19,10 +19,21 @@ int MPI_Graph_map(MPI_Comm \fIcomm\fP, int\fI nnodes\fP, const int\fI index\fP[] .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GRAPH_MAP(\fICOMM, NNODES, INDEX, EDGES, NEWRANK, IERROR\fP) INTEGER \fICOMM, NNODES, INDEX(*), EDGES(*), NEWRANK, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Graph_map(\fIcomm\fP, \fInnodes\fP, \fIindex\fP, \fIedges\fP, \fInewrank\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(IN) :: \fInnodes\fP, \fIindex(nnodes)\fP, \fIedges(*)\fP + INTEGER, INTENT(OUT) :: \fInewrank\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Graph_neighbors.3in b/ompi/mpi/man/man3/MPI_Graph_neighbors.3in index 5b0e29195d..4614682bbd 100644 --- a/ompi/mpi/man/man3/MPI_Graph_neighbors.3in +++ b/ompi/mpi/man/man3/MPI_Graph_neighbors.3in @@ -18,10 +18,21 @@ int MPI_Graph_neighbors(MPI_Comm \fIcomm\fP, int\fI rank\fP, int\fI maxneighbors .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GRAPH_NEIGHBORS(\fICOMM, RANK, MAXNEIGHBORS, NEIGHBORS, IERROR\fP) INTEGER \fICOMM, RANK, MAXNEIGHBORS, NEIGHBORS(*), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Graph_neighbors(\fIcomm\fP, \fIrank\fP, \fImaxneighbors\fP, \fIneighbors\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(IN) :: \fIrank\fP, \fImaxneighbors\fP + INTEGER, INTENT(OUT) :: \fIneighbors(maxneighbors)\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Graph_neighbors_count.3in b/ompi/mpi/man/man3/MPI_Graph_neighbors_count.3in index 14aca310a3..0ace975e36 100644 --- a/ompi/mpi/man/man3/MPI_Graph_neighbors_count.3in +++ b/ompi/mpi/man/man3/MPI_Graph_neighbors_count.3in @@ -18,10 +18,21 @@ int MPI_Graph_neighbors_count(MPI_Comm \fIcomm\fP, int\fI rank\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GRAPH_NEIGHBORS_COUNT(\fICOMM, RANK, NNEIGHBORS, IERROR\fP) INTEGER \fICOMM, RANK, NNEIGHBORS, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Graph_neighbors_count(\fIcomm\fP, \fIrank\fP, \fInneighbors\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(IN) :: \fIrank\fP + INTEGER, INTENT(OUT) :: \fInneighbors\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Graphdims_get.3in b/ompi/mpi/man/man3/MPI_Graphdims_get.3in index 298c7a2245..1e9536c133 100644 --- a/ompi/mpi/man/man3/MPI_Graphdims_get.3in +++ b/ompi/mpi/man/man3/MPI_Graphdims_get.3in @@ -17,10 +17,20 @@ int MPI_Graphdims_get(MPI_Comm \fIcomm\fP, int\fI *nnodes\fP, int\fI *nedges\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GRAPHDIMS_GET(\fICOMM, NNODES, NEDGES, IERROR\fP) INTEGER \fICOMM, NNODES, NEDGES, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Graphdims_get(\fIcomm\fP, \fInnodes\fP, \fInedges\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(OUT) :: \fInnodes\fP, \fInedges\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Grequest_complete.3in b/ompi/mpi/man/man3/MPI_Grequest_complete.3in index 9e9cd6cad1..e42b16fa85 100644 --- a/ompi/mpi/man/man3/MPI_Grequest_complete.3in +++ b/ompi/mpi/man/man3/MPI_Grequest_complete.3in @@ -17,10 +17,19 @@ int MPI_Grequest_complete(MPI_Request \fIrequest\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GREQUEST_COMPLETE(\fIREQUEST, IERROR\fP) INTEGER \fIREQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Grequest_complete(\fIrequest\fP, \fIierror\fP) + TYPE(MPI_Request), INTENT(IN) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Grequest_start.3in b/ompi/mpi/man/man3/MPI_Grequest_start.3in index 35a158608b..f96d732680 100644 --- a/ompi/mpi/man/man3/MPI_Grequest_start.3in +++ b/ompi/mpi/man/man3/MPI_Grequest_start.3in @@ -20,13 +20,27 @@ int MPI_Grequest_start(MPI_Grequest_query_function \fI*query_fn\fP, .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GREQUEST_START(\fIQUERY_FN, FREE_FN, CANCEL_FN, EXTRA_STATE, REQUEST, IERROR\fP) INTEGER \fIREQUEST, IERROR\fP EXTERNAL \fIQUERY_FN, FREE_FN, CANCEL_FN\fP INTEGER (KIND=MPI_ADDRESS_KIND) \fIEXTRA_STATE\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Grequest_start(\fIquery_fn\fP, \fIfree_fn\fP, \fIcancel_fn\fP, \fIextra_state\fP, \fIrequest\fP, + \fIierror\fP) + PROCEDURE(MPI_Grequest_query_function) :: \fIquery_fn\fP + PROCEDURE(MPI_Grequest_free_function) :: \fIfree_fn\fP + PROCEDURE(MPI_Grequest_cancel_function) :: \fIcancel_fn\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fIextra_state\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Group_compare.3in b/ompi/mpi/man/man3/MPI_Group_compare.3in index 0dec5e9bc0..d1c6d2f5d8 100644 --- a/ompi/mpi/man/man3/MPI_Group_compare.3in +++ b/ompi/mpi/man/man3/MPI_Group_compare.3in @@ -17,10 +17,20 @@ int MPI_Group_compare(MPI_Group \fIgroup1\fP, MPI_Group\fI group2\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GROUP_COMPARE(\fIGROUP1, GROUP2, RESULT, IERROR\fP) INTEGER \fIGROUP1, GROUP2, RESULT, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Group_compare(\fIgroup1\fP, \fIgroup2\fP, \fIresult\fP, \fIierror\fP) + TYPE(MPI_Group), INTENT(IN) :: \fIgroup1\fP, \fIgroup2\fP + INTEGER, INTENT(OUT) :: \fIresult\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Group_difference.3in b/ompi/mpi/man/man3/MPI_Group_difference.3in index 4d7ee72351..9ba0c03893 100644 --- a/ompi/mpi/man/man3/MPI_Group_difference.3in +++ b/ompi/mpi/man/man3/MPI_Group_difference.3in @@ -18,10 +18,20 @@ int MPI_Group_difference(MPI_Group \fIgroup1\fP, MPI_Group\fI group2\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GROUP_DIFFERENCE(\fIGROUP1, GROUP2, NEWGROUP, IERROR\fP) INTEGER \fIGROUP1, GROUP2, NEWGROUP, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Group_difference(\fIgroup1\fP, \fIgroup2\fP, \fInewgroup\fP, \fIierror\fP) + TYPE(MPI_Group), INTENT(IN) :: \fIgroup1\fP, \fIgroup2\fP + TYPE(MPI_Group), INTENT(OUT) :: \fInewgroup\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Group_excl.3in b/ompi/mpi/man/man3/MPI_Group_excl.3in index eb5ec8c053..08fcdf0537 100644 --- a/ompi/mpi/man/man3/MPI_Group_excl.3in +++ b/ompi/mpi/man/man3/MPI_Group_excl.3in @@ -19,10 +19,21 @@ int MPI_Group_excl(MPI_Group \fIgroup\fP, int\fI n\fP, const int\fI ranks\fP[], .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GROUP_EXCL(\fIGROUP, N, RANKS, NEWGROUP, IERROR\fP) INTEGER \fIGROUP, N, RANKS(*), NEWGROUP, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Group_excl(\fIgroup\fP, \fIn\fP, \fIranks\fP, \fInewgroup\fP, \fIierror\fP) + TYPE(MPI_Group), INTENT(IN) :: \fIgroup\fP + INTEGER, INTENT(IN) :: \fIn\fP, \fIranks(n)\fP + TYPE(MPI_Group), INTENT(OUT) :: \fInewgroup\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Group_free.3in b/ompi/mpi/man/man3/MPI_Group_free.3in index c406a47f37..fa255b7ec1 100644 --- a/ompi/mpi/man/man3/MPI_Group_free.3in +++ b/ompi/mpi/man/man3/MPI_Group_free.3in @@ -17,10 +17,19 @@ int MPI_Group_free(MPI_Group *\fIgroup\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GROUP_FREE(\fIGROUP, IERROR\fP) INTEGER \fIGROUP, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Group_free(\fIgroup\fP, \fIierror\fP) + TYPE(MPI_Group), INTENT(INOUT) :: \fIgroup\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Group_incl.3in b/ompi/mpi/man/man3/MPI_Group_incl.3in index 3326420cc3..1b84cdd496 100644 --- a/ompi/mpi/man/man3/MPI_Group_incl.3in +++ b/ompi/mpi/man/man3/MPI_Group_incl.3in @@ -19,10 +19,21 @@ int MPI_Group_incl(MPI_Group \fIgroup\fP, int\fI n\fP, const int\fI ranks\fP[], .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GROUP_INCL(\fIGROUP, N, RANKS, NEWGROUP, IERROR\fP) INTEGER \fIGROUP, N, RANKS(*), NEWGROUP, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Group_incl(\fIgroup\fP, \fIn\fP, \fIranks\fP, \fInewgroup\fP, \fIierror\fP) + TYPE(MPI_Group), INTENT(IN) :: \fIgroup\fP + INTEGER, INTENT(IN) :: \fIn\fP, \fIranks(n)\fP + TYPE(MPI_Group), INTENT(OUT) :: \fInewgroup\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Group_intersection.3in b/ompi/mpi/man/man3/MPI_Group_intersection.3in index 3bddcd7465..326ac3e221 100644 --- a/ompi/mpi/man/man3/MPI_Group_intersection.3in +++ b/ompi/mpi/man/man3/MPI_Group_intersection.3in @@ -18,10 +18,20 @@ int MPI_Group_intersection(MPI_Group \fIgroup1\fP, MPI_Group\fI group2\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GROUP_INTERSECTION(\fIGROUP1, GROUP2, NEWGROUP, IERROR\fP) INTEGER \fIGROUP1, GROUP2, NEWGROUP, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Group_intersection(\fIgroup1\fP, \fIgroup2\fP, \fInewgroup\fP, \fIierror\fP) + TYPE(MPI_Group), INTENT(IN) :: \fIgroup1\fP, \fIgroup2\fP + TYPE(MPI_Group), INTENT(OUT) :: \fInewgroup\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Group_range_excl.3in b/ompi/mpi/man/man3/MPI_Group_range_excl.3in index 7d4aa8c27a..9e9b26446d 100644 --- a/ompi/mpi/man/man3/MPI_Group_range_excl.3in +++ b/ompi/mpi/man/man3/MPI_Group_range_excl.3in @@ -18,10 +18,21 @@ int MPI_Group_range_excl(MPI_Group \fIgroup\fP, int\fI n\fP, int\fI ranges\fP[][ .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GROUP_RANGE_EXCL(\fIGROUP, N, RANGES, NEWGROUP, IERROR\fP) INTEGER \fIGROUP, N, RANGES(3,*), NEWGROUP, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Group_range_excl(\fIgroup\fP, \fIn\fP, \fIranges\fP, \fInewgroup\fP, \fIierror\fP) + TYPE(MPI_Group), INTENT(IN) :: \fIgroup\fP + INTEGER, INTENT(IN) :: \fIn\fP, \fIranges(3,n)\fP + TYPE(MPI_Group), INTENT(OUT) :: \fInewgroup\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Group_range_incl.3in b/ompi/mpi/man/man3/MPI_Group_range_incl.3in index 1e8f4bd5c3..16a4c260da 100644 --- a/ompi/mpi/man/man3/MPI_Group_range_incl.3in +++ b/ompi/mpi/man/man3/MPI_Group_range_incl.3in @@ -18,10 +18,21 @@ int MPI_Group_range_incl(MPI_Group \fIgroup\fP, int\fI n\fP, int\fI ranges\fP[][ .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GROUP_RANGE_INCL(\fIGROUP, N, RANGES, NEWGROUP, IERROR\fP) INTEGER \fIGROUP, N, RANGES(3,*), NEWGROUP, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Group_range_incl(\fIgroup\fP, \fIn\fP, \fIranges\fP, \fInewgroup\fP, \fIierror\fP) + TYPE(MPI_Group), INTENT(IN) :: \fIgroup\fP + INTEGER, INTENT(IN) :: \fIn\fP, \fIranges(3,n)\fP + TYPE(MPI_Group), INTENT(OUT) :: \fInewgroup\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Group_rank.3in b/ompi/mpi/man/man3/MPI_Group_rank.3in index 35f94efc58..9b1c0eeeae 100644 --- a/ompi/mpi/man/man3/MPI_Group_rank.3in +++ b/ompi/mpi/man/man3/MPI_Group_rank.3in @@ -17,10 +17,20 @@ int MPI_Group_rank(MPI_Group \fIgroup\fP, int *\fIrank\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GROUP_RANK(\fIGROUP, RANK, IERROR\fP) INTEGER \fIGROUP, RANK, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Group_rank(\fIgroup\fP, \fIrank\fP, \fIierror\fP) + TYPE(MPI_Group), INTENT(IN) :: \fIgroup\fP + INTEGER, INTENT(OUT) :: \fIrank\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Group_size.3in b/ompi/mpi/man/man3/MPI_Group_size.3in index 200312d4a6..c8d043374e 100644 --- a/ompi/mpi/man/man3/MPI_Group_size.3in +++ b/ompi/mpi/man/man3/MPI_Group_size.3in @@ -17,10 +17,20 @@ int MPI_Group_size(MPI_Group \fIgroup\fP, int \fI*size\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GROUP_SIZE(\fIGROUP, SIZE, IERROR\fP) INTEGER \fIGROUP, SIZE, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Group_size(\fIgroup\fP, \fIsize\fP, \fIierror\fP) + TYPE(MPI_Group), INTENT(IN) :: \fIgroup\fP + INTEGER, INTENT(OUT) :: \fIsize\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Group_translate_ranks.3in b/ompi/mpi/man/man3/MPI_Group_translate_ranks.3in index c700f995d2..9c28f0ee35 100644 --- a/ompi/mpi/man/man3/MPI_Group_translate_ranks.3in +++ b/ompi/mpi/man/man3/MPI_Group_translate_ranks.3in @@ -19,11 +19,22 @@ int MPI_Group_translate_ranks(MPI_Group \fIgroup1\fP, int\fI n\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GROUP_TRANSLATE_RANKS(\fIGROUP1, N, RANKS1, GROUP2, RANKS2, IERROR\fP) INTEGER \fIGROUP1, N, RANKS1(*), GROUP2, RANKS2(*), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Group_translate_ranks(\fIgroup1\fP, \fIn\fP, \fIranks1\fP, \fIgroup2\fP, \fIranks2\fP, \fIierror\fP) + TYPE(MPI_Group), INTENT(IN) :: \fIgroup1\fP, \fIgroup2\fP + INTEGER, INTENT(IN) :: \fIn\fP, \fIranks1(n)\fP + INTEGER, INTENT(OUT) :: \fIranks2(n)\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Group_union.3in b/ompi/mpi/man/man3/MPI_Group_union.3in index 028f9d35f1..5258505e8f 100644 --- a/ompi/mpi/man/man3/MPI_Group_union.3in +++ b/ompi/mpi/man/man3/MPI_Group_union.3in @@ -18,10 +18,20 @@ int MPI_Group_union(MPI_Group \fIgroup1\fP, MPI_Group \fIgroup2\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_GROUP_UNION(\fIGROUP1, GROUP2, NEWGROUP, IERROR\fP) INTEGER \fIGROUP1, GROUP2, NEWGROUP, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Group_union(\fIgroup1\fP, \fIgroup2\fP, \fInewgroup\fP, \fIierror\fP) + TYPE(MPI_Group), INTENT(IN) :: \fIgroup1\fP, \fIgroup2\fP + TYPE(MPI_Group), INTENT(OUT) :: \fInewgroup\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Ibsend.3in b/ompi/mpi/man/man3/MPI_Ibsend.3in index e061c23ee4..949ae42f2e 100644 --- a/ompi/mpi/man/man3/MPI_Ibsend.3in +++ b/ompi/mpi/man/man3/MPI_Ibsend.3in @@ -19,11 +19,24 @@ int MPI_Ibsend(const void *\fIbuf\fP, int\fI count\fP, MPI_Datatype\fI datatype\ .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_IBSEND(\fIBUF, COUNT, DATATYPE, DEST, TAG, COMM, REQUEST, IERROR\fP) \fIBUF\fP(*) INTEGER \fICOUNT, DATATYPE, DEST, TAG, COMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Ibsend(\fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIdest\fP, \fItag\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP, \fIdest\fP, \fItag\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Improbe.3in b/ompi/mpi/man/man3/MPI_Improbe.3in index 9abfcdf8c8..680dd04219 100644 --- a/ompi/mpi/man/man3/MPI_Improbe.3in +++ b/ompi/mpi/man/man3/MPI_Improbe.3in @@ -19,12 +19,25 @@ int MPI_Improbe(int \fIsource\fP, int\fI tag\fP, MPI_Comm\fI comm\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_IMPROBE(\fISOURCE, TAG, COMM, FLAG, MESSAGE, STATUS, IERROR\fP) LOGICAL \fIFLAG\fP INTEGER \fISOURCE, TAG, COMM, MESSAGE\fP INTEGER \fISTATUS(MPI_STATUS_SIZE), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Improbe(\fIsource\fP, \fItag\fP, \fIcomm\fP, \fIflag\fP, \fImessage\fP, \fIstatus\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIsource\fP, \fItag\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(OUT) :: \fIflag\fP + TYPE(MPI_Message), INTENT(OUT) :: \fImessage\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Imrecv.3in b/ompi/mpi/man/man3/MPI_Imrecv.3in index 8d0dc0aedf..be03249846 100644 --- a/ompi/mpi/man/man3/MPI_Imrecv.3in +++ b/ompi/mpi/man/man3/MPI_Imrecv.3in @@ -18,11 +18,24 @@ int MPI_Imrecv(void \fI*buf\fP, int\fI count\fP, MPI_Datatype\fI type\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_IMRECV(\fIBUF, COUNT, DATATYPE, MESSAGE, REQUEST, IERROR\fP) \fIBUF(*)\fP INTEGER \fCOUNT, DATATYPE, MESSAGE, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Imrecv(\fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fImessage\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Message), INTENT(INOUT) :: \fImessage\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Info_create.3in b/ompi/mpi/man/man3/MPI_Info_create.3in index 624c0cf6d3..2791f2004b 100644 --- a/ompi/mpi/man/man3/MPI_Info_create.3in +++ b/ompi/mpi/man/man3/MPI_Info_create.3in @@ -17,10 +17,19 @@ int MPI_Info_create(MPI_Info \fI*info\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_INFO_CREATE(\fIINFO, IERROR\fP) INTEGER \fIINFO, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Info_create(\fIinfo\fP, \fIierror\fP) + TYPE(MPI_Info), INTENT(OUT) :: \fIinfo\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Info_delete.3in b/ompi/mpi/man/man3/MPI_Info_delete.3in index fa2bdc389e..d963757e81 100644 --- a/ompi/mpi/man/man3/MPI_Info_delete.3in +++ b/ompi/mpi/man/man3/MPI_Info_delete.3in @@ -18,11 +18,21 @@ int MPI_Info_delete(MPI_Info \fIinfo\fP, const char \fI*key\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_INFO_DELETE(\fIINFO, KEY, IERROR\fP) INTEGER \fIINFO, IERROR\fP CHARACTER*(*) \fIKEY\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Info_delete(\fIinfo\fP, \fIkey\fP, \fIierror\fP) + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + CHARACTER(LEN=*), INTENT(IN) :: \fIkey\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Info_dup.3in b/ompi/mpi/man/man3/MPI_Info_dup.3in index 7cd21f587b..0a74570420 100644 --- a/ompi/mpi/man/man3/MPI_Info_dup.3in +++ b/ompi/mpi/man/man3/MPI_Info_dup.3in @@ -17,10 +17,20 @@ int MPI_Info_dup(MPI_Info \fIinfo\fP, MPI_Info \fI*newinfo\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_INFO_DUP(\fIINFO, NEWINFO, IERROR\fP) INTEGER \fIINFO, NEWINFO, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Info_dup(\fIinfo\fP, \fInewinfo\fP, \fIierror\fP) + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + TYPE(MPI_Info), INTENT(OUT) :: \fInewinfo\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Info_free.3in b/ompi/mpi/man/man3/MPI_Info_free.3in index 2b851402ea..25963d3b83 100644 --- a/ompi/mpi/man/man3/MPI_Info_free.3in +++ b/ompi/mpi/man/man3/MPI_Info_free.3in @@ -17,10 +17,19 @@ int MPI_Info_free(MPI_Info \fI*info\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_INFO_FREE(\fIINFO, IERROR\fP) INTEGER \fIINFO, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Info_free(\fIinfo\fP, \fIierror\fP) + TYPE(MPI_Info), INTENT(INOUT) :: \fIinfo\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Info_get.3in b/ompi/mpi/man/man3/MPI_Info_get.3in index cdb9534d25..375b3eec73 100644 --- a/ompi/mpi/man/man3/MPI_Info_get.3in +++ b/ompi/mpi/man/man3/MPI_Info_get.3in @@ -18,12 +18,25 @@ int MPI_Info_get(MPI_Info \fIinfo\fP, const char \fI*key\fP, int \fIvaluelen\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_INFO_GET(\fIINFO, KEY, VALUELEN, VALUE, FLAG, IERROR\fP) INTEGER \fIINFO, VALUELEN, IERROR\fP CHARACTER*(*) \fIKEY, VALUE\fP LOGICAL \fIFLAG\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Info_get(\fIinfo\fP, \fIkey\fP, \fIvaluelen\fP, \fIvalue\fP, \fIflag\fP, \fIierror\fP) + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + CHARACTER(LEN=*), INTENT(IN) :: \fIkey\fP + INTEGER, INTENT(IN) :: \fIvaluelen\fP + CHARACTER(LEN=valuelen), INTENT(OUT) :: \fIvalue\fP + LOGICAL, INTENT(OUT) :: \fIflag\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Info_get_nkeys.3in b/ompi/mpi/man/man3/MPI_Info_get_nkeys.3in index 735e5db283..d3f737d414 100644 --- a/ompi/mpi/man/man3/MPI_Info_get_nkeys.3in +++ b/ompi/mpi/man/man3/MPI_Info_get_nkeys.3in @@ -17,10 +17,20 @@ int MPI_Info_get_nkeys(MPI_Info \fIinfo\fP, int \fI*nkeys\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_INFO_GET_NKEYS(\fIINFO, NKEYS, IERROR\fP) INTEGER \fIINFO, NKEYS, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Info_get_nkeys(\fIinfo\fP, \fInkeys\fP, \fIierror\fP) + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + INTEGER, INTENT(OUT) :: \fInkeys\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Info_get_nthkey.3in b/ompi/mpi/man/man3/MPI_Info_get_nthkey.3in index 1137337e52..bde9a1797c 100644 --- a/ompi/mpi/man/man3/MPI_Info_get_nthkey.3in +++ b/ompi/mpi/man/man3/MPI_Info_get_nthkey.3in @@ -17,11 +17,22 @@ int MPI_Info_get_nthkey(MPI_Info \fIinfo\fP, int \fIn\fP, char \fI*key\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_INFO_GET_NTHKEY(\fIINFO, N, KEY, IERROR\fP) INTEGER \fIINFO, N, IERROR\fP CHARACTER*(*) \fIKEY\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Info_get_nthkey(\fIinfo\fP, \fIn\fP, \fIkey\fP, \fIierror\fP) + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + INTEGER, INTENT(IN) :: \fIn\fP + CHARACTER(LEN=*), INTENT(OUT) :: \fIkey\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Info_get_valuelen.3in b/ompi/mpi/man/man3/MPI_Info_get_valuelen.3in index 6ede6b3761..fc77ff6d76 100644 --- a/ompi/mpi/man/man3/MPI_Info_get_valuelen.3in +++ b/ompi/mpi/man/man3/MPI_Info_get_valuelen.3in @@ -19,12 +19,24 @@ int MPI_Info_get_valuelen(MPI_Info \fIinfo\fP, const char \fI*key\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_INFO_GET_VALUELEN(\fIINFO, KEY, VALUELEN, FLAG, IERROR\fP) INTEGER \fIINFO, VALUELEN, IERROR\fP LOGICAL \fIFLAG\fP CHARACTER*(*) \fIKEY\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Info_get_valuelen(\fIinfo\fP, \fIkey\fP, \fIvaluelen\fP, \fIflag\fP, \fIierror\fP) + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + CHARACTER(LEN=*), INTENT(IN) :: \fIkey\fP + INTEGER, INTENT(OUT) :: \fIvaluelen\fP + LOGICAL, INTENT(OUT) :: \fIflag\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Info_set.3in b/ompi/mpi/man/man3/MPI_Info_set.3in index 705aeb83f3..2c1f146481 100644 --- a/ompi/mpi/man/man3/MPI_Info_set.3in +++ b/ompi/mpi/man/man3/MPI_Info_set.3in @@ -17,11 +17,21 @@ int MPI_Info_set(MPI_Info \fIinfo\fP, char \fI*key\fP, char \fI*value\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_INFO_SET(\fIINFO, KEY, VALUE, IERROR\fP) INTEGER \fIINFO, IERROR\fP CHARACTER*(*) \fIKEY, VALUE\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Info_set(\fIinfo\fP, \fIkey\fP, \fIvalue\fP, \fIierror\fP) + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + CHARACTER(LEN=*), INTENT(IN) :: \fIkey\fP, \fIvalue\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Init.3in b/ompi/mpi/man/man3/MPI_Init.3in index 603170260e..6d7a7f2d99 100644 --- a/ompi/mpi/man/man3/MPI_Init.3in +++ b/ompi/mpi/man/man3/MPI_Init.3in @@ -19,10 +19,18 @@ int MPI_Init(int *\fIargc\fP, char ***\fIargv\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_INIT(\fIIERROR\fP) INTEGER \fIIERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Init(\fIierror\fP) + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Init_thread.3in b/ompi/mpi/man/man3/MPI_Init_thread.3in index 2362235804..8485422cda 100644 --- a/ompi/mpi/man/man3/MPI_Init_thread.3in +++ b/ompi/mpi/man/man3/MPI_Init_thread.3in @@ -20,10 +20,20 @@ int MPI_Init_thread(int *\fIargc\fP, char ***\fIargv\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_INIT_THREAD(\fIREQUIRED, PROVIDED, IERROR\fP) INTEGER \fIREQUIRED, PROVIDED, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Init_thread(\fIrequired\fP, \fIprovided\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIrequired\fP + INTEGER, INTENT(OUT) :: \fIprovided\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Initialized.3in b/ompi/mpi/man/man3/MPI_Initialized.3in index 215967912b..cd23ec3827 100644 --- a/ompi/mpi/man/man3/MPI_Initialized.3in +++ b/ompi/mpi/man/man3/MPI_Initialized.3in @@ -17,11 +17,20 @@ int MPI_Initialized(int *\fIflag\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_INITIALIZED(\fIFLAG, IERROR\fP) LOGICAL \fIFLAG\fP INTEGER \fIIERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Initialized(\fIflag\fP, \fIierror\fP) + LOGICAL, INTENT(OUT) :: \fIflag\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Intercomm_create.3in b/ompi/mpi/man/man3/MPI_Intercomm_create.3in index 23c32baee8..77f4476c77 100644 --- a/ompi/mpi/man/man3/MPI_Intercomm_create.3in +++ b/ompi/mpi/man/man3/MPI_Intercomm_create.3in @@ -18,12 +18,24 @@ int MPI_Intercomm_create(MPI_Comm \fIlocal_comm\fP, int\fI local_leader\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_INTERCOMM_CREATE(\fILOCAL_COMM, LOCAL_LEADER, PEER_COMM, REMOTE_LEADER, TAG, NEWINTERCOMM, IERROR\fP) INTEGER \fILOCAL_COMM, LOCAL_LEADER, PEER_COMM, REMOTE_LEADER\fP INTEGER \fITAG, NEWINTERCOMM, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Intercomm_create(\fIlocal_comm\fP, \fIlocal_leader\fP, \fIpeer_comm\fP, \fIremote_leader\fP, + \fItag\fP, \fInewintercomm\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIlocal_comm\fP, \fIpeer_comm\fP + INTEGER, INTENT(IN) :: \fIlocal_leader\fP, \fIremote_leader\fP, \fItag\fP + TYPE(MPI_Comm), INTENT(OUT) :: \fInewintercomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Intercomm_merge.3in b/ompi/mpi/man/man3/MPI_Intercomm_merge.3in index 6d1e2b2a32..cf5f25e220 100644 --- a/ompi/mpi/man/man3/MPI_Intercomm_merge.3in +++ b/ompi/mpi/man/man3/MPI_Intercomm_merge.3in @@ -18,11 +18,22 @@ int MPI_Intercomm_merge(MPI_Comm \fIintercomm\fP, int\fI high\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_INTERCOMM_MERGE(\fIINTERCOMM, HIGH, NEWINTRACOMM, IERROR\fP) INTEGER \fIINTERCOMM, NEWINTRACOMM, IERROR\fP LOGICAL \fIHIGH\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Intercomm_merge(\fIintercomm\fP, \fIhigh\fP, \fInewintracomm\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIintercomm\fP + LOGICAL, INTENT(IN) :: \fIhigh\fP + TYPE(MPI_Comm), INTENT(OUT) :: \fInewintracomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Iprobe.3in b/ompi/mpi/man/man3/MPI_Iprobe.3in index 3d09716a85..b07ed63dcd 100644 --- a/ompi/mpi/man/man3/MPI_Iprobe.3in +++ b/ompi/mpi/man/man3/MPI_Iprobe.3in @@ -18,11 +18,23 @@ int MPI_Iprobe(int \fIsource\fP, int\fI tag\fP, MPI_Comm\fI comm\fP, int\fI *fla .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_IPROBE(\fISOURCE, TAG, COMM, FLAG, STATUS, IERROR\fP) LOGICAL \fIFLAG\fP INTEGER \fISOURCE, TAG, COMM, STATUS(MPI_STATUS_SIZE), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Iprobe(\fIsource\fP, \fItag\fP, \fIcomm\fP, \fIflag\fP, \fIstatus\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIsource\fP, \fItag\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + LOGICAL, INTENT(OUT) :: \fIflag\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Irecv.3in b/ompi/mpi/man/man3/MPI_Irecv.3in index ccbad0d95f..80beda4b23 100644 --- a/ompi/mpi/man/man3/MPI_Irecv.3in +++ b/ompi/mpi/man/man3/MPI_Irecv.3in @@ -18,12 +18,25 @@ int MPI_Irecv(void *\fIbuf\fP, int\fI count\fP, MPI_Datatype\fI datatype\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_IRECV(\fIBUF, COUNT, DATATYPE, SOURCE, TAG, COMM, REQUEST, IERROR\fP) \fIBUF\fP(*) INTEGER \fICOUNT, DATATYPE, SOURCE, TAG, COMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Irecv(\fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIsource\fP, \fItag\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP, \fIsource\fP, \fItag\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Irsend.3in b/ompi/mpi/man/man3/MPI_Irsend.3in index fbc144a208..e09b6be49f 100644 --- a/ompi/mpi/man/man3/MPI_Irsend.3in +++ b/ompi/mpi/man/man3/MPI_Irsend.3in @@ -19,11 +19,24 @@ int MPI_Irsend(const void *\fIbuf\fP, int\fI count\fP, MPI_Datatype\fI datatype\ .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_IRSEND(\fIBUF, COUNT, DATATYPE, DEST, TAG, COMM, REQUEST, IERROR\fP) \fIBUF\fP(*) INTEGER \fICOUNT, DATATYPE, DEST, TAG, COMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Irsend(\fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIdest\fP, \fItag\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP, \fIdest\fP, \fItag\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Is_thread_main.3in b/ompi/mpi/man/man3/MPI_Is_thread_main.3in index 86ef8daa4a..56fc438c5c 100644 --- a/ompi/mpi/man/man3/MPI_Is_thread_main.3in +++ b/ompi/mpi/man/man3/MPI_Is_thread_main.3in @@ -18,11 +18,20 @@ int MPI_Is_thread_main(int *\fIflag\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_IS_THREAD_MAIN(\fIFLAG, IERROR\fP) LOGICAL \fIFLAG\fP INTEGER \fIIERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Is_thread_main(\fIflag\fP, \fIierror\fP) + LOGICAL, INTENT(OUT) :: \fIflag\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Isend.3in b/ompi/mpi/man/man3/MPI_Isend.3in index d5a40f2ea6..9bb3bdf551 100644 --- a/ompi/mpi/man/man3/MPI_Isend.3in +++ b/ompi/mpi/man/man3/MPI_Isend.3in @@ -19,11 +19,24 @@ int MPI_Isend(const void *\fIbuf\fP, int\fI count\fP, MPI_Datatype\fI datatype\f .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_ISEND(\fIBUF, COUNT, DATATYPE, DEST, TAG, COMM, REQUEST, IERROR\fP) \fIBUF\fP(*) INTEGER \fICOUNT, DATATYPE, DEST, TAG, COMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Isend(\fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIdest\fP, \fItag\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP, \fIdest\fP, \fItag\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Issend.3in b/ompi/mpi/man/man3/MPI_Issend.3in index 0e8e4be487..232ea8ebd3 100644 --- a/ompi/mpi/man/man3/MPI_Issend.3in +++ b/ompi/mpi/man/man3/MPI_Issend.3in @@ -19,11 +19,24 @@ int MPI_Issend(const void *\fIbuf\fP, int\fI count\fP, MPI_Datatype\fI datatype\ .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_ISSEND(\fIBUF, COUNT, DATATYPE, DEST, TAG, COMM, REQUEST, IERROR\fP) \fIBUF\fP(*) INTEGER \fICOUNT, DATATYPE, DEST, TAG, COMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Issend(\fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIdest\fP, \fItag\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP, \fIdest\fP, \fItag\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Lookup_name.3in b/ompi/mpi/man/man3/MPI_Lookup_name.3in index ed944e4979..43413e92bf 100644 --- a/ompi/mpi/man/man3/MPI_Lookup_name.3in +++ b/ompi/mpi/man/man3/MPI_Lookup_name.3in @@ -23,11 +23,22 @@ int MPI_Lookup_name(const char *\fIservice_name\fP, MPI_Info \fIinfo\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_LOOKUP_NAME(\fISERVICE_NAME, INFO, PORT_NAME, IERROR\fP) CHARACTER*(*) \fISERVICE_NAME, PORT_NAME\fP INTEGER \fIINFO, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Lookup_name(\fIservice_name\fP, \fIinfo\fP, \fIport_name\fP, \fIierror\fP) + CHARACTER(LEN=*), INTENT(IN) :: \fIservice_name\fP + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + CHARACTER(LEN=MPI_MAX_PORT_NAME), INTENT(OUT) :: \fIport_name\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Mprobe.3in b/ompi/mpi/man/man3/MPI_Mprobe.3in index 7b8a8e87d6..d06790ccdb 100644 --- a/ompi/mpi/man/man3/MPI_Mprobe.3in +++ b/ompi/mpi/man/man3/MPI_Mprobe.3in @@ -19,11 +19,23 @@ int MPI_Mprobe(int \fIsource\fP, int\fI tag\fP, MPI_Comm\fI comm\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_MPROBE(\fISOURCE, TAG, COMM, MESSAGE, STATUS, IERROR\fP) INTEGER \fISOURCE, TAG, COMM, MESSAGE\fP INTEGER \fISTATUS(MPI_STATUS_SIZE), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Mprobe(\fIsource\fP, \fItag\fP, \fIcomm\fP, \fImessage\fP, \fIstatus\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIsource\fP, \fItag\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Message), INTENT(OUT) :: \fImessage\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Mrecv.3in b/ompi/mpi/man/man3/MPI_Mrecv.3in index d8005e8b15..e0f34f8ed6 100644 --- a/ompi/mpi/man/man3/MPI_Mrecv.3in +++ b/ompi/mpi/man/man3/MPI_Mrecv.3in @@ -18,12 +18,25 @@ int MPI_Mrecv(void \fI*buf\fP, int\fI count\fP, MPI_Datatype\fI type\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_MRECV(\fIBUF, COUNT, DATATYPE, MESSAGE, STATUS, IERROR\fP) \fIBUF(*)\fP INTEGER \fCOUNT, DATATYPE, MESSAGE\fP INTEGER \fISTATUS(MPI_STATUS_SIZE), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Mrecv(\fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fImessage\fP, \fIstatus\fP, \fIierror\fP) + TYPE(*), DIMENSION(..) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Message), INTENT(INOUT) :: \fImessage\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Neighbor_allgather.3in b/ompi/mpi/man/man3/MPI_Neighbor_allgather.3in index eb77e457e2..74aee8799e 100644 --- a/ompi/mpi/man/man3/MPI_Neighbor_allgather.3in +++ b/ompi/mpi/man/man3/MPI_Neighbor_allgather.3in @@ -24,7 +24,8 @@ int MPI_Ineighbor_allgather(const void\fI *sendbuf\fP, int \fI sendcount\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_NEIGHBOR_ALLGATHER(\fISENDBUF\fP,\fI SENDCOUNT\fP,\fI SENDTYPE\fP,\fI RECVBUF\fP,\fI RECVCOUNT\fP,\fI RECVTYPE\fP,\fI COMM\fP,\fI IERROR\fP) \fISENDBUF\fP (*), \fIRECVBUF\fP (*) @@ -37,6 +38,28 @@ MPI_INEIGHBOR_ALLGATHER(\fISENDBUF\fP,\fI SENDCOUNT\fP,\fI SENDTYPE\fP,\fI RECVB INTEGER \fISENDCOUNT\fP,\fI SENDTYPE\fP,\fI RECVCOUNT\fP,\fI RECVTYPE\fP,\fI COMM\fP, INTEGER \fIREQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +USE mpi_f08 +MPI_Neighbor_allgather(\fIsendbuf\fP, \fIsendcount\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcount\fP, + \fIrecvtype\fP, \fIcomm\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIsendbuf\fP + TYPE(*), DIMENSION(..) :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcount\fP, \fIrecvcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Ineighbor_allgather(\fIsendbuf\fP, \fIsendcount\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcount\fP, + \fIrecvtype\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIsendbuf\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcount\fP, \fIrecvcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Neighbor_allgatherv.3in b/ompi/mpi/man/man3/MPI_Neighbor_allgatherv.3in index bccba31ecc..fdc3e02d15 100644 --- a/ompi/mpi/man/man3/MPI_Neighbor_allgatherv.3in +++ b/ompi/mpi/man/man3/MPI_Neighbor_allgatherv.3in @@ -25,7 +25,8 @@ int MPI_Ineighbor_allgatherv(const void\fI *sendbuf\fP, int\fI sendcount\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_NEIGHBOR_ALLGATHERV(\fISENDBUF\fP,\fI SENDCOUNT\fP, \fISENDTYPE\fP,\fI RECVBUF\fP, \fIRECVCOUNT\fP,\fI DISPLS\fP, \fIRECVTYPE\fP,\fI COMM\fP,\fI IERROR\fP) \fISENDBUF\fP(*), \fIRECVBUF\fP(*) @@ -38,6 +39,30 @@ MPI_INEIGHBOR_ALLGATHERV(\fISENDBUF\fP,\fI SENDCOUNT\fP, \fISENDTYPE\fP,\fI RECV INTEGER \fISENDCOUNT\fP,\fI SENDTYPE\fP, \fIRECVCOUNT\fP(*), INTEGER \fIDISPLS\fP(*),\fI RECVTYPE\fP,\fI COMM\fP,\fIREQUEST\fP,\fI IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Neighbor_allgatherv(\fIsendbuf\fP, \fIsendcount\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcounts\fP, + \fIdispls\fP, \fIrecvtype\fP, \fIcomm\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIsendbuf\fP + TYPE(*), DIMENSION(..) :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcount\fP, \fIrecvcounts(*)\fP, \fIdispls(*)\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Ineighbor_allgatherv(\fIsendbuf\fP, \fIsendcount\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcounts\fP, + \fIdispls\fP, \fIrecvtype\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIsendbuf\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcount\fP + INTEGER, INTENT(IN), ASYNCHRONOUS :: \fIrecvcounts(*)\fP, \fIdispls(*)\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Neighbor_alltoall.3in b/ompi/mpi/man/man3/MPI_Neighbor_alltoall.3in index 79e662f9e2..2f867a82ec 100644 --- a/ompi/mpi/man/man3/MPI_Neighbor_alltoall.3in +++ b/ompi/mpi/man/man3/MPI_Neighbor_alltoall.3in @@ -26,7 +26,8 @@ int MPI_Ineighbor_alltoall(const void *\fIsendbuf\fP, int \fIsendcount\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_NEIGHBOR_ALLTOALL(\fISENDBUF, SENDCOUNT, SENDTYPE, RECVBUF, RECVCOUNT, RECVTYPE, COMM, IERROR\fP) @@ -41,6 +42,31 @@ MPI_INEIGHBOR_ALLTOALL(\fISENDBUF, SENDCOUNT, SENDTYPE, RECVBUF, RECVCOUNT, INTEGER \fISENDCOUNT, SENDTYPE, RECVCOUNT, RECVTYPE\fP INTEGER \fICOMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Neighbor_alltoall(\fIsendbuf\fP, \fIsendcount\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcount\fP, + \fIrecvtype\fP, \fIcomm\fP, \fIierror\fP) + + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIsendbuf\fP + TYPE(*), DIMENSION(..) :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcount\fP, \fIrecvcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Ineighbor_alltoall(\fIsendbuf\fP, \fIsendcount\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcount\fP, + \fIrecvtype\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIsendbuf\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcount\fP, \fIrecvcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Neighbor_alltoallv.3in b/ompi/mpi/man/man3/MPI_Neighbor_alltoallv.3in index 1bc4d9ce6c..202c49a49d 100644 --- a/ompi/mpi/man/man3/MPI_Neighbor_alltoallv.3in +++ b/ompi/mpi/man/man3/MPI_Neighbor_alltoallv.3in @@ -28,7 +28,8 @@ int MPI_Ineighbor_alltoallv(const void *\fIsendbuf\fP, const int \fIsendcounts\f .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_NEIGHBOR_ALLTOALLV(\fISENDBUF, SENDCOUNTS, SDISPLS, SENDTYPE, RECVBUF, RECVCOUNTS, RDISPLS, RECVTYPE, COMM, IERROR\fP) @@ -46,6 +47,33 @@ MPI_INEIGHBOR_ALLTOALLV(\fISENDBUF, SENDCOUNTS, SDISPLS, SENDTYPE, INTEGER \fIRECVCOUNTS(*), RDISPLS(*), RECVTYPE\fP INTEGER \fICOMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Neighbor_alltoallv(\fIsendbuf\fP, \fIsendcounts\fP, \fIsdispls\fP, \fIsendtype\fP, \fIrecvbuf\fP, + \fIrecvcounts\fP, \fIrdispls\fP, \fIrecvtype\fP, \fIcomm\fP, \fIierror\fP) + + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIsendbuf\fP + TYPE(*), DIMENSION(..) :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcounts(*)\fP, \fIsdispls(*)\fP, \fIrecvcounts(*),\fP + \fIrdispls(*)\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Ineighbor_alltoallv(\fIsendbuf\fP, \fIsendcounts\fP, \fIsdispls\fP, \fIsendtype\fP, \fIrecvbuf\fP, + \fIrecvcounts\fP, \fIrdispls\fP, \fIrecvtype\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIsendbuf\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIrecvbuf\fP + INTEGER, INTENT(IN), ASYNCHRONOUS :: \fIsendcounts(*)\fP, \fIsdispls(*),\fP + \fIrecvcounts(*)\fP, \fIrdispls(*)\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Neighbor_alltoallw.3in b/ompi/mpi/man/man3/MPI_Neighbor_alltoallw.3in index 7dcfdbc9a9..5dc22abe03 100644 --- a/ompi/mpi/man/man3/MPI_Neighbor_alltoallw.3in +++ b/ompi/mpi/man/man3/MPI_Neighbor_alltoallw.3in @@ -28,7 +28,8 @@ int MPI_Ineighbor_alltoallw(const void *\fIsendbuf\fP, const int \fIsendcounts\f .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_NEIGHBOR_ALLTOALLW(\fISENDBUF, SENDCOUNTS, SDISPLS, SENDTYPES, RECVBUF, RECVCOUNTS, RDISPLS, RECVTYPES, COMM, IERROR\fP) @@ -45,6 +46,35 @@ MPI_INEIGHBOR_ALLTOALLW(\fISENDBUF, SENDCOUNTS, SDISPLS, SENDTYPES, INTEGER \fIRECVCOUNTS(*), RDISPLS(*), RECVTYPES(*)\fP INTEGER \fICOMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Neighbor_alltoallw(\fIsendbuf\fP, \fIsendcounts\fP, \fIsdispls\fP, \fIsendtypes\fP, \fIrecvbuf\fP, + \fIrecvcounts\fP, \fIrdispls\fP, \fIrecvtypes\fP, \fIcomm\fP, \fIierror\fP) + + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIsendbuf\fP + TYPE(*), DIMENSION(..) :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcounts(*)\fP, \fIrecvcounts(*)\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fIsdispls(*)\fP, \fIrdispls(*)\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtypes(*)\fP, \fIrecvtypes(*)\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Ineighbor_alltoallw(\fIsendbuf\fP, \fIsendcounts\fP, \fIsdispls\fP, \fIsendtypes\fP, \fIrecvbuf\fP, + \fIrecvcounts\fP, \fIrdispls\fP, \fIrecvtypes\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIsendbuf\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIrecvbuf\fP + INTEGER, INTENT(IN), ASYNCHRONOUS :: \fIsendcounts(*)\fP, \fIrecvcounts(*)\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN), ASYNCHRONOUS :: + \fIsdispls(*)\fP, \fIrdispls(*)\fP + TYPE(MPI_Datatype), INTENT(IN), ASYNCHRONOUS :: \fIsendtypes(*),\fP + \fIrecvtypes(*)\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Op_create.3in b/ompi/mpi/man/man3/MPI_Op_create.3in index 9c6aa61bb5..126e690fae 100644 --- a/ompi/mpi/man/man3/MPI_Op_create.3in +++ b/ompi/mpi/man/man3/MPI_Op_create.3in @@ -18,12 +18,23 @@ int MPI_Op_create(MPI_User_function *\fIfunction\fP, int\fI commute\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_OP_CREATE(\fIFUNCTION, COMMUTE, OP, IERROR\fP) EXTERNAL \fIFUNCTION\fP LOGICAL \fICOMMUTE\fP INTEGER \fIOP, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Op_create(\fIuser_fn\fP, \fIcommute\fP, \fIop\fP, \fIierror\fP) + PROCEDURE(MPI_User_function) :: \fIuser_fn\fP + LOGICAL, INTENT(IN) :: \fIcommute\fP + TYPE(MPI_Op), INTENT(OUT) :: \fIop\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Op_free.3in b/ompi/mpi/man/man3/MPI_Op_free.3in index 4573682d2f..3f12201f73 100644 --- a/ompi/mpi/man/man3/MPI_Op_free.3in +++ b/ompi/mpi/man/man3/MPI_Op_free.3in @@ -17,10 +17,19 @@ int MPI_Op_free(MPI_Op *\fIop\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_OP_FREE(\fIOP, IERROR\fP) INTEGER \fIOP, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Op_free(\fIop\fP, \fIierror\fP) + TYPE(MPI_Op), INTENT(INOUT) :: \fIop\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Open_port.3in b/ompi/mpi/man/man3/MPI_Open_port.3in index be8040b17c..2d4e8ce298 100644 --- a/ompi/mpi/man/man3/MPI_Open_port.3in +++ b/ompi/mpi/man/man3/MPI_Open_port.3in @@ -17,11 +17,21 @@ int MPI_Open_port(MPI_Info \fIinfo\fP, char *\fIport_name\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_OPEN_PORT(\fIINFO, PORT_NAME, IERROR\fP) CHARACTER*(*) \fIPORT_NAME\fP INTEGER \fIINFO, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Open_port(\fIinfo\fP, \fIport_name\fP, \fIierror\fP) + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + CHARACTER(LEN=MPI_MAX_PORT_NAME), INTENT(OUT) :: \fIport_name\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Pack.3in b/ompi/mpi/man/man3/MPI_Pack.3in index 25eb7ab345..d1cbfb4072 100644 --- a/ompi/mpi/man/man3/MPI_Pack.3in +++ b/ompi/mpi/man/man3/MPI_Pack.3in @@ -19,12 +19,26 @@ int MPI_Pack(const void *\fIinbuf\fP, int\fI incount\fP, MPI_Datatype\fI datatyp .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_PACK(\fIINBUF, INCOUNT, DATATYPE, OUTBUF,OUTSIZE, POSITION, COMM, IERROR\fP) \fIINBUF(*), OUTBUF(*)\fP INTEGER \fIINCOUNT, DATATYPE, OUTSIZE, POSITION, COMM, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Pack(\fIinbuf\fP, \fIincount\fP, \fIdatatype\fP, \fIoutbuf\fP, \fIoutsize\fP, \fIposition\fP, \fIcomm\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIinbuf\fP + TYPE(*), DIMENSION(..) :: \fIoutbuf\fP + INTEGER, INTENT(IN) :: \fIincount\fP, \fIoutsize\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER, INTENT(INOUT) :: \fIposition\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Pack_external.3in b/ompi/mpi/man/man3/MPI_Pack_external.3in index 5393202f6b..1e0771f553 100644 --- a/ompi/mpi/man/man3/MPI_Pack_external.3in +++ b/ompi/mpi/man/man3/MPI_Pack_external.3in @@ -23,7 +23,8 @@ int MPI_Pack_external(const char *\fIdatarep\fP, const void *\fIinbuf\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_PACK_EXTERNAL(\fIDATAREP, INBUF, INCOUNT, DATATYPE, OUTBUF, OUTSIZE, POSITION, IERROR\fP) @@ -32,6 +33,21 @@ MPI_PACK_EXTERNAL(\fIDATAREP, INBUF, INCOUNT, DATATYPE, CHARACTER*(*) \fIDATAREP\fP \fIINBUF(*), OUTBUF(*)\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Pack_external(\fIdatarep\fP, \fIinbuf\fP, \fIincount\fP, \fIdatatype\fP, \fIoutbuf\fP, \fIoutsize\fP, + \fIposition\fP, \fIierror\fP) + CHARACTER(LEN=*), INTENT(IN) :: \fIdatarep\fP + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIinbuf\fP + TYPE(*), DIMENSION(..) :: \fIoutbuf\fP + INTEGER, INTENT(IN) :: \fIincount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fIoutsize\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(INOUT) :: \fIposition\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Pack_external_size.3in b/ompi/mpi/man/man3/MPI_Pack_external_size.3in index ded2e8a78c..4c6f932bdd 100644 --- a/ompi/mpi/man/man3/MPI_Pack_external_size.3in +++ b/ompi/mpi/man/man3/MPI_Pack_external_size.3in @@ -21,13 +21,25 @@ int MPI_Pack_external_size(char *\fIdatarep\fP, int \fIincount\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_PACK_EXTERNAL_SIZE(\fIDATAREP, INCOUNT, DATATYPE, SIZE, IERROR\fP) INTEGER \fIINCOUNT, DATATYPE, IERROR\fP INTEGER (KIND=MPI_ADDRESS_KIND) \fISIZE\fP CHARACTER*(*) \fIDATAREP\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Pack_external_size(\fIdatarep\fP, \fIincount\fP, \fIdatatype\fP, \fIsize\fP, \fIierror\fP) + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER, INTENT(IN) :: \fIincount\fP + CHARACTER(LEN=*), INTENT(IN) :: \fIdatarep\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(OUT) :: \fIsize\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Pack_size.3in b/ompi/mpi/man/man3/MPI_Pack_size.3in index 8a38b4bccf..e2e9648c82 100644 --- a/ompi/mpi/man/man3/MPI_Pack_size.3in +++ b/ompi/mpi/man/man3/MPI_Pack_size.3in @@ -18,10 +18,22 @@ int MPI_Pack_size(int \fIincount\fP, MPI_Datatype\fI datatype\fP, MPI_Comm\fI co .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_PACK_SIZE(\fIINCOUNT, DATATYPE, COMM, SIZE, IERROR\fP) INTEGER \fIINCOUNT, DATATYPE, COMM, SIZE, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Pack_size(\fIincount\fP, \fIdatatype\fP, \fIcomm\fP, \fIsize\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIincount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(OUT) :: \fIsize\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Pcontrol.3in b/ompi/mpi/man/man3/MPI_Pcontrol.3in index 2f80b0fcad..4efa9df21e 100644 --- a/ompi/mpi/man/man3/MPI_Pcontrol.3in +++ b/ompi/mpi/man/man3/MPI_Pcontrol.3in @@ -16,10 +16,18 @@ int MPI_Pcontrol(const int \fIlevel\fP, \&... ) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_PCONTROL(\fILEVEL\fP) INTEGER \fILEVEL\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Pcontrol(\fIlevel\fP) + INTEGER, INTENT(IN) :: \fIlevel\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Probe.3in b/ompi/mpi/man/man3/MPI_Probe.3in index 03a5811689..39791b3a3b 100644 --- a/ompi/mpi/man/man3/MPI_Probe.3in +++ b/ompi/mpi/man/man3/MPI_Probe.3in @@ -17,10 +17,21 @@ int MPI_Probe(int \fIsource\fP, int\fI tag\fP, MPI_Comm\fI comm\fP, MPI_Status\f .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_PROBE(\fISOURCE, TAG, COMM, STATUS, IERROR\fP) INTEGER \fISOURCE, TAG, COMM, STATUS(MPI_STATUS_SIZE), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Probe(\fIsource\fP, \fItag\fP, \fIcomm\fP, \fIstatus\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIsource\fP, \fItag\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Publish_name.3in b/ompi/mpi/man/man3/MPI_Publish_name.3in index bdc2609453..83953c2a77 100644 --- a/ompi/mpi/man/man3/MPI_Publish_name.3in +++ b/ompi/mpi/man/man3/MPI_Publish_name.3in @@ -23,11 +23,21 @@ int MPI_Publish_name(const char *\fIservice_name\fP, MPI_Info \fIinfo\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_PUBLISH_NAME(\fISERVICE_NAME, INFO, PORT_NAME, IERROR\fP) CHARACTER*(*) \fISERVICE_NAME, PORT_NAME\fP INTEGER \fIINFO, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Publish_name(\fIservice_name\fP, \fIinfo\fP, \fIport_name\fP, \fIierror\fP) + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + CHARACTER(LEN=*), INTENT(IN) :: \fIservice_name\fP, \fIport_name\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Put.3in b/ompi/mpi/man/man3/MPI_Put.3in index 39fb9b10e9..64ae0f7861 100644 --- a/ompi/mpi/man/man3/MPI_Put.3in +++ b/ompi/mpi/man/man3/MPI_Put.3in @@ -25,7 +25,8 @@ MPI_Rput(const void *\fIorigin_addr\fP, int \fIorigin_count\fP, MPI_Datatype .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_PUT(\fIORIGIN_ADDR, ORIGIN_COUNT, ORIGIN_DATATYPE, TARGET_RANK, TARGET_DISP, TARGET_COUNT, TARGET_DATATYPE, WIN, IERROR\fP) \fIORIGIN_ADDR\fP(*) @@ -40,6 +41,30 @@ MPI_RPUT(\fIORIGIN_ADDR, ORIGIN_COUNT, ORIGIN_DATATYPE, TARGET_RANK, INTEGER \fIORIGIN_COUNT, ORIGIN_DATATYPE, TARGET_RANK, TARGET_COUNT, TARGET_DATATYPE, WIN, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Put(\fIorigin_addr\fP, \fIorigin_count\fP, \fIorigin_datatype\fP, \fItarget_rank\fP, + \fItarget_disp\fP, \fItarget_count\fP, \fItarget_datatype\fP, \fIwin\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIorigin_addr\fP + INTEGER, INTENT(IN) :: \fIorigin_count\fP, \fItarget_rank\fP, \fItarget_count\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIorigin_datatype\fP, \fItarget_datatype\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fItarget_disp\fP + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Rput(\fIorigin_addr\fP, \fIorigin_count\fP, \fIorigin_datatype\fP, \fItarget_rank\fP, + \fItarget_disp\fP, \fItarget_count\fP, \fItarget_datatype\fP, \fIwin\fP, \fIrequest,\fP + \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIorigin_addr\fP + INTEGER, INTENT(IN) :: \fIorigin_count\fP, \fItarget_rank\fP, \fItarget_count\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIorigin_datatype\fP, \fItarget_datatype\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fItarget_disp\fP + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Query_thread.3in b/ompi/mpi/man/man3/MPI_Query_thread.3in index 952194e208..c9148e945c 100644 --- a/ompi/mpi/man/man3/MPI_Query_thread.3in +++ b/ompi/mpi/man/man3/MPI_Query_thread.3in @@ -19,10 +19,19 @@ int MPI_Query_thread(int *\fIprovided\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_QUERY_THREAD(\fIPROVIDED, IERROR\fP) INTEGER \fIPROVIDED, IERROR \fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Query_thread(\fIprovided\fP, \fIierror\fP) + INTEGER, INTENT(OUT) :: \fIprovided\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Recv.3in b/ompi/mpi/man/man3/MPI_Recv.3in index e6bbfe4d47..59da488c8f 100644 --- a/ompi/mpi/man/man3/MPI_Recv.3in +++ b/ompi/mpi/man/man3/MPI_Recv.3in @@ -18,12 +18,25 @@ int MPI_Recv(void *\fIbuf\fP, int\fI count\fP, MPI_Datatype\fI datatype\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_RECV(\fIBUF, COUNT, DATATYPE, SOURCE, TAG, COMM, STATUS, IERROR\fP) \fIBUF\fP(*) INTEGER \fICOUNT, DATATYPE, SOURCE, TAG, COMM\fP INTEGER \fISTATUS(MPI_STATUS_SIZE), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Recv(\fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIsource\fP, \fItag\fP, \fIcomm\fP, \fIstatus\fP, \fIierror\fP) + TYPE(*), DIMENSION(..) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP, \fIsource\fP, \fItag\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Recv_init.3in b/ompi/mpi/man/man3/MPI_Recv_init.3in index e98fdbffd8..b23c258a96 100644 --- a/ompi/mpi/man/man3/MPI_Recv_init.3in +++ b/ompi/mpi/man/man3/MPI_Recv_init.3in @@ -18,12 +18,25 @@ int MPI_Recv_init(void *\fIbuf\fP, int\fI count\fP, MPI_Datatype\fI datatype\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_RECV_INIT(\fIBUF, COUNT, DATATYPE, SOURCE, TAG, COMM, REQUEST, IERROR\fP) \fIBUF\fP(*) INTEGER \fICOUNT, DATATYPE, SOURCE, TAG, COMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Recv_init(\fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIsource\fP, \fItag\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP, \fIsource\fP, \fItag\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Reduce.3in b/ompi/mpi/man/man3/MPI_Reduce.3in index 5e0c12fbac..a01c530638 100644 --- a/ompi/mpi/man/man3/MPI_Reduce.3in +++ b/ompi/mpi/man/man3/MPI_Reduce.3in @@ -24,7 +24,8 @@ int MPI_Ireduce(const void *\fIsendbuf\fP, void *\fIrecvbuf\fP, int\fI count\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_REDUCE(\fISENDBUF, RECVBUF, COUNT, DATATYPE, OP, ROOT, COMM, IERROR\fP) \fISENDBUF(*), RECVBUF(*)\fP @@ -35,6 +36,30 @@ MPI_IREDUCE(\fISENDBUF, RECVBUF, COUNT, DATATYPE, OP, ROOT, COMM, \fISENDBUF(*), RECVBUF(*)\fP INTEGER \fICOUNT, DATATYPE, OP, ROOT, COMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Reduce(\fIsendbuf\fP, \fIrecvbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIop\fP, \fIroot\fP, \fIcomm\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIsendbuf\fP + TYPE(*), DIMENSION(..) :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP, \fIroot\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Op), INTENT(IN) :: \fIop\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Ireduce(\fIsendbuf\fP, \fIrecvbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIop\fP, \fIroot\fP, \fIcomm\fP, \fIrequest\fP, + \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIsendbuf\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP, \fIroot\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Op), INTENT(IN) :: \fIop\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Reduce_local.3in b/ompi/mpi/man/man3/MPI_Reduce_local.3in index 0bd88f5cd8..6bca5d1c20 100644 --- a/ompi/mpi/man/man3/MPI_Reduce_local.3in +++ b/ompi/mpi/man/man3/MPI_Reduce_local.3in @@ -19,11 +19,24 @@ int MPI_Reduce_local(const void *\fIinbuf\fP, void *\fIinoutbuf\fP, int\fI count .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_REDUCE_LOCAL(\fIINBUF, INOUTBUF, COUNT, DATATYPE, OP, IERROR\fP) \fIINBUF(*), INOUTBUF(*)\fP INTEGER \fICOUNT, DATATYPE, OP, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Reduce_local(\fIinbuf\fP, \fIinoutbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIop\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIinbuf\fP + TYPE(*), DIMENSION(..) :: \fIinoutbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Op), INTENT(IN) :: \fIop\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Reduce_scatter.3in b/ompi/mpi/man/man3/MPI_Reduce_scatter.3in index 51bf5fd69f..e054d658dd 100644 --- a/ompi/mpi/man/man3/MPI_Reduce_scatter.3in +++ b/ompi/mpi/man/man3/MPI_Reduce_scatter.3in @@ -22,7 +22,8 @@ int MPI_Ireduce_scatter(const void *\fIsendbuf\fP, void\fI *recvbuf\fP, const in .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_REDUCE_SCATTER(\fISENDBUF, RECVBUF, RECVCOUNTS, DATATYPE, OP, COMM, IERROR\fP) \fISENDBUF(*), RECVBUF(*)\fP @@ -33,6 +34,31 @@ MPI_IREDUCE_SCATTER(\fISENDBUF, RECVBUF, RECVCOUNTS, DATATYPE, OP, \fISENDBUF(*), RECVBUF(*)\fP INTEGER \fIRECVCOUNTS(*), DATATYPE, OP, COMM, REQUEST, IERROR \fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Reduce_scatter(\fIsendbuf\fP, \fIrecvbuf\fP, \fIrecvcounts\fP, \fIdatatype\fP, \fIop\fP, \fIcomm\fP, + \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIsendbuf\fP + TYPE(*), DIMENSION(..) :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIrecvcounts(*)\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Op), INTENT(IN) :: \fIop\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Ireduce_scatter(\fIsendbuf\fP, \fIrecvbuf\fP, \fIrecvcounts\fP, \fIdatatype\fP, \fIop\fP, \fIcomm\fP, + \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIsendbuf\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIrecvbuf\fP + INTEGER, INTENT(IN), ASYNCHRONOUS :: \fIrecvcounts(*)\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Op), INTENT(IN) :: \fIop\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Reduce_scatter_block.3in b/ompi/mpi/man/man3/MPI_Reduce_scatter_block.3in index 3ab6125e05..e2d7a10fac 100644 --- a/ompi/mpi/man/man3/MPI_Reduce_scatter_block.3in +++ b/ompi/mpi/man/man3/MPI_Reduce_scatter_block.3in @@ -22,7 +22,8 @@ int MPI_Ireduce_scatter_block(const void *\fIsendbuf\fP, void\fI *recvbuf\fP, in .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_REDUCE_SCATTER_BLOCK(\fISENDBUF, RECVBUF, RECVCOUNT, DATATYPE, OP, COMM, IERROR\fP) \fISENDBUF(*), RECVBUF(*)\fP @@ -33,6 +34,31 @@ MPI_IREDUCE_SCATTER_BLOCK(\fISENDBUF, RECVBUF, RECVCOUNT, DATATYPE, OP, \fISENDBUF(*), RECVBUF(*)\fP INTEGER \fIRECVCOUNT, DATATYPE, OP, COMM, REQUEST, IERROR \fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Ireduce_scatter_block(\fIsendbuf\fP, \fIrecvbuf\fP, \fIrecvcount\fP, \fIdatatype\fP, \fIop\fP, \fIcomm\fP, + \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIsendbuf\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIrecvcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Op), INTENT(IN) :: \fIop\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Ireduce_scatter_block(\fIsendbuf\fP, \fIrecvbuf\fP, \fIrecvcount\fP, \fIdatatype\fP, \fIop\fP, \fIcomm\fP, + \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIsendbuf\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIrecvcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Op), INTENT(IN) :: \fIop\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Register_datarep.3in b/ompi/mpi/man/man3/MPI_Register_datarep.3in index 244efa07e1..71b3666872 100644 --- a/ompi/mpi/man/man3/MPI_Register_datarep.3in +++ b/ompi/mpi/man/man3/MPI_Register_datarep.3in @@ -31,6 +31,19 @@ C Syntax INTEGER \fIIERROR\fP INTEGER(KIND=MPI_ADDRESS_KIND) \fIEXTRA_STATE\fP .fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Register_datarep(\fIdatarep\fP, \fIread_conversion_fn\fP, \fIwrite_conversion_fn\fP, + \fIdtype_file_extent_fn\fP, \fIextra_state\fP, \fIierror\fP) + CHARACTER(LEN=*), INTENT(IN) :: \fIdatarep\fP + PROCEDURE(MPI_Datarep_conversion_function) :: \fIread_conversion_fn\fP + PROCEDURE(MPI_Datarep_conversion_function) :: \fIwrite_conversion_fn\fP + PROCEDURE(MPI_Datarep_extent_function) :: \fIdtype_file_extent_fn\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fIextra_state\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +.fi .SH C++ Syntax .nf #include diff --git a/ompi/mpi/man/man3/MPI_Request_free.3in b/ompi/mpi/man/man3/MPI_Request_free.3in index e64f2b22a9..ee1abf117c 100644 --- a/ompi/mpi/man/man3/MPI_Request_free.3in +++ b/ompi/mpi/man/man3/MPI_Request_free.3in @@ -21,6 +21,14 @@ int MPI_Request_free(MPI_Request *request) MPI_REQUEST_FREE(REQUEST, IERROR) INTEGER REQUEST, IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Request_free(\fIrequest\fP, \fIierror\fP) + TYPE(MPI_Request), INTENT(INOUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Request_get_status.3in b/ompi/mpi/man/man3/MPI_Request_get_status.3in index 62809ca6ad..0af4da7f34 100644 --- a/ompi/mpi/man/man3/MPI_Request_get_status.3in +++ b/ompi/mpi/man/man3/MPI_Request_get_status.3in @@ -17,11 +17,22 @@ int MPI_Request_get_status(MPI_Request \fIrequest\fP, int \fI*flag\fP, MPI_Statu .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_REQUEST_GET_STATUS(\fIREQUEST\fP, \fIFLAG\fP, \fISTATUS\fP, \fIIERROR\fP) INTEGER REQUEST, STATUS(MPI_STATUS_SIZE), IERROR LOGICAL FLAG +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Request_get_status(\fIrequest\fP, \fIflag\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_Request), INTENT(IN) :: \fIrequest\fP + LOGICAL, INTENT(OUT) :: \fIflag\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Rsend.3in b/ompi/mpi/man/man3/MPI_Rsend.3in index 814321e098..23eae2780c 100644 --- a/ompi/mpi/man/man3/MPI_Rsend.3in +++ b/ompi/mpi/man/man3/MPI_Rsend.3in @@ -19,11 +19,23 @@ int MPI_Rsend(const void *\fIbuf\fP, int\fI count\fP, MPI_Datatype\fI datatype\f .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_RSEND(\fIBUF, COUNT, DATATYPE, DEST, TAG, COMM, IERROR\fP) \fIBUF\fP(*) INTEGER \fICOUNT, DATATYPE, DEST, TAG, COMM, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Rsend(\fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIdest\fP, \fItag\fP, \fIcomm\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP, \fIdest\fP, \fItag\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Rsend_init.3in b/ompi/mpi/man/man3/MPI_Rsend_init.3in index 9a0d1e8ee4..4054355665 100644 --- a/ompi/mpi/man/man3/MPI_Rsend_init.3in +++ b/ompi/mpi/man/man3/MPI_Rsend_init.3in @@ -19,12 +19,25 @@ int MPI_Rsend_init(const void *\fIbuf\fP, int\fI count\fP, MPI_Datatype\fI datat .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_RSEND_INIT(\fIBUF, COUNT, DATATYPE, DEST, TAG, COMM, REQUEST, IERROR\fP) \fIBUF\fP(*) INTEGER \fICOUNT, DATATYPE, DEST, TAG, COMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Rsend_init(\fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIdest\fP, \fItag\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP, \fIdest\fP, \fItag\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Scan.3in b/ompi/mpi/man/man3/MPI_Scan.3in index 87b90dd399..46da5f589d 100644 --- a/ompi/mpi/man/man3/MPI_Scan.3in +++ b/ompi/mpi/man/man3/MPI_Scan.3in @@ -25,7 +25,8 @@ int MPI_Iscan(const void *\fIsendbuf\fP, void *\fIrecvbuf\fP, int \fIcount\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_SCAN(\fISENDBUF, RECVBUF, COUNT, DATATYPE, OP, COMM, IERROR\fP) \fISENDBUF(*), RECVBUF(*)\fP INTEGER \fICOUNT, DATATYPE, OP, COMM, IERROR\fP @@ -34,6 +35,28 @@ MPI_ISCAN(\fISENDBUF, RECVBUF, COUNT, DATATYPE, OP, COMM, REQUEST, IERROR\fP) \fISENDBUF(*), RECVBUF(*)\fP INTEGER \fICOUNT, DATATYPE, OP, COMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +USE mpi_f08 +MPI_Scan(\fIsendbuf\fP, \fIrecvbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIop\fP, \fIcomm\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIsendbuf\fP + TYPE(*), DIMENSION(..) :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Op), INTENT(IN) :: \fIop\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Iscan(\fIsendbuf\fP, \fIrecvbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIop\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIsendbuf\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Op), INTENT(IN) :: \fIop\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Scatter.3in b/ompi/mpi/man/man3/MPI_Scatter.3in index e279f0ad58..2f69be743d 100644 --- a/ompi/mpi/man/man3/MPI_Scatter.3in +++ b/ompi/mpi/man/man3/MPI_Scatter.3in @@ -24,7 +24,8 @@ int MPI_Iscatter(const void *\fIsendbuf\fP, int\fI sendcount\fP, MPI_Datatype\fI .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_SCATTER(\fISENDBUF, SENDCOUNT, SENDTYPE, RECVBUF, RECVCOUNT, RECVTYPE, ROOT, COMM, IERROR\fP) \fISENDBUF(*), RECVBUF(*)\fP @@ -37,6 +38,29 @@ MPI_ISCATTER(\fISENDBUF, SENDCOUNT, SENDTYPE, RECVBUF, RECVCOUNT, INTEGER \fISENDCOUNT, SENDTYPE, RECVCOUNT, RECVTYPE, ROOT\fP INTEGER \fICOMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Scatter(\fIsendbuf\fP, \fIsendcount\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcount\fP, \fIrecvtype\fP, + \fIroot\fP, \fIcomm\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIsendbuf\fP + TYPE(*), DIMENSION(..) :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcount\fP, \fIrecvcount\fP, \fIroot\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Iscatter(\fIsendbuf\fP, \fIsendcount\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcount\fP, \fIrecvtype\fP, + \fIroot\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIsendbuf\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcount\fP, \fIrecvcount\fP, \fIroot\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Scatterv.3in b/ompi/mpi/man/man3/MPI_Scatterv.3in index 3f6ab07cc4..170dba9087 100644 --- a/ompi/mpi/man/man3/MPI_Scatterv.3in +++ b/ompi/mpi/man/man3/MPI_Scatterv.3in @@ -24,7 +24,8 @@ int MPI_Iscatterv(const void *\fIsendbuf\fP, const int\fI sendcounts[]\fP, const .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_SCATTERV(\fISENDBUF, SENDCOUNTS, DISPLS, SENDTYPE, RECVBUF, RECVCOUNT, RECVTYPE, ROOT, COMM, IERROR\fP) \fISENDBUF(*), RECVBUF(*)\fP @@ -37,6 +38,29 @@ MPI_ISCATTERV(\fISENDBUF, SENDCOUNTS, DISPLS, SENDTYPE, RECVBUF, INTEGER \fISENDCOUNTS(*), DISPLS(*), SENDTYPE\fP INTEGER \fIRECVCOUNT, RECVTYPE, ROOT, COMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +USE mpi_f08 +MPI_Scatterv(\fIsendbuf\fP, \fIsendcounts\fP, \fIdispls\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcount\fP, + \fIrecvtype\fP, \fIroot\fP, \fIcomm\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIsendbuf\fP + TYPE(*), DIMENSION(..) :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcounts(*)\fP, \fIdispls(*)\fP, \fIrecvcount\fP, \fIroot\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Iscatterv(\fIsendbuf\fP, \fIsendcounts\fP, \fIdispls\fP, \fIsendtype\fP, \fIrecvbuf\fP, \fIrecvcount\fP, + \fIrecvtype\fP, \fIroot\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIsendbuf\fP + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIrecvbuf\fP + INTEGER, INTENT(IN), ASYNCHRONOUS :: \fIsendcounts(*)\fP, \fIdispls(*)\fP + INTEGER, INTENT(IN) :: \fIrecvcount\fP, \fIroot\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Send.3in b/ompi/mpi/man/man3/MPI_Send.3in index 05c96dc2cd..82e8014dd8 100644 --- a/ompi/mpi/man/man3/MPI_Send.3in +++ b/ompi/mpi/man/man3/MPI_Send.3in @@ -19,11 +19,23 @@ int MPI_Send(const void *\fIbuf\fP, int\fI count\fP, MPI_Datatype\fI datatype\fP .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_SEND(\fIBUF, COUNT, DATATYPE, DEST, TAG, COMM, IERROR\fP) \fIBUF(*)\fP INTEGER \fICOUNT, DATATYPE, DEST, TAG, COMM, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Send(\fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIdest\fP, \fItag\fP, \fIcomm\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP, \fIdest\fP, \fItag\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Send_init.3in b/ompi/mpi/man/man3/MPI_Send_init.3in index 529e7e5681..715fe82efe 100644 --- a/ompi/mpi/man/man3/MPI_Send_init.3in +++ b/ompi/mpi/man/man3/MPI_Send_init.3in @@ -19,13 +19,26 @@ int MPI_Send_init(const void *\fIbuf\fP, int\fI count\fP, MPI_Datatype\fI dataty .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_SEND_INIT(\fIBUF, COUNT, DATATYPE, DEST, TAG, COMM, REQUEST, IERROR\fP) \fIBUF\fP(*) INTEGER \fIREQUEST, COUNT, DATATYPE, DEST, TAG\fP INTEGER \fICOMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Send_init(\fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIdest\fP, \fItag\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP, \fIdest\fP, \fItag\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Sendrecv.3in b/ompi/mpi/man/man3/MPI_Sendrecv.3in index 6097ba5fdc..5635fdd67c 100644 --- a/ompi/mpi/man/man3/MPI_Sendrecv.3in +++ b/ompi/mpi/man/man3/MPI_Sendrecv.3in @@ -21,7 +21,8 @@ int MPI_Sendrecv(const void *\fIsendbuf\fP, int\fI sendcount\fP, MPI_Datatype\fI .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_SENDRECV(\fISENDBUF, SENDCOUNT, SENDTYPE, DEST, SENDTAG, RECVBUF, RECVCOUNT, RECVTYPE, SOURCE, RECVTAG, COMM, STATUS, IERROR\fP) @@ -30,6 +31,21 @@ MPI_SENDRECV(\fISENDBUF, SENDCOUNT, SENDTYPE, DEST, SENDTAG, INTEGER \fIRECVCOUNT, RECVTYPE, SOURCE, RECVTAG, COMM\fP INTEGER \fISTATUS(MPI_STATUS_SIZE), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Sendrecv(\fIsendbuf\fP, \fIsendcount\fP, \fIsendtype\fP, \fIdest\fP, \fIsendtag\fP, \fIrecvbuf\fP, + \fIrecvcount\fP, \fIrecvtype\fP, \fIsource\fP, \fIrecvtag\fP, \fIcomm\fP, \fIstatus\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIsendbuf\fP + TYPE(*), DIMENSION(..) :: \fIrecvbuf\fP + INTEGER, INTENT(IN) :: \fIsendcount\fP, \fIdest\fP, \fIsendtag\fP, \fIrecvcount\fP, \fIsource,\fP + \fIrecvtag\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIsendtype\fP, \fIrecvtype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Sendrecv_replace.3in b/ompi/mpi/man/man3/MPI_Sendrecv_replace.3in index 7d332fd1ec..1cc1f47a40 100644 --- a/ompi/mpi/man/man3/MPI_Sendrecv_replace.3in +++ b/ompi/mpi/man/man3/MPI_Sendrecv_replace.3in @@ -19,7 +19,8 @@ int MPI_Sendrecv_replace(void *\fIbuf\fP, int\fI count\fP, MPI_Datatype\fI datat .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_SENDRECV_REPLACE(\fIBUF, COUNT, DATATYPE, DEST, SENDTAG, SOURCE, RECVTAG, COMM, STATUS, IERROR\fP) \fIBUF\fP(*) @@ -27,6 +28,19 @@ MPI_SENDRECV_REPLACE(\fIBUF, COUNT, DATATYPE, DEST, SENDTAG, SOURCE, INTEGER \fISOURCE, RECVTAG, COMM\fP INTEGER \fISTATUS(MPI_STATUS_SIZE), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Sendrecv_replace(\fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIdest\fP, \fIsendtag\fP, \fIsource\fP, \fIrecvtag\fP, + \fIcomm\fP, \fIstatus\fP, \fIierror\fP) + TYPE(*), DIMENSION(..) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP, \fIdest\fP, \fIsendtag\fP, \fIsource\fP, \fIrecvtag\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Sizeof.3in b/ompi/mpi/man/man3/MPI_Sizeof.3in index 211eea85cc..e6fbf64aac 100644 --- a/ompi/mpi/man/man3/MPI_Sizeof.3in +++ b/ompi/mpi/man/man3/MPI_Sizeof.3in @@ -13,11 +13,21 @@ .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_SIZEOF(\fIX, SIZE, IERROR\fP) \fIX\fP INTEGER \fISIZE, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Sizeof(\fx\fP, \fIsize\fP, \fIierror\fP) + TYPE(*), DIMENSION(..) :: \fIx\fP + INTEGER, INTENT(OUT) :: \fIsize\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETER .ft R diff --git a/ompi/mpi/man/man3/MPI_Ssend.3in b/ompi/mpi/man/man3/MPI_Ssend.3in index 6b29c5cfff..550e57a5cc 100644 --- a/ompi/mpi/man/man3/MPI_Ssend.3in +++ b/ompi/mpi/man/man3/MPI_Ssend.3in @@ -19,11 +19,23 @@ int MPI_Ssend(const void *\fIbuf\fP, int\fI count\fP, MPI_Datatype\fI datatype\f .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_SSEND(\fIBUF, COUNT, DATATYPE, DEST, TAG, COMM, IERROR\fP) \fIBUF\fP(*) INTEGER \fICOUNT, DATATYPE, DEST, TAG, COMM, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Ssend(\fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIdest\fP, \fItag\fP, \fIcomm\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP, \fIdest\fP, \fItag\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Ssend_init.3in b/ompi/mpi/man/man3/MPI_Ssend_init.3in index f31ec9ba80..fed489d11c 100644 --- a/ompi/mpi/man/man3/MPI_Ssend_init.3in +++ b/ompi/mpi/man/man3/MPI_Ssend_init.3in @@ -19,12 +19,25 @@ int MPI_Ssend_init(const void *\fIbuf\fP, int\fI count\fP, MPI_Datatype\fI datat .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_SSEND_INIT(\fIBUF, COUNT, DATATYPE, DEST, TAG, COMM, REQUEST, IERROR\fP) \fIBUF\fP(*) INTEGER \fICOUNT, DATATYPE, DEST, TAG, COMM, REQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Ssend_init(\fIbuf\fP, \fIcount\fP, \fIdatatype\fP, \fIdest\fP, \fItag\fP, \fIcomm\fP, \fIrequest\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN), ASYNCHRONOUS :: \fIbuf\fP + INTEGER, INTENT(IN) :: \fIcount\fP, \fIdest\fP, \fItag\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Request), INTENT(OUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Start.3in b/ompi/mpi/man/man3/MPI_Start.3in index 09add808bb..4c3f419d6b 100644 --- a/ompi/mpi/man/man3/MPI_Start.3in +++ b/ompi/mpi/man/man3/MPI_Start.3in @@ -17,10 +17,19 @@ int MPI_Start(MPI_Request *\fIrequest\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_START(\fIREQUEST, IERROR\fP) INTEGER \fIREQUEST, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Start(\fIrequest\fP, \fIierror\fP) + TYPE(MPI_Request), INTENT(INOUT) :: \fIrequest\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Startall.3in b/ompi/mpi/man/man3/MPI_Startall.3in index 94ba56f445..332893bac4 100644 --- a/ompi/mpi/man/man3/MPI_Startall.3in +++ b/ompi/mpi/man/man3/MPI_Startall.3in @@ -17,10 +17,20 @@ int MPI_Startall(int \fIcount\fP, MPI_Request\fI array_of_requests[]\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_STARTALL(\fICOUNT, ARRAY_OF_REQUESTS, IERROR\fP) INTEGER \fICOUNT, ARRAY_OF_REQUESTS(*), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Startall(\fIcount\fP, \fIarray_of_requests\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Request), INTENT(INOUT) :: \fIarray_of_requests(count)\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Status_set_cancelled.3in b/ompi/mpi/man/man3/MPI_Status_set_cancelled.3in index b27b183b51..9a2505f1e7 100644 --- a/ompi/mpi/man/man3/MPI_Status_set_cancelled.3in +++ b/ompi/mpi/man/man3/MPI_Status_set_cancelled.3in @@ -17,11 +17,21 @@ int MPI_Status_set_cancelled(MPI_Status *\fIstatus\fP, int \fIflag\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_STATUS_SET_CANCELLED(\fISTATUS, FLAG, IERROR\fP) INTEGER \fISTATUS\fP(MPI_STATUS_SIZE), \fIIERROR \fP LOGICAL \fIFLAG\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Status_set_cancelled(\fIstatus\fP, \fIflag\fP, \fIierror\fP) + TYPE(MPI_Status), INTENT(INOUT) :: \fIstatus\fP + LOGICAL, INTENT(OUT) :: \fIflag\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Status_set_elements.3in b/ompi/mpi/man/man3/MPI_Status_set_elements.3in index 47a12c7bfc..de8dfceab4 100644 --- a/ompi/mpi/man/man3/MPI_Status_set_elements.3in +++ b/ompi/mpi/man/man3/MPI_Status_set_elements.3in @@ -19,7 +19,8 @@ int MPI_Status_set_elements_x(MPI_Status *\fIstatus\fP, MPI_Datatype \fIdatatype .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_STATUS_SET_ELEMENTS(\fISTATUS, DATATYPE, COUNT, IERROR\fP) INTEGER \fISTATUS\fP(MPI_STATUS_SIZE), DATATYPE, COUNT, IERROR\fP MPI_STATUS_SET_ELEMENTS_X(\fISTATUS, DATATYPE, COUNT, IERROR\fP) @@ -27,6 +28,21 @@ MPI_STATUS_SET_ELEMENTS_X(\fISTATUS, DATATYPE, COUNT, IERROR\fP) INTEGER(KIND=MPI_COUNT_KIND) \fICOUNT\fP INTEGER \fIIERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Status_set_elements(\fIstatus\fP, \fIdatatype\fP, \fIcount\fP, \fIierror\fP) + TYPE(MPI_Status), INTENT(INOUT) :: \fIstatus\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER, INTENT(IN) :: \fIcount\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP +MPI_Status_set_elements_x(\fIstatus\fP, \fIdatatype\fP, \fIcount\fP, \fIierror\fP) + TYPE(MPI_Status), INTENT(INOUT) :: \fIstatus\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER(KIND = MPI_COUNT_KIND), INTENT(IN) :: \fIcount\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Test.3in b/ompi/mpi/man/man3/MPI_Test.3in index 08adf28a86..6d145defdb 100644 --- a/ompi/mpi/man/man3/MPI_Test.3in +++ b/ompi/mpi/man/man3/MPI_Test.3in @@ -17,11 +17,22 @@ int MPI_Test(MPI_Request *\fIrequest\fP, int\fI *flag\fP, MPI_Status\fI *status\ .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TEST(\fIREQUEST, FLAG, STATUS, IERROR\fP) LOGICAL \fIFLAG\fP INTEGER \fIREQUEST, STATUS(MPI_STATUS_SIZE), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Test(\fIrequest\fP, \fIflag\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_Request), INTENT(INOUT) :: \fIrequest\fP + LOGICAL, INTENT(OUT) :: \fIflag\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Test_cancelled.3in b/ompi/mpi/man/man3/MPI_Test_cancelled.3in index e227f937c0..4d2fd43e06 100644 --- a/ompi/mpi/man/man3/MPI_Test_cancelled.3in +++ b/ompi/mpi/man/man3/MPI_Test_cancelled.3in @@ -18,11 +18,21 @@ int MPI_Test_cancelled(const MPI_Status *\fIstatus\fP, int \fI*flag\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TEST_CANCELLED(\fISTATUS, FLAG, IERROR\fP) LOGICAL \fIFLAG\fP INTEGER \fISTATUS(MPI_STATUS_SIZE), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Test_cancelled(\fIstatus\fP, \fIflag\fP, \fIierror\fP) + TYPE(MPI_Status), INTENT(IN) :: \fIstatus\fP + LOGICAL, INTENT(OUT) :: \fIflag\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Testall.3in b/ompi/mpi/man/man3/MPI_Testall.3in index 87ba0a0854..68d5f19a1c 100644 --- a/ompi/mpi/man/man3/MPI_Testall.3in +++ b/ompi/mpi/man/man3/MPI_Testall.3in @@ -18,13 +18,25 @@ int MPI_Testall(int \fIcount\fP, MPI_Request\fI array_of_requests[]\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TESTALL(\fICOUNT, ARRAY_OF_REQUESTS, FLAG, ARRAY_OF_STATUSES, IERROR\fP) LOGICAL \fIFLAG\fP INTEGER \fICOUNT, ARRAY_OF_REQUESTS(*)\fP INTEGER \fIARRAY_OF_STATUSES(MPI_STATUS_SIZE,*), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Testall(\fIcount\fP, \fIarray_of_requests\fP, \fIflag\fP, \fIarray_of_statuses\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Request), INTENT(INOUT) :: \fIarray_of_requests(count)\fP + LOGICAL, INTENT(OUT) :: \fIflag\fP + TYPE(MPI_Status) :: \fIarray_of_statuses(*)\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Testany.3in b/ompi/mpi/man/man3/MPI_Testany.3in index 31465e6afd..4664799f20 100644 --- a/ompi/mpi/man/man3/MPI_Testany.3in +++ b/ompi/mpi/man/man3/MPI_Testany.3in @@ -17,12 +17,25 @@ int MPI_Testany(int \fIcount\fP, MPI_Request\fI array_of_requests[]\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TESTANY(\fICOUNT, ARRAY_OF_REQUESTS, INDEX, FLAG, STATUS, IERROR\fP) LOGICAL \fIFLAG\fP INTEGER \fICOUNT, ARRAY_OF_REQUESTS(*), INDEX\fP INTEGER \fISTATUS(MPI_STATUS_SIZE), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Testany(\fIcount\fP, \fIarray_of_requests\fP, \fIindex\fP, \fIflag\fP, \fIstatus\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Request), INTENT(INOUT) :: \fIarray_of_requests(count)\fP + INTEGER, INTENT(OUT) :: \fIindex\fP + LOGICAL, INTENT(OUT) :: \fIflag\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Testsome.3in b/ompi/mpi/man/man3/MPI_Testsome.3in index 9f8ac62954..92c8d36dda 100644 --- a/ompi/mpi/man/man3/MPI_Testsome.3in +++ b/ompi/mpi/man/man3/MPI_Testsome.3in @@ -18,13 +18,26 @@ int MPI_Testsome(int \fIincount\fP, MPI_Request \fIarray_of_requests[]\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TESTSOME(\fIINCOUNT, ARRAY_OF_REQUESTS, OUTCOUNT, ARRAY_OF_INDICES, ARRAY_OF_STATUSES, IERROR\fP) INTEGER \fIINCOUNT, ARRAY_OF_REQUESTS(*)\fP INTEGER \fIOUTCOUNT, ARRAY_OF_INDICES(*)\fP INTEGER \fIARRAY_OF_STATUSES(MPI_STATUS_SIZE,*), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Testsome(\fIincount\fP, \fIarray_of_requests\fP, \fIoutcount\fP, \fIarray_of_indices\fP, + \fIarray_of_statuses\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIincount\fP + TYPE(MPI_Request), INTENT(INOUT) :: \fIarray_of_requests(incount)\fP + INTEGER, INTENT(OUT) :: \fIoutcount\fP, \fIarray_of_indices(*)\fP + TYPE(MPI_Status) :: \fIarray_of_statuses(*)\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Topo_test.3in b/ompi/mpi/man/man3/MPI_Topo_test.3in index 6c9c2467e7..c3c9ab72c3 100644 --- a/ompi/mpi/man/man3/MPI_Topo_test.3in +++ b/ompi/mpi/man/man3/MPI_Topo_test.3in @@ -17,10 +17,22 @@ int MPI_Topo_test(MPI_Comm \fIcomm\fP, int\fI *top_type\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TOPO_TEST(\fICOMM, TOP_TYPE, IERROR\fP) INTEGER \fICOMM, TOP_TYPE, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Topo_test(\fIcomm\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, INTENT(OUT) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + \fIDOUBLE PRECISION MPI_Wtick(\fP) + \fIDOUBLE PRECISION MPI_Wtime(\fP) + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_commit.3in b/ompi/mpi/man/man3/MPI_Type_commit.3in index b556e4f266..c154d7d9ab 100644 --- a/ompi/mpi/man/man3/MPI_Type_commit.3in +++ b/ompi/mpi/man/man3/MPI_Type_commit.3in @@ -17,10 +17,19 @@ int MPI_Type_commit(MPI_Datatype *\fIdatatype\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_COMMIT(\fIDATATYPE, IERROR\fP) INTEGER \fIDATATYPE, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_commit(\fIdatatype\fP, \fIierror\fP) + TYPE(MPI_Datatype), INTENT(INOUT) :: \fIdatatype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_contiguous.3in b/ompi/mpi/man/man3/MPI_Type_contiguous.3in index cbe055ed85..a9fd10e055 100644 --- a/ompi/mpi/man/man3/MPI_Type_contiguous.3in +++ b/ompi/mpi/man/man3/MPI_Type_contiguous.3in @@ -18,10 +18,21 @@ int MPI_Type_contiguous(int \fIcount\fP, MPI_Datatype\fI oldtype\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_CONTIGUOUS(\fICOUNT, OLDTYPE, NEWTYPE, IERROR\fP) INTEGER \fICOUNT, OLDTYPE, NEWTYPE, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_contiguous(\fIcount\fP, \fIoldtype\fP, \fInewtype\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIoldtype\fP + TYPE(MPI_Datatype), INTENT(OUT) :: \fInewtype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_create_darray.3in b/ompi/mpi/man/man3/MPI_Type_create_darray.3in index 4efdd79aa5..ca949ff468 100644 --- a/ompi/mpi/man/man3/MPI_Type_create_darray.3in +++ b/ompi/mpi/man/man3/MPI_Type_create_darray.3in @@ -21,7 +21,8 @@ int MPI_Type_create_darray(int \fIsize\fP, int \fIrank\fP, int \fIndims\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_CREATE_DARRAY(\fISIZE, RANK, NDIMS, ARRAY_OF_GSIZES, ARRAY_OF_DISTRIBS, ARRAY_OF_DARGS, ARRAY_OF_PSIZES, ORDER, OLDTYPE, NEWTYPE, IERROR\fP) @@ -30,6 +31,20 @@ MPI_TYPE_CREATE_DARRAY(\fISIZE, RANK, NDIMS, ARRAY_OF_GSIZES, ARRAY_OF_DARGS(*), ARRAY_OF_PSIZES(*), ORDER, OLDTYPE, NEWTYPE, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_create_darray(\fIsize\fP, \fIrank\fP, \fIndims\fP, \fIarray_of_gsizes\fP, + \fIarray_of_distribs\fP, \fIarray_of_dargs\fP, \fIarray_of_psizes\fP, \fIorder,\fP + \fIoldtype\fP, \fInewtype\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIsize\fP, \fIrank\fP, \fIndims\fP, \fIarray_of_gsizes(ndims),\fP + \fIarray_of_distribs(ndims)\fP, \fIarray_of_dargs(ndims),\fP + \fIarray_of_psizes(ndims)\fP, \fIorder\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIoldtype\fP + TYPE(MPI_Datatype), INTENT(OUT) :: \fInewtype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_create_f90_complex.3in b/ompi/mpi/man/man3/MPI_Type_create_f90_complex.3in index b99d34069f..640f522904 100644 --- a/ompi/mpi/man/man3/MPI_Type_create_f90_complex.3in +++ b/ompi/mpi/man/man3/MPI_Type_create_f90_complex.3in @@ -22,10 +22,20 @@ int MPI_Type_create_f90_complex(int \fIp\fP, int \fIr\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_CREATE_F90_COMPLEX (\fIP, R, NEWTYPE, IERROR\fP) INTEGER \fIP, R, NEWTYPE, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_create_f90_complex(\fIp\fP, \fIr\fP, \fInewtype\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIp\fP, \fIr\fP + TYPE(MPI_Datatype), INTENT(OUT) :: \fInewtype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_create_f90_integer.3in b/ompi/mpi/man/man3/MPI_Type_create_f90_integer.3in index e989ebbb2d..b2b4103dcd 100644 --- a/ompi/mpi/man/man3/MPI_Type_create_f90_integer.3in +++ b/ompi/mpi/man/man3/MPI_Type_create_f90_integer.3in @@ -21,10 +21,20 @@ int MPI_Type_create_f90_integer(int \fIr\fP, MPI_Datatype *\fInewtype\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_CREATE_F90_INTEGER (\fIR, NEWTYPE, IERROR\fP) INTEGER \fIR, NEWTYPE, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_create_f90_integer(\fIr\fP, \fInewtype\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIr\fP + TYPE(MPI_Datatype), INTENT(OUT) :: \fInewtype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_create_f90_real.3in b/ompi/mpi/man/man3/MPI_Type_create_f90_real.3in index 784027af2d..d1cfa6ee95 100644 --- a/ompi/mpi/man/man3/MPI_Type_create_f90_real.3in +++ b/ompi/mpi/man/man3/MPI_Type_create_f90_real.3in @@ -21,10 +21,20 @@ int MPI_Type_create_f90_real(int \fIp\fP, int \fIr\fP, MPI_Datatype *\fInewtype\ .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_CREATE_F90_REAL (\fIP, R, NEWTYPE, IERROR\fP) INTEGER \fIP, R, NEWTYPE, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_create_f90_real(\fIp\fP, \fIr\fP, \fInewtype\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIp\fP, \fIr\fP + TYPE(MPI_Datatype), INTENT(OUT) :: \fInewtype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_create_hvector.3in b/ompi/mpi/man/man3/MPI_Type_create_hvector.3in index 5738354ee3..afb905708f 100644 --- a/ompi/mpi/man/man3/MPI_Type_create_hvector.3in +++ b/ompi/mpi/man/man3/MPI_Type_create_hvector.3in @@ -18,13 +18,26 @@ int MPI_Type_create_hvector(int \fIcount\fP, int \fIblocklength\fP, .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_CREATE_HVECTOR(\fICOUNT, BLOCKLENGTH, STRIDE, OLDTYPE, NEWTYPE, IERROR\fP) INTEGER \fICOUNT, BLOCKLENGTH, OLDTYPE, NEWTYPE, IERROR\fP INTEGER(KIND=MPI_ADDRESS_KIND) \fISTRIDE\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_create_hvector(\fIcount\fP, \fIblocklength\fP, \fIstride\fP, \fIoldtype\fP, \fInewtype\fP, + \fIierror\fP) + INTEGER, INTENT(IN) :: \fIcount\fP, \fIblocklength\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fIstride\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIoldtype\fP + TYPE(MPI_Datatype), INTENT(OUT) :: \fInewtype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_create_indexed_block.3in b/ompi/mpi/man/man3/MPI_Type_create_indexed_block.3in index 71cac9a4b9..18f4e6be11 100644 --- a/ompi/mpi/man/man3/MPI_Type_create_indexed_block.3in +++ b/ompi/mpi/man/man3/MPI_Type_create_indexed_block.3in @@ -20,7 +20,8 @@ int MPI_Type_create_hindexed_block(int \fIcount\fP, int \fIblocklength\fP, const .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_CREATE_INDEXED_BLOCK(\fICOUNT, BLOCKLENGTH, ARRAY_OF_DISPLACEMENTS, OLDTYPE, NEWTYPE, IERROR\fP) INTEGER \fICOUNT, BLOCKLENGTH, ARRAY_OF_DISPLACEMENTS(*), @@ -31,6 +32,26 @@ MPI_TYPE_CREATE_HINDEXED_BLOCK(\fICOUNT, BLOCKLENGTH, INTEGER \fICOUNT, BLOCKLENGTH, ARRAY_OF_DISPLACEMENTS(*), OLDTYPE, NEWTYPE, IERROR \fP +.fi +.SH Fortran 2008 Syntax +USE mpi_f08 +MPI_Type_create_indexed_block(\fIcount\fP, \fIblocklength\fP, \fIarray_of_displacements\fP, + \fIoldtype\fP, \fInewtype\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIcount\fP, \fIblocklength,\fP + \fIarray_of_displacements(count)\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIoldtype\fP + TYPE(MPI_Datatype), INTENT(OUT) :: \fInewtype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Type_create_hindexed_block(\fIcount\fP, \fIblocklength\fP, \fIarray_of_displacements\fP, + \fIoldtype\fP, \fInewtype\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIcount\fP, \fIblocklength\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: + \fIarray_of_displacements(count)\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIoldtype\fP + TYPE(MPI_Datatype), INTENT(OUT) :: \fInewtype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_create_keyval.3in b/ompi/mpi/man/man3/MPI_Type_create_keyval.3in index 14e664ff60..99cb35eebb 100644 --- a/ompi/mpi/man/man3/MPI_Type_create_keyval.3in +++ b/ompi/mpi/man/man3/MPI_Type_create_keyval.3in @@ -19,13 +19,26 @@ int MPI_Type_create_keyval(MPI_Type_copy_attr_function *\fItype_copy_attr_fn\fP, .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_CREATE_KEYVAL(\fITYPE_COPY_ATTR_FN, TYPE_DELETE_ATTR_FN, TYPE_KEYVAL, EXTRA_STATE, IERROR\fP) EXTERNAL \fITYPE_COPY_ATTR_FN, TYPE_DELETE_ATTR_FN\fP INTEGER \fITYPE_KEYVAL, IERROR \fP INTEGER(KIND=MPI_ADDRESS_KIND) \fIEXTRA_STATE\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_create_keyval(\fItype_copy_attr_fn\fP, \fItype_delete_attr_fn\fP, \fItype_keyval\fP, + \fIextra_state\fP, \fIierror\fP) + PROCEDURE(MPI_Type_copy_attr_function) :: \fItype_copy_attr_fn\fP + PROCEDURE(MPI_Type_delete_attr_function) :: \fItype_delete_attr_fn\fP + INTEGER, INTENT(OUT) :: \fItype_keyval\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fIextra_state\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_create_resized.3in b/ompi/mpi/man/man3/MPI_Type_create_resized.3in index 567b49c761..9f01980b87 100644 --- a/ompi/mpi/man/man3/MPI_Type_create_resized.3in +++ b/ompi/mpi/man/man3/MPI_Type_create_resized.3in @@ -18,11 +18,22 @@ int MPI_Type_create_resized(MPI_Datatype \fIoldtype\fP, MPI_Aint\fI lb\fP, .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_CREATE_RESIZED(\fIOLDTYPE, LB, EXTENT, NEWTYPE, IERROR\fP) INTEGER \fIOLDTYPE, NEWTYPE, IERROR\fP INTEGER(KIND=MPI_ADDRESS_KIND) \fILB, EXTENT\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_create_resized(\fIoldtype\fP, \fIlb\fP, \fIextent\fP, \fInewtype\fP, \fIierror\fP) + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fIlb\fP, \fIextent\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIoldtype\fP + TYPE(MPI_Datatype), INTENT(OUT) :: \fInewtype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_create_struct.3in b/ompi/mpi/man/man3/MPI_Type_create_struct.3in index accaee061a..1d2d7c9b11 100644 --- a/ompi/mpi/man/man3/MPI_Type_create_struct.3in +++ b/ompi/mpi/man/man3/MPI_Type_create_struct.3in @@ -20,13 +20,27 @@ int MPI_Type_create_struct(int \fIcount\fP, int \fIarray_of_blocklengths\fP[], .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_CREATE_STRUCT(\fICOUNT, ARRAY_OF_BLOCKLENGTHS, ARRAY_OF_DISPLACEMENTS, ARRAY_OF_TYPES, NEWTYPE, IERROR\fP) INTEGER \fICOUNT, ARRAY_OF_BLOCKLENGTHS(*), ARRAY_OF_TYPES(*),\fP INTEGER \fINEWTYPE, IERROR \fP INTEGER(KIND=MPI_ADDRESS_KIND) \fIARRAY_OF_DISPLACEMENTS(*)\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_create_struct(\fIcount\fP, \fIarray_of_blocklengths\fP, + \fIarray_of_displacements\fP, \fIarray_of_types\fP, \fInewtype\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIcount\fP, \fIarray_of_blocklengths(count)\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: + \fIarray_of_displacements(count)\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIarray_of_types(count)\fP + TYPE(MPI_Datatype), INTENT(OUT) :: \fInewtype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_create_subarray.3in b/ompi/mpi/man/man3/MPI_Type_create_subarray.3in index 665f3c3f85..36fd5de344 100644 --- a/ompi/mpi/man/man3/MPI_Type_create_subarray.3in +++ b/ompi/mpi/man/man3/MPI_Type_create_subarray.3in @@ -18,13 +18,26 @@ int MPI_Type_create_subarray(int \fIndims\fP, const int \fIarray_of_sizes[]\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_CREATE_SUBARRAY(\fINDIMS, ARRAY_OF_SIZES, ARRAY_OF_SUBSIZES, ARRAY_OF_STARTS, ORDER, OLDTYPE, NEWTYPE, IERROR\fP) INTEGER \fINDIMS, ARRAY_OF_SIZES(*), ARRAY_OF_SUBSIZES(*), ARRAY_OF_STARTS(*), ORDER, OLDTYPE, NEWTYPE, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_create_subarray(\fIndims\fP, \fIarray_of_sizes\fP, \fIarray_of_subsizes\fP, + \fIarray_of_starts\fP, \fIorder\fP, \fIoldtype\fP, \fInewtype\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIndims\fP, \fIarray_of_sizes(ndims),\fP + \fIarray_of_subsizes(ndims)\fP, \fIarray_of_starts(ndims)\fP, \fIorder\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIoldtype\fP + TYPE(MPI_Datatype), INTENT(OUT) :: \fInewtype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_delete_attr.3in b/ompi/mpi/man/man3/MPI_Type_delete_attr.3in index fccc7b352e..9daa4f1c9c 100644 --- a/ompi/mpi/man/man3/MPI_Type_delete_attr.3in +++ b/ompi/mpi/man/man3/MPI_Type_delete_attr.3in @@ -17,10 +17,20 @@ int MPI_Type_delete_attr(MPI_Datatype \fItype\fP, int \fItype_keyval\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_DELETE_ATTR(\fITYPE, TYPE_KEYVAL, IERROR\fP) INTEGER \fITYPE, TYPE_KEYVAL, IERROR \fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_delete_attr(\fIdatatype\fP, \fItype_keyval\fP, \fIierror\fP) + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER, INTENT(IN) :: \fItype_keyval\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_dup.3in b/ompi/mpi/man/man3/MPI_Type_dup.3in index 21dcdb486a..e8939ce72b 100644 --- a/ompi/mpi/man/man3/MPI_Type_dup.3in +++ b/ompi/mpi/man/man3/MPI_Type_dup.3in @@ -17,10 +17,20 @@ int MPI_Type_dup(MPI_Datatype \fItype\fP, MPI_Datatype *\fInewtype\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_DUP(\fITYPE, NEWTYPE, IERROR\fP) INTEGER \fITYPE, NEWTYPE, IERROR \fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_dup(\fIoldtype\fP, \fInewtype\fP, \fIierror\fP) + TYPE(MPI_Datatype), INTENT(IN) :: \fIoldtype\fP + TYPE(MPI_Datatype), INTENT(OUT) :: \fInewtype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_free.3in b/ompi/mpi/man/man3/MPI_Type_free.3in index 7cf0b0a227..02c7839fb8 100644 --- a/ompi/mpi/man/man3/MPI_Type_free.3in +++ b/ompi/mpi/man/man3/MPI_Type_free.3in @@ -17,10 +17,19 @@ int MPI_Type_free(MPI_Datatype *\fIdatatype\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_FREE(\fIDATATYPE, IERROR\fP) INTEGER \fIDATATYPE, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_free(\fIdatatype\fP, \fIierror\fP) + TYPE(MPI_Datatype), INTENT(INOUT) :: \fIdatatype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_free_keyval.3in b/ompi/mpi/man/man3/MPI_Type_free_keyval.3in index 8ee94a5645..71b90f0500 100644 --- a/ompi/mpi/man/man3/MPI_Type_free_keyval.3in +++ b/ompi/mpi/man/man3/MPI_Type_free_keyval.3in @@ -17,10 +17,19 @@ int MPI_Type_free_keyval(int *\fItype_keyval\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_FREE_KEYVAL(\fITYPE_KEYVAL, IERROR\fP) INTEGER \fITYPE_KEYVAL, IERROR \fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_free_keyval(\fItype_keyval\fP, \fIierror\fP) + INTEGER, INTENT(INOUT) :: \fItype_keyval\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_get_attr.3in b/ompi/mpi/man/man3/MPI_Type_get_attr.3in index d00d826dff..75d34d3b26 100644 --- a/ompi/mpi/man/man3/MPI_Type_get_attr.3in +++ b/ompi/mpi/man/man3/MPI_Type_get_attr.3in @@ -17,12 +17,24 @@ int MPI_Type_get_attr(MPI_Datatype \fItype\fP, int \fItype_keyval\fP, void *\fIa .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_GET_ATTR(\fITYPE, TYPE_KEYVAL, ATTRIBUTE_VAL, FLAG, IERROR\fP) INTEGER \fITYPE, TYPE_KEYVAL, IERROR \fP INTEGER(KIND=MPI_ADDRESS_KIND) \fIATTRIBUTE_VAL\fP LOGICAL \fIFLAG\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_get_attr(\fIdatatype\fP, \fItype_keyval\fP, \fIattribute_val\fP, \fIflag\fP, \fIierror\fP) + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER, INTENT(IN) :: \fItype_keyval\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(OUT) :: \fIattribute_val\fP + LOGICAL, INTENT(OUT) :: \fIflag\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_get_contents.3in b/ompi/mpi/man/man3/MPI_Type_get_contents.3in index a605e05b5c..e32f691e74 100644 --- a/ompi/mpi/man/man3/MPI_Type_get_contents.3in +++ b/ompi/mpi/man/man3/MPI_Type_get_contents.3in @@ -18,7 +18,8 @@ int MPI_Type_get_contents(MPI_Datatype \fIdatatype\fP, int \fImax_integers\fP, .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_GET_CONTENTS(\fIDATATYPE, MAX_INTEGERS, MAX_ADDRESSES, MAX_DATATYPES, ARRAY_OF_INTEGERS, ARRAY_OF_ADDRESSES, ARRAY_OF_DATATYPES, IERROR\fP) @@ -26,6 +27,21 @@ MPI_TYPE_GET_CONTENTS(\fIDATATYPE, MAX_INTEGERS, MAX_ADDRESSES, INTEGER \fIARRAY_OF_INTEGERS(*), ARRAY_OF_DATATYPES(*), IERROR\fP INTEGER(KIND=MPI_ADDRESS_KIND) \fIARRAY_OF_ADDRESSES\fP(*) +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_get_contents(\fIdatatype\fP, \fImax_integers\fP, \fImax_addresses\fP, \fImax_datatypes\fP, + \fIarray_of_integers\fP, \fIarray_of_addresses\fP, \fIarray_of_datatypes,\fP + \fIierror\fP) + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER, INTENT(IN) :: \fImax_integers\fP, \fImax_addresses\fP, \fImax_datatypes\fP + INTEGER, INTENT(OUT) :: \fIarray_of_integers(max_integers)\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(OUT) :: + \fIarray_of_addresses(max_addresses)\fP + TYPE(MPI_Datatype), INTENT(OUT) :: \fIarray_of_datatypes(max_datatypes)\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_get_envelope.3in b/ompi/mpi/man/man3/MPI_Type_get_envelope.3in index 3c7e5df195..5832e9094e 100644 --- a/ompi/mpi/man/man3/MPI_Type_get_envelope.3in +++ b/ompi/mpi/man/man3/MPI_Type_get_envelope.3in @@ -18,12 +18,24 @@ int MPI_Type_get_envelope(MPI_Datatype \fIdatatype\fP, int *\fInum_integers\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_GET_ENVELOPE(\fIDATATYPE, NUM_INTEGERS, NUM_ADDRESSES, NUM_DATATYPES, COMBINER, IERROR\fP) INTEGER \fIDATATYPE, NUM_INTEGERS, NUM_ADDRESSES\fP INTEGER \fINUM_DATATYPES, COMBINER, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_get_envelope(\fIdatatype\fP, \fInum_integers\fP, \fInum_addresses\fP, \fInum_datatypes\fP, + \fIcombiner\fP, \fIierror\fP) + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER, INTENT(OUT) :: \fInum_integers\fP, \fInum_addresses\fP, \fInum_datatypes,\fP + \fIcombiner\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_get_extent.3in b/ompi/mpi/man/man3/MPI_Type_get_extent.3in index f3283e83f8..f629c59f6d 100644 --- a/ompi/mpi/man/man3/MPI_Type_get_extent.3in +++ b/ompi/mpi/man/man3/MPI_Type_get_extent.3in @@ -21,7 +21,8 @@ int MPI_Type_get_extent_x(MPI_Datatype \fIdatatype\fP, MPI_Count\fI *lb\fP, .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_GET_EXTENT(\fIDATATYPE, LB, EXTENT, IERROR\fP) INTEGER \fIDATATYPE, IERROR\fP INTEGER(KIND=MPI_ADDRESS_KIND) \fILB, EXTENT\fP @@ -29,6 +30,19 @@ MPI_TYPE_GET_EXTENT_X(\fIDATATYPE, LB, EXTENT, IERROR\fP) INTEGER \fIDATATYPE, IERROR\fP INTEGER(KIND=MPI_COUNT_KIND) \fILB, EXTENT\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_get_extent(\fIdatatype\fP, \fIlb\fP, \fIextent\fP, \fIierror\fP) + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(OUT) :: \fIlb\fP, \fIextent\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP +MPI_Type_get_extent_x(\fIdatatype\fP, \fIlb\fP, \fIextent\fP, \fIierror\fP) + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER(KIND = MPI_COUNT_KIND), INTENT(OUT) :: \fIlb\fP, \fIextent\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_get_name.3in b/ompi/mpi/man/man3/MPI_Type_get_name.3in index 28edd2d776..83a9838941 100644 --- a/ompi/mpi/man/man3/MPI_Type_get_name.3in +++ b/ompi/mpi/man/man3/MPI_Type_get_name.3in @@ -18,11 +18,22 @@ int MPI_Type_get_name(MPI_Datatype \fItype\fP, char *\fItype_name\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' TYPE_GET_NAME(\fITYPE, TYPE_NAME, RESULTLEN, IERROR\fP) INTEGER \fITYPE, RESULTLEN, IERROR \fP CHARACTER*(*) \fITYPE_NAME\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_get_name(\fIdatatype\fP, \fItype_name\fP, \fIresultlen\fP, \fIierror\fP) + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + CHARACTER(LEN=MPI_MAX_OBJECT_NAME), INTENT(OUT) :: \fItype_name\fP + INTEGER, INTENT(OUT) :: \fIresultlen\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_get_true_extent.3in b/ompi/mpi/man/man3/MPI_Type_get_true_extent.3in index 8b1587f9fe..7191ef066f 100644 --- a/ompi/mpi/man/man3/MPI_Type_get_true_extent.3in +++ b/ompi/mpi/man/man3/MPI_Type_get_true_extent.3in @@ -21,7 +21,8 @@ int MPI_Type_get_true_extent_x(MPI_Datatype \fIdatatype\fP, .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_GET_TRUE_EXTENT(\fIDATATYPE, TRUE_LB, TRUE_EXTENT, IERROR\fP) INTEGER \fIDATATYPE, IERROR\fP INTEGER(KIND=MPI_ADDRESS_KIND) \fITRUE_LB, TRUE_EXTENT\fP @@ -29,6 +30,19 @@ MPI_TYPE_GET_TRUE_EXTENT_X(\fIDATATYPE, TRUE_LB, TRUE_EXTENT, IERROR\fP) INTEGER \fIDATATYPE, IERROR\fP INTEGER(KIND=MPI_COUNT_KIND) \fITRUE_LB, TRUE_EXTENT\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_get_true_extent(\fIdatatype\fP, \fItrue_lb\fP, \fItrue_extent\fP, \fIierror\fP) + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(OUT) :: \fItrue_lb\fP, \fItrue_extent\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP +MPI_Type_get_true_extent_x(\fIdatatype\fP, \fItrue_lb\fP, \fItrue_extent\fP, \fIierror\fP) + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER(KIND = MPI_COUNT_KIND), INTENT(OUT) :: \fItrue_lb\fP, \fItrue_extent\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_indexed.3in b/ompi/mpi/man/man3/MPI_Type_indexed.3in index 4e840d4047..451dcecc45 100644 --- a/ompi/mpi/man/man3/MPI_Type_indexed.3in +++ b/ompi/mpi/man/man3/MPI_Type_indexed.3in @@ -25,7 +25,8 @@ int MPI_Type_create_hindexed(int \fIcount\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_INDEXED(\fICOUNT, ARRAY_OF_BLOCKLENGTHS, ARRAY_OF_DISPLACEMENTS, OLDTYPE, NEWTYPE, IERROR\fP) INTEGER \fICOUNT, ARRAY_OF_BLOCKLENGTHS(*)\fP @@ -39,6 +40,27 @@ MPI_TYPE_CREATE_HINDEXED(\fICOUNT, ARRAY_OF_BLOCKLENGTHS, INTEGER(KIND=MPI_ADDRESS_KIND) \fIARRAY_OF_DISPLACEMENTS(*)\fP INTEGER \fIIERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_indexed(\fIcount\fP, \fIarray_of_blocklengths\fP, \fIarray_of_displacements\fP, + \fIoldtype\fP, \fInewtype\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIcount\fP, \fIarray_of_blocklengths(count),\fP + \fIarray_of_displacements(count)\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIoldtype\fP + TYPE(MPI_Datatype), INTENT(OUT) :: \fInewtype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Type_create_hindexed(\fIcount\fP, \fIarray_of_blocklengths\fP, + \fIarray_of_displacements\fP, \fIoldtype\fP, \fInewtype\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIcount\fP, \fIarray_of_blocklengths(count)\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: + \fIarray_of_displacements(count)\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIoldtype\fP + TYPE(MPI_Datatype), INTENT(OUT) :: \fInewtype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_match_size.3in b/ompi/mpi/man/man3/MPI_Type_match_size.3in index 5cb4de8e7f..76a5c4d5e7 100644 --- a/ompi/mpi/man/man3/MPI_Type_match_size.3in +++ b/ompi/mpi/man/man3/MPI_Type_match_size.3in @@ -20,10 +20,20 @@ int MPI_Type_match_size(int \fItypeclass\fP, int \fIsize\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_MATCH_SIZE(\fITYPECLASS, SIZE, TYPE, IERROR\fP) INTEGER \fITYPECLASS, SIZE, TYPE, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_match_size(\fItypeclass\fP, \fIsize\fP, \fIdatatype\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fItypeclass\fP, \fIsize\fP + TYPE(MPI_Datatype), INTENT(OUT) :: \fIdatatype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_set_attr.3in b/ompi/mpi/man/man3/MPI_Type_set_attr.3in index 705f290f08..200a86e853 100644 --- a/ompi/mpi/man/man3/MPI_Type_set_attr.3in +++ b/ompi/mpi/man/man3/MPI_Type_set_attr.3in @@ -18,11 +18,22 @@ int MPI_Type_set_attr(MPI_Datatype \fItype\fP, int \fItype_keyval\fP, .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_SET_ATTR(\fITYPE, TYPE_KEYVAL, ATTRIBUTE_VAL, IERROR\fP) INTEGER \fITYPE, TYPE_KEYVAL, IERROR\fP INTEGER(KIND=MPI_ADDRESS_KIND) \fIATTRIBUTE_VAL\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_set_attr(\fIdatatype\fP, \fItype_keyval\fP, \fIattribute_val\fP, \fIierror\fP) + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER, INTENT(IN) :: \fItype_keyval\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fIattribute_val\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_set_name.3in b/ompi/mpi/man/man3/MPI_Type_set_name.3in index 8c47be7358..5d5d0f96d2 100644 --- a/ompi/mpi/man/man3/MPI_Type_set_name.3in +++ b/ompi/mpi/man/man3/MPI_Type_set_name.3in @@ -18,11 +18,21 @@ int MPI_Type_set_name(MPI_Datatype \fItype\fP, const char *\fItype_name\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_SET_NAME(\fITYPE, TYPE_NAME, IERROR\fP) INTEGER \fITYPE, IERROR\fP CHARACTER*(*) \fITYPE_NAME\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_set_name(\fIdatatype\fP, \fItype_name\fP, \fIierror\fP) + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + CHARACTER(LEN=*), INTENT(IN) :: \fItype_name\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_size.3in b/ompi/mpi/man/man3/MPI_Type_size.3in index 87883a7c9f..0194bfaea3 100644 --- a/ompi/mpi/man/man3/MPI_Type_size.3in +++ b/ompi/mpi/man/man3/MPI_Type_size.3in @@ -19,7 +19,8 @@ int MPI_Type_size_x(MPI_Datatype \fIdatatype\fP, MPI_Count\fI *size\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_SIZE(\fIDATATYPE, SIZE, IERROR\fP) INTEGER \fIDATATYPE, SIZE, IERROR\fP MPI_TYPE_SIZE_X(\fIDATATYPE, SIZE, IERROR\fP) @@ -27,6 +28,19 @@ MPI_TYPE_SIZE_X(\fIDATATYPE, SIZE, IERROR\fP) INTEGER(KIND=MPI_COUNT_KIND) \fISIZE\fP INTEGER \fIIERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_size(\fIdatatype\fP, \fIsize\fP, \fIierror\fP) + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER, INTENT(OUT) :: \fIsize\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP +MPI_Type_size_x(\fIdatatype\fP, \fIsize\fP, \fIierror\fP) + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER(KIND=MPI_COUNT_KIND), INTENT(OUT) :: \fIsize\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Type_vector.3in b/ompi/mpi/man/man3/MPI_Type_vector.3in index fed088578d..e3b377bfc0 100644 --- a/ompi/mpi/man/man3/MPI_Type_vector.3in +++ b/ompi/mpi/man/man3/MPI_Type_vector.3in @@ -18,12 +18,23 @@ int MPI_Type_vector(int \fIcount\fP, int\fI blocklength\fP, int\fI stride\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_TYPE_VECTOR(\fICOUNT, BLOCKLENGTH, STRIDE, OLDTYPE, NEWTYPE, IERROR\fP) INTEGER \fICOUNT, BLOCKLENGTH, STRIDE, OLDTYPE\fP INTEGER \fINEWTYPE, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Type_vector(\fIcount\fP, \fIblocklength\fP, \fIstride\fP, \fIoldtype\fP, \fInewtype\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIcount\fP, \fIblocklength\fP, \fIstride\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIoldtype\fP + TYPE(MPI_Datatype), INTENT(OUT) :: \fInewtype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Unpack.3in b/ompi/mpi/man/man3/MPI_Unpack.3in index 9e8d558b71..ea5c61d26c 100644 --- a/ompi/mpi/man/man3/MPI_Unpack.3in +++ b/ompi/mpi/man/man3/MPI_Unpack.3in @@ -20,13 +20,28 @@ int MPI_Unpack(const void *\fIinbuf\fP, int\fI insize\fP, int\fI *position\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_UNPACK(\fIINBUF, INSIZE, POSITION, OUTBUF, OUTCOUNT, DATATYPE, COMM, IERROR\fP) \fIINBUF(*), OUTBUF(*)\fP INTEGER \fIINSIZE, POSITION, OUTCOUNT, DATATYPE, COMM, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Unpack(\fIinbuf\fP, \fIinsize\fP, \fIposition\fP, \fIoutbuf\fP, \fIoutcount\fP, \fIdatatype\fP, \fIcomm\fP, + \fIierror\fP) + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIinbuf\fP + TYPE(*), DIMENSION(..) :: \fIoutbuf\fP + INTEGER, INTENT(IN) :: \fIinsize\fP, \fIoutcount\fP + INTEGER, INTENT(INOUT) :: \fIposition\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Unpack_external.3in b/ompi/mpi/man/man3/MPI_Unpack_external.3in index 76c038e1ed..378c0aac47 100644 --- a/ompi/mpi/man/man3/MPI_Unpack_external.3in +++ b/ompi/mpi/man/man3/MPI_Unpack_external.3in @@ -23,7 +23,8 @@ int MPI_Unpack_external(const char \fIdatarep\fP[], const void *\fIinbuf\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_UNPACK_EXTERNAL(\fIDATAREP, INBUF, INSIZE, POSITION, OUTBUF, OUTCOUNT, DATATYPE, IERROR\fP) @@ -32,6 +33,21 @@ MPI_UNPACK_EXTERNAL(\fIDATAREP, INBUF, INSIZE, POSITION, CHARACTER*(*) \fIDATAREP\fP \fIINBUF(*), OUTBUF(*)\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Unpack_external(\fIdatarep\fP, \fIinbuf\fP, \fIinsize\fP, \fIposition\fP, \fIoutbuf\fP, \fIoutcount\fP, + \fIdatatype\fP, \fIierror\fP) + CHARACTER(LEN=*), INTENT(IN) :: \fIdatarep\fP + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIinbuf\fP + TYPE(*), DIMENSION(..) :: \fIoutbuf\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fIinsize\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(INOUT) :: \fIposition\fP + INTEGER, INTENT(IN) :: \fIoutcount\fP + TYPE(MPI_Datatype), INTENT(IN) :: \fIdatatype\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Unpublish_name.3in b/ompi/mpi/man/man3/MPI_Unpublish_name.3in index dc8a92704d..df2d79decc 100644 --- a/ompi/mpi/man/man3/MPI_Unpublish_name.3in +++ b/ompi/mpi/man/man3/MPI_Unpublish_name.3in @@ -23,11 +23,21 @@ int MPI_Unpublish_name(const char *\fIservice_name\fP, MPI_Info \fIinfo\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_UNPUBLISH_NAME(\fISERVICE_NAME, INFO, PORT_NAME, IERROR\fP) CHARACTER*(*) \fISERVICE_NAME, PORT_NAME\fP INTEGER \fIINFO, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Unpublish_name(\fIservice_name\fP, \fIinfo\fP, \fIport_name\fP, \fIierror\fP) + CHARACTER(LEN=*), INTENT(IN) :: \fIservice_name\fP, \fIport_name\fP + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Wait.3in b/ompi/mpi/man/man3/MPI_Wait.3in index 658a699e11..d453869b0f 100644 --- a/ompi/mpi/man/man3/MPI_Wait.3in +++ b/ompi/mpi/man/man3/MPI_Wait.3in @@ -16,10 +16,20 @@ int MPI_Wait(MPI_Request *\fIrequest\fP, MPI_Status\fI *status\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WAIT(\fIREQUEST, STATUS, IERROR\fP) INTEGER \fIREQUEST, STATUS(MPI_STATUS_SIZE), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Wait(\fIrequest\fP, \fIstatus\fP, \fIierror\fP) + TYPE(MPI_Request), INTENT(INOUT) :: \fIrequest\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Waitall.3in b/ompi/mpi/man/man3/MPI_Waitall.3in index e383403629..3509a06b14 100644 --- a/ompi/mpi/man/man3/MPI_Waitall.3in +++ b/ompi/mpi/man/man3/MPI_Waitall.3in @@ -18,11 +18,22 @@ int MPI_Waitall(int \fIcount\fP, MPI_Request\fI array_of_requests[]\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WAITALL(\fICOUNT, ARRAY_OF_REQUESTS, ARRAY_OF_STATUSES, IERROR\fP) INTEGER \fICOUNT, ARRAY_OF_REQUESTS(*)\fP INTEGER \fIARRAY_OF_STATUSES(MPI_STATUS_SIZE,*), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Waitall(\fIcount\fP, \fIarray_of_requests\fP, \fIarray_of_statuses\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Request), INTENT(INOUT) :: \fIarray_of_requests(count)\fP + TYPE(MPI_Status) :: \fIarray_of_statuses(*)\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Waitany.3in b/ompi/mpi/man/man3/MPI_Waitany.3in index 08cca9d0fd..31329d6844 100644 --- a/ompi/mpi/man/man3/MPI_Waitany.3in +++ b/ompi/mpi/man/man3/MPI_Waitany.3in @@ -17,11 +17,23 @@ int MPI_Waitany(int \fIcount\fP, MPI_Request\fI array_of_requests[]\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WAITANY(\fICOUNT, ARRAY_OF_REQUESTS, INDEX, STATUS, IERROR\fP) INTEGER \fICOUNT, ARRAY_OF_REQUESTS(*), INDEX\fP INTEGER \fISTATUS(MPI_STATUS_SIZE), IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Waitany(\fIcount\fP, \fIarray_of_requests\fP, \fIindex\fP, \fIstatus\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIcount\fP + TYPE(MPI_Request), INTENT(INOUT) :: \fIarray_of_requests(count)\fP + INTEGER, INTENT(OUT) :: \fIindex\fP + TYPE(MPI_Status) :: \fIstatus\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Waitsome.3in b/ompi/mpi/man/man3/MPI_Waitsome.3in index 273ab0f1b5..4091538648 100644 --- a/ompi/mpi/man/man3/MPI_Waitsome.3in +++ b/ompi/mpi/man/man3/MPI_Waitsome.3in @@ -19,7 +19,8 @@ int MPI_Waitsome(int \fIincount\fP, MPI_Request \fIarray_of_requests[]\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WAITSOME(\fIINCOUNT, ARRAY_OF_REQUESTS, OUTCOUNT, ARRAY_OF_INDICES, ARRAY_OF_STATUSES, IERROR\fP) INTEGER \fIINCOUNT, ARRAY_OF_REQUESTS(*), OUTCOUNT\fP @@ -27,6 +28,18 @@ MPI_WAITSOME(\fIINCOUNT, ARRAY_OF_REQUESTS, OUTCOUNT, INTEGER \fIARRAY_OF_STATUSES(MPI_STATUS_SIZE*)\fP INTEGER \fIIERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Waitsome(\fIincount\fP, \fIarray_of_requests\fP, \fIoutcount\fP, \fIarray_of_indices\fP, + \fIarray_of_statuses\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIincount\fP + TYPE(MPI_Request), INTENT(INOUT) :: \fIarray_of_requests(incount)\fP + INTEGER, INTENT(OUT) :: \fIoutcount\fP, \fIarray_of_indices(*)\fP + TYPE(MPI_Status) :: \fIarray_of_statuses(*)\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_allocate.3in b/ompi/mpi/man/man3/MPI_Win_allocate.3in index a6dc76f9b8..0115c4aa66 100644 --- a/ompi/mpi/man/man3/MPI_Win_allocate.3in +++ b/ompi/mpi/man/man3/MPI_Win_allocate.3in @@ -20,11 +20,26 @@ int MPI_Win_allocate (MPI_Aint \fIsize\fP, int \fIdisp_unit\fP, MPI_Info \fIinfo .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_ALLOCATE(\fSIZE, DISP_UNIT, INFO, COMM, BASEPTR, WIN, IERROR\fP) INTEGER(KIND=MPI_ADDRESS_KIND) \fISIZE, BASEPTR\fP INTEGER \fIDISP_UNIT, INFO, COMM, WIN, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_allocate(\fIsize\fP, \fIdisp_unit\fP, \fIinfo\fP, \fIcomm\fP, \fIbaseptr\fP, \fIwin\fP, \fIierror\fP) + USE, INTRINSIC :: ISO_C_BINDING, ONLY : C_PTR + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fIsize\fP + INTEGER, INTENT(IN) :: \fIdisp_unit\fP + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(C_PTR), INTENT(OUT) :: \fIbaseptr\fP + TYPE(MPI_Win), INTENT(OUT) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Win_allocate_shared.3in b/ompi/mpi/man/man3/MPI_Win_allocate_shared.3in index 9e17f016a7..518a4e84b4 100644 --- a/ompi/mpi/man/man3/MPI_Win_allocate_shared.3in +++ b/ompi/mpi/man/man3/MPI_Win_allocate_shared.3in @@ -20,11 +20,26 @@ int MPI_Win_allocate_shared (MPI_Aint \fIsize\fP, int \fIdisp_unit\fP, MPI_Info .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_ALLOCATE_SHARED(\fSIZE, DISP_UNIT, INFO, COMM, BASEPTR, WIN, IERROR\fP) INTEGER(KIND=MPI_ADDRESS_KIND) \fISIZE, BASEPTR\fP INTEGER \fIDISP_UNIT, INFO, COMM, WIN, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_allocate_shared(\fIsize\fP, \fIdisp_unit\fP, \fIinfo\fP, \fIcomm\fP, \fIbaseptr\fP, \fIwin\fP, \fIierror\fP) + USE, INTRINSIC :: ISO_C_BINDING, ONLY : C_PTR + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fIsize\fP + INTEGER, INTENT(IN) :: \fIdisp_unit\fP + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(C_PTR), INTENT(OUT) :: \fIbaseptr\fP + TYPE(MPI_Win), INTENT(OUT) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Win_attach.3in b/ompi/mpi/man/man3/MPI_Win_attach.3in index d3e1a6ca68..d461e746d4 100644 --- a/ompi/mpi/man/man3/MPI_Win_attach.3in +++ b/ompi/mpi/man/man3/MPI_Win_attach.3in @@ -17,12 +17,23 @@ MPI_Win_detach(MPI_Win *\fIwin\fP, void *\fIbase\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_ATTACH(\fIWIN, BASE, SIZE, IERROR\fP) \fIBASE\fP(*) INTEGER(KIND=MPI_ADDRESS_KIND) \fISIZE\fP INTEGER \fIWIN, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_attach(\fIwin\fP, \fIbase\fP, \fIsize\fP, \fIierror\fP) + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + TYPE(*), DIMENSION(..), INTENT(IN) :: \fIbase\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fIsize\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Win_call_errhandler.3in b/ompi/mpi/man/man3/MPI_Win_call_errhandler.3in index 38a5eed882..0a68b9ecb3 100644 --- a/ompi/mpi/man/man3/MPI_Win_call_errhandler.3in +++ b/ompi/mpi/man/man3/MPI_Win_call_errhandler.3in @@ -20,10 +20,20 @@ int MPI_Win_call_errhandler(MPI_Win \fIwin\fP, int \fIerrorcode\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_CALL_ERRHANDLER(\fIWIN, ERRORCODE, IERROR\fP) INTEGER \fIWIN, ERRORCODE, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_call_errhandler(\fIwin\fP, \fIerrorcode\fP, \fIierror\fP) + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, INTENT(IN) :: \fIerrorcode\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_complete.3in b/ompi/mpi/man/man3/MPI_Win_complete.3in index 9863b7e4d5..2d64e95b3a 100644 --- a/ompi/mpi/man/man3/MPI_Win_complete.3in +++ b/ompi/mpi/man/man3/MPI_Win_complete.3in @@ -17,9 +17,18 @@ MPI_Win_complete(MPI_Win \fIwin\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_COMPLETE(WIN, IERROR) +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_complete(\fIwin\fP, \fIierror\fP) + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_create.3in b/ompi/mpi/man/man3/MPI_Win_create.3in index 563e7984be..6a45962917 100644 --- a/ompi/mpi/man/man3/MPI_Win_create.3in +++ b/ompi/mpi/man/man3/MPI_Win_create.3in @@ -20,12 +20,26 @@ MPI_Win_create(void *\fIbase\fP, MPI_Aint \fIsize\fP, int \fIdisp_unit\fP, .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_CREATE(\fIBASE, SIZE, DISP_UNIT, INFO, COMM, WIN, IERROR\fP) \fIBASE\fP(*) INTEGER(KIND=MPI_ADDRESS_KIND) \fISIZE\fP INTEGER \fIDISP_UNIT, INFO, COMM, WIN, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_create(\fIbase\fP, \fIsize\fP, \fIdisp_unit\fP, \fIinfo\fP, \fIcomm\fP, \fIwin\fP, \fIierror\fP) + TYPE(*), DIMENSION(..), ASYNCHRONOUS :: \fIbase\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fIsize\fP + INTEGER, INTENT(IN) :: \fIdisp_unit\fP + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Win), INTENT(OUT) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_create_dynamic.3in b/ompi/mpi/man/man3/MPI_Win_create_dynamic.3in index 6500244bd7..6597602383 100644 --- a/ompi/mpi/man/man3/MPI_Win_create_dynamic.3in +++ b/ompi/mpi/man/man3/MPI_Win_create_dynamic.3in @@ -16,10 +16,21 @@ MPI_Win_create_dynamic(MPI_Info \fIinfo\fP, MPI_Comm \fIcomm\fP, MPI_Win *\fIwin .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_CREATE_DYNAMIC(\fIINFO, COMM, WIN, IERROR\fP) INTEGER \fIINFO, COMM, WIN, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_create_dynamic(\fIinfo\fP, \fIcomm\fP, \fIwin\fP, \fIierror\fP) + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + TYPE(MPI_Comm), INTENT(IN) :: \fIcomm\fP + TYPE(MPI_Win), INTENT(OUT) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Win_create_errhandler.3in b/ompi/mpi/man/man3/MPI_Win_create_errhandler.3in index da7588b5b7..88f301ccf4 100644 --- a/ompi/mpi/man/man3/MPI_Win_create_errhandler.3in +++ b/ompi/mpi/man/man3/MPI_Win_create_errhandler.3in @@ -18,11 +18,21 @@ int MPI_Win_create_errhandler(MPI_Win_errhandler_function *\fIfunction\fP, .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_CREATE_ERRHANDLER(\fIFUNCTION, ERRHANDLER, IERROR\fP) EXTERNAL \fIFUNCTION\fP INTEGER \fIERRHANDLER, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_create_errhandler(\fIwin_errhandler_fn\fP, \fIerrhandler\fP, \fIierror\fP) + PROCEDURE(MPI_Win_errhandler_function) :: \fIwin_errhandler_fn\fP + TYPE(MPI_Errhandler), INTENT(OUT) :: \fIerrhandler\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_create_keyval.3in b/ompi/mpi/man/man3/MPI_Win_create_keyval.3in index 1b26bf818d..dc6e4ef9e2 100644 --- a/ompi/mpi/man/man3/MPI_Win_create_keyval.3in +++ b/ompi/mpi/man/man3/MPI_Win_create_keyval.3in @@ -19,13 +19,26 @@ int MPI_Win_create_keyval(MPI_Win_copy_attr_function *\fIwin_copy_attr_fn\fP, .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_CREATE_KEYVAL(\fIWIN_COPY_ATTR_FN, WIN_DELETE_ATTR_FN, WIN_KEYVAL, EXTRA_STATE, IERROR\fP) EXTERNAL \fIWIN_COPY_ATTR_FN, WIN_DELETE_ATTR_FN\fP INTEGER \fIWIN_KEYVAL, IERROR\fP INTEGER(KIND=MPI_ADDRESS_KIND) \fIEXTRA_STATE\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_create_keyval(\fIwin_copy_attr_fn\fP, \fIwin_delete_attr_fn\fP, \fIwin_keyval\fP, + \fIextra_state\fP, \fIierror\fP) + PROCEDURE(MPI_Win_copy_attr_function) :: \fIwin_copy_attr_fn\fP + PROCEDURE(MPI_Win_delete_attr_function) :: \fIwin_delete_attr_fn\fP + INTEGER, INTENT(OUT) :: \fIwin_keyval\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fIextra_state\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_delete_attr.3in b/ompi/mpi/man/man3/MPI_Win_delete_attr.3in index 14b591e912..6a027d4261 100644 --- a/ompi/mpi/man/man3/MPI_Win_delete_attr.3in +++ b/ompi/mpi/man/man3/MPI_Win_delete_attr.3in @@ -17,10 +17,20 @@ int MPI_Win_delete_attr(MPI_Win \fIwin\fP, int \fIwin_keyval\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_DELETE_ATTR(\fIWIN, WIN_KEYVAL, IERROR\fP) INTEGER \fIWIN, WIN_KEYVAL, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_delete_attr(\fIwin\fP, \fIwin_keyval\fP, \fIierror\fP) + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, INTENT(IN) :: \fIwin_keyval\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_fence.3in b/ompi/mpi/man/man3/MPI_Win_fence.3in index 23472a886e..c0295f24e8 100644 --- a/ompi/mpi/man/man3/MPI_Win_fence.3in +++ b/ompi/mpi/man/man3/MPI_Win_fence.3in @@ -17,10 +17,20 @@ int MPI_Win_fence(int \fIassert\fP, MPI_Win \fIwin\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_FENCE(\fIASSERT, WIN, IERROR\fP) INTEGER \fIASSERT, WIN, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_fence(\fIassert\fP, \fIwin\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIassert\fP + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_flush.3in b/ompi/mpi/man/man3/MPI_Win_flush.3in index 7179e81503..770b487391 100644 --- a/ompi/mpi/man/man3/MPI_Win_flush.3in +++ b/ompi/mpi/man/man3/MPI_Win_flush.3in @@ -20,13 +20,27 @@ int MPI_Win_flush_all (MPI_Win \fIwin\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_FLUSH(\fIRANK, WIN, IERROR\fP) INTEGER \fIRANK, WIN, IERROR\fP MPI_WIN_FLUSH_ALL(\fWIN, IERROR\fP) INTEGER \fIWIN, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_flush(\fIrank\fP, \fIwin\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIrank\fP + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Win_flush_all(\fIwin\fP, \fIierror\fP) + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Win_flush_local.3in b/ompi/mpi/man/man3/MPI_Win_flush_local.3in index 34f935111e..dc6044f7a9 100644 --- a/ompi/mpi/man/man3/MPI_Win_flush_local.3in +++ b/ompi/mpi/man/man3/MPI_Win_flush_local.3in @@ -20,13 +20,27 @@ int MPI_Win_flush_local_all (MPI_Win \fIwin\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_FLUSH_LOCAL(\fIRANK, WIN, IERROR\fP) INTEGER \fIRANK, WIN, IERROR\fP MPI_WIN_FLUSH_LOCAL_ALL(\fWIN, IERROR\fP) INTEGER \fIWIN, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_flush_local(\fIrank\fP, \fIwin\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIrank\fP + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + +MPI_Win_flush_local_all(\fIwin\fP, \fIierror\fP) + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Win_free.3in b/ompi/mpi/man/man3/MPI_Win_free.3in index a52822fde9..ea00484d9d 100644 --- a/ompi/mpi/man/man3/MPI_Win_free.3in +++ b/ompi/mpi/man/man3/MPI_Win_free.3in @@ -17,10 +17,19 @@ int MPI_Win_free(MPI_Win *\fIwin\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_FREE(\fIWIN, IERROR\fP) INTEGER \fIWIN, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_free(\fIwin\fP, \fIierror\fP) + TYPE(MPI_Win), INTENT(INOUT) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_free_keyval.3in b/ompi/mpi/man/man3/MPI_Win_free_keyval.3in index 1b881c179c..b1b22cdca8 100644 --- a/ompi/mpi/man/man3/MPI_Win_free_keyval.3in +++ b/ompi/mpi/man/man3/MPI_Win_free_keyval.3in @@ -17,10 +17,19 @@ int MPI_Win_free_keyval(int *\fIwin_keyval\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_FREE_KEYVAL(\fIWIN_KEYVAL, IERROR\fP) INTEGER \fIWIN_KEYVAL, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_free_keyval(\fIwin_keyval\fP, \fIierror\fP) + INTEGER, INTENT(INOUT) :: \fIwin_keyval\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_get_attr.3in b/ompi/mpi/man/man3/MPI_Win_get_attr.3in index d0d110c746..fc0e651d0b 100644 --- a/ompi/mpi/man/man3/MPI_Win_get_attr.3in +++ b/ompi/mpi/man/man3/MPI_Win_get_attr.3in @@ -18,12 +18,24 @@ int MPI_Win_get_attr(MPI_Win \fIwin\fP, int \fIwin_keyval\fP, .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_GET_ATTR(\fIWIN, WIN_KEYVAL, ATTRIBUTE_VAL, FLAG, IERROR\fP) INTEGER \fIWIN, WIN_KEYVAL, IERROR\fP INTEGER(KIND=MPI_ADDRESS_KIND) \fIATTRIBUTE_VAL\fP LOGICAL \fIFLAG\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_get_attr(\fIwin\fP, \fIwin_keyval\fP, \fIattribute_val\fP, \fIflag\fP, \fIierror\fP) + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, INTENT(IN) :: \fIwin_keyval\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(OUT) :: \fIattribute_val\fP + LOGICAL, INTENT(OUT) :: \fIflag\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_get_errhandler.3in b/ompi/mpi/man/man3/MPI_Win_get_errhandler.3in index 725bc07b9d..7a962bee58 100644 --- a/ompi/mpi/man/man3/MPI_Win_get_errhandler.3in +++ b/ompi/mpi/man/man3/MPI_Win_get_errhandler.3in @@ -17,10 +17,20 @@ int MPI_Win_get_errhandler(MPI_Win \fIwin\fP, MPI_Errhandler *\fIerrhandler\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_GET_ERRHANDLER(\fIWIN, ERRHANDLER, IERROR\fP) INTEGER \fIWIN, ERRHANDLER, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_get_errhandler(\fIwin\fP, \fIerrhandler\fP, \fIierror\fP) + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + TYPE(MPI_Errhandler), INTENT(OUT) :: \fIerrhandler\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_get_group.3in b/ompi/mpi/man/man3/MPI_Win_get_group.3in index 7754e761dd..8ec73b8e92 100644 --- a/ompi/mpi/man/man3/MPI_Win_get_group.3in +++ b/ompi/mpi/man/man3/MPI_Win_get_group.3in @@ -17,10 +17,20 @@ MPI_Win_get_group(MPI_Win \fIwin\fP, MPI_Group *\fIgroup\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_GET_GROUP(\fIWIN, GROUP, IERROR\fP) INTEGER \fIWIN, GROUP, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_get_group(\fIwin\fP, \fIgroup\fP, \fIierror\fP) + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + TYPE(MPI_Group), INTENT(OUT) :: \fIgroup\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_get_info.3in b/ompi/mpi/man/man3/MPI_Win_get_info.3in index a7e16776a0..0970c441f6 100644 --- a/ompi/mpi/man/man3/MPI_Win_get_info.3in +++ b/ompi/mpi/man/man3/MPI_Win_get_info.3in @@ -16,10 +16,20 @@ int MPI_Win_get_info(MPI_Win \fIwin\fP, MPI_Info \fI*info_used\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_GET_INFO(\fIWIN, INFO_USED, IERROR\fP) INTEGER \fICOMM, INFO_USED, IERROR \fP . +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_get_info(\fIwin\fP, \fIinfo_used\fP, \fIierror\fP) + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + TYPE(MPI_Info), INTENT(OUT) :: \fIinfo_used\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Win_get_name.3in b/ompi/mpi/man/man3/MPI_Win_get_name.3in index 10c60f9cfd..f5dd3a3117 100644 --- a/ompi/mpi/man/man3/MPI_Win_get_name.3in +++ b/ompi/mpi/man/man3/MPI_Win_get_name.3in @@ -17,11 +17,22 @@ int MPI_Win_get_name(MPI_Win \fIwin\fP, char *\fIwin_name\fP, int *\fIresultlen\ .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_GET_NAME(\fIWIN, WIN_NAME, RESULTLEN, IERROR\fP) INTEGER \fIWIN, RESULTLEN, IERROR\fP CHARACTER*(*) \fIWIN_NAME\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_get_name(\fIwin\fP, \fIwin_name\fP, \fIresultlen\fP, \fIierror\fP) + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + CHARACTER(LEN=MPI_MAX_OBJECT_NAME), INTENT(OUT) :: \fIwin_name\fP + INTEGER, INTENT(OUT) :: \fIresultlen\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_lock.3in b/ompi/mpi/man/man3/MPI_Win_lock.3in index 401dce58ce..a3c4dc608c 100644 --- a/ompi/mpi/man/man3/MPI_Win_lock.3in +++ b/ompi/mpi/man/man3/MPI_Win_lock.3in @@ -18,10 +18,20 @@ int MPI_Win_lock(int \fIlock_type\fP, int \fIrank\fP, int \fIassert\fP, MPI_Win .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_LOCK(\fILOCK_TYPE, RANK, ASSERT, WIN, IERROR\fP) INTEGER \fILOCK_TYPE, RANK, ASSERT, WIN, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_lock(\fIlock_type\fP, \fIrank\fP, \fIassert\fP, \fIwin\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIlock_type\fP, \fIrank\fP, \fIassert\fP + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_lock_all.3in b/ompi/mpi/man/man3/MPI_Win_lock_all.3in index 1dab57056a..3c76e45534 100644 --- a/ompi/mpi/man/man3/MPI_Win_lock_all.3in +++ b/ompi/mpi/man/man3/MPI_Win_lock_all.3in @@ -18,10 +18,20 @@ int MPI_Win_lock_all(int \fIassert\fP, MPI_Win \fIwin\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_LOCK_ALL(\fIASSERT, WIN, IERROR\fP) INTEGER \fIASSERT, WIN, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_lock_all(\fIassert\fP, \fIwin\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIassert\fP + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Win_post.3in b/ompi/mpi/man/man3/MPI_Win_post.3in index 191acacc25..b81da283af 100644 --- a/ompi/mpi/man/man3/MPI_Win_post.3in +++ b/ompi/mpi/man/man3/MPI_Win_post.3in @@ -17,10 +17,21 @@ int MPI_Win_post(MPI_Group \fIgroup\fP, int assert, MPI_Win \fIwin\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_POST(\fIGROUP, ASSERT, WIN, IERROR\fP) INTEGER GROUP, ASSERT, WIN, IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_post(\fIgroup\fP, \fIassert\fP, \fIwin\fP, \fIierror\fP) + TYPE(MPI_Group), INTENT(IN) :: \fIgroup\fP + INTEGER, INTENT(IN) :: \fIassert\fP + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_set_attr.3in b/ompi/mpi/man/man3/MPI_Win_set_attr.3in index be68982c6f..a09e93fde8 100644 --- a/ompi/mpi/man/man3/MPI_Win_set_attr.3in +++ b/ompi/mpi/man/man3/MPI_Win_set_attr.3in @@ -17,11 +17,22 @@ int MPI_Win_set_attr(MPI_Win \fIwin\fP, int \fIwin_keyval\fP, void *\fIattribute .fi .SH Fortran Syntax (see FORTRAN 77 NOTES) .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_SET_ATTR(\fIWIN, WIN_KEYVAL, ATTRIBUTE_VAL, IERROR\fP) INTEGER \fIWIN, WIN_KEYVAL, IERROR\fP INTEGER(KIND=MPI_ADDRESS_KIND) \fIATTRIBUTE_VAL\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_set_attr(\fIwin\fP, \fIwin_keyval\fP, \fIattribute_val\fP, \fIierror\fP) + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, INTENT(IN) :: \fIwin_keyval\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: \fIattribute_val\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_set_errhandler.3in b/ompi/mpi/man/man3/MPI_Win_set_errhandler.3in index d23e705b2c..519033d7a0 100644 --- a/ompi/mpi/man/man3/MPI_Win_set_errhandler.3in +++ b/ompi/mpi/man/man3/MPI_Win_set_errhandler.3in @@ -17,10 +17,20 @@ int MPI_Win_set_errhandler(MPI_Win \fIwin\fP, MPI_Errhandler \fIerrhandler\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_SET_ERRHANDLER(\fIWIN, ERRHANDLER, IERROR\fP) INTEGER \fIWIN, ERRHANDLER, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_set_errhandler(\fIwin\fP, \fIerrhandler\fP, \fIierror\fP) + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + TYPE(MPI_Errhandler), INTENT(IN) :: \fIerrhandler\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_set_info.3in b/ompi/mpi/man/man3/MPI_Win_set_info.3in index 8a6111b7f8..51139e292c 100644 --- a/ompi/mpi/man/man3/MPI_Win_set_info.3in +++ b/ompi/mpi/man/man3/MPI_Win_set_info.3in @@ -16,10 +16,20 @@ int MPI_Win_set_info(MPI_Win \fIwin\fP, MPI_Info \fIinfo\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_SET_INFO(\fIWIN, INFO, IERROR\fP) INTEGER \fIWIN, INFO, IERROR \fP . +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_set_info(\fIwin\fP, \fIinfo\fP, \fIierror\fP) + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + TYPE(MPI_Info), INTENT(IN) :: \fIinfo\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Win_set_name.3in b/ompi/mpi/man/man3/MPI_Win_set_name.3in index 05ea4c234f..8bbc029b9b 100644 --- a/ompi/mpi/man/man3/MPI_Win_set_name.3in +++ b/ompi/mpi/man/man3/MPI_Win_set_name.3in @@ -18,11 +18,21 @@ int MPI_Win_set_name(MPI_Win \fIwin\fP, const char *\fIwin_name\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_SET_NAME(\fIWIN, WIN_NAME, IERROR\fP) INTEGER \fIWIN, IERROR\fP CHARACTER*(*) \fIWIN_NAME\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_set_name(\fIwin\fP, \fIwin_name\fP, \fIierror\fP) + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + CHARACTER(LEN=*), INTENT(IN) :: \fIwin_name\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_shared_query.3in b/ompi/mpi/man/man3/MPI_Win_shared_query.3in index 3e9bc1c7c8..237d9db157 100644 --- a/ompi/mpi/man/man3/MPI_Win_shared_query.3in +++ b/ompi/mpi/man/man3/MPI_Win_shared_query.3in @@ -19,11 +19,25 @@ int MPI_Win_shared_query (MPI_Win \fIwin\fP, int \fIrank\fP, MPI_Aint *\fIsize\f .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_SHARED_QUERY(WIN, RANK, SIZE, DISP_UNIT, BASEPTR, IERROR) INTEGER WIN, RANK, DISP_UNIT, IERROR INTEGER (KIND=MPI_ADDRESS_KIND) SIZE, BASEPTR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_shared_query(\fIwin\fP, \fIrank\fP, \fIsize\fP, \fIdisp_unit\fP, \fIbaseptr\fP, \fIierror\fP) + USE, INTRINSIC :: ISO_C_BINDING, ONLY : C_PTR + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, INTENT(IN) :: \fIrank\fP + INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(OUT) :: \fIsize\fP + INTEGER, INTENT(OUT) :: \fIdisp_unit\fP + TYPE(C_PTR), INTENT(OUT) :: \fIbaseptr\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Win_start.3in b/ompi/mpi/man/man3/MPI_Win_start.3in index fb2f408625..80ca76f7b0 100644 --- a/ompi/mpi/man/man3/MPI_Win_start.3in +++ b/ompi/mpi/man/man3/MPI_Win_start.3in @@ -17,10 +17,21 @@ int MPI_Win_start(MPI_Group \fIgroup\fP, int assert, MPI_Win \fIwin\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_START(\fIGROUP, ASSERT, WIN, IERROR\fP) INTEGER GROUP, ASSERT, WIN, IERROR +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_start(\fIgroup\fP, \fIassert\fP, \fIwin\fP, \fIierror\fP) + TYPE(MPI_Group), INTENT(IN) :: \fIgroup\fP + INTEGER, INTENT(IN) :: \fIassert\fP + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_sync.3in b/ompi/mpi/man/man3/MPI_Win_sync.3in index 9f554d2a39..5f4c17b7de 100644 --- a/ompi/mpi/man/man3/MPI_Win_sync.3in +++ b/ompi/mpi/man/man3/MPI_Win_sync.3in @@ -18,10 +18,19 @@ int MPI_Win_sync (MPI_Win \fIwin\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_SYNC(\fIWIN, IERROR\fP) INTEGER \fIWIN, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_sync(\fIwin\fP, \fIierror\fP) + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Win_test.3in b/ompi/mpi/man/man3/MPI_Win_test.3in index 78dbaa09c8..1a7945f944 100644 --- a/ompi/mpi/man/man3/MPI_Win_test.3in +++ b/ompi/mpi/man/man3/MPI_Win_test.3in @@ -17,10 +17,20 @@ int MPI_Win_test(MPI_Win \fIwin\fP, int *\fIflag\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_TEST(\fI WIN, FLAG, IERROR\fP) INTEGER \fI WIN, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_test(\fIwin\fP, \fIflag\fP, \fIierror\fP) + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + LOGICAL, INTENT(OUT) :: \fIflag\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_unlock.3in b/ompi/mpi/man/man3/MPI_Win_unlock.3in index 5778ab2a73..9383148aad 100644 --- a/ompi/mpi/man/man3/MPI_Win_unlock.3in +++ b/ompi/mpi/man/man3/MPI_Win_unlock.3in @@ -18,10 +18,20 @@ int MPI_Win_unlock(int \fIrank\fP, MPI_Win \fIwin\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_UNLOCK(\fIRANK, WIN, IERROR\fP) INTEGER \fIRANK, WIN, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_unlock(\fIrank\fP, \fIwin\fP, \fIierror\fP) + INTEGER, INTENT(IN) :: \fIrank\fP + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Win_unlock_all.3in b/ompi/mpi/man/man3/MPI_Win_unlock_all.3in index dfef051f22..6dfe84e011 100644 --- a/ompi/mpi/man/man3/MPI_Win_unlock_all.3in +++ b/ompi/mpi/man/man3/MPI_Win_unlock_all.3in @@ -18,10 +18,19 @@ int MPI_Win_unlock_all(MPI_Win \fIwin\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_UNLOCK_ALL(\fWIN, IERROR\fP) INTEGER \fWIN, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_unlock_all(\fIwin\fP, \fIierror\fP) + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH INPUT PARAMETERS .ft R diff --git a/ompi/mpi/man/man3/MPI_Win_wait.3in b/ompi/mpi/man/man3/MPI_Win_wait.3in index bb6e8c6fcb..12bcfaea54 100644 --- a/ompi/mpi/man/man3/MPI_Win_wait.3in +++ b/ompi/mpi/man/man3/MPI_Win_wait.3in @@ -17,10 +17,19 @@ int MPI_Win_wait(MPI_Win \fIwin\fP) .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' MPI_WIN_WAIT(\fI WIN, IERROR\fP) INTEGER \fI WIN, IERROR\fP +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 +MPI_Win_wait(\fIwin\fP, \fIierror\fP) + TYPE(MPI_Win), INTENT(IN) :: \fIwin\fP + INTEGER, OPTIONAL, INTENT(OUT) :: \fIierror\fP + .fi .SH C++ Syntax .nf diff --git a/ompi/mpi/man/man3/MPI_Wtick.3in b/ompi/mpi/man/man3/MPI_Wtick.3in index 0f4a628859..03e6647698 100644 --- a/ompi/mpi/man/man3/MPI_Wtick.3in +++ b/ompi/mpi/man/man3/MPI_Wtick.3in @@ -16,7 +16,14 @@ double MPI_Wtick() .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' +DOUBLE PRECISION MPI_WTICK() + +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 DOUBLE PRECISION MPI_WTICK() .fi diff --git a/ompi/mpi/man/man3/MPI_Wtime.3in b/ompi/mpi/man/man3/MPI_Wtime.3in index c9c51a5b0f..66747ca216 100644 --- a/ompi/mpi/man/man3/MPI_Wtime.3in +++ b/ompi/mpi/man/man3/MPI_Wtime.3in @@ -17,7 +17,14 @@ double MPI_Wtime() .fi .SH Fortran Syntax .nf -INCLUDE 'mpif.h' +USE MPI +! or the older form: INCLUDE 'mpif.h' +DOUBLE PRECISION MPI_WTIME() + +.fi +.SH Fortran 2008 Syntax +.nf +USE mpi_f08 DOUBLE PRECISION MPI_WTIME() .fi From 3e469662ad910ed41c3874bf85438ee2b3544c2c Mon Sep 17 00:00:00 2001 From: Gilles Gouaillardet Date: Fri, 15 May 2015 18:22:15 +0900 Subject: [PATCH 2/2] trim man pages if no c++/f08/fortran --- Makefile.ompi-rules | 60 +++++++++++++++++--------- config/ompi_setup_cxx.m4 | 2 +- ompi/mpi/Makefile.am | 5 ++- ompi/mpi/cxx/Makefile.am | 2 +- ompi/mpi/man/make_manpage.pl | 82 ++++++++++++++++++++++++++++++++++++ 5 files changed, 127 insertions(+), 24 deletions(-) create mode 100755 ompi/mpi/man/make_manpage.pl diff --git a/Makefile.ompi-rules b/Makefile.ompi-rules index 042f844779..007875ec93 100644 --- a/Makefile.ompi-rules +++ b/Makefile.ompi-rules @@ -8,32 +8,50 @@ # $HEADER$ # +TRIM_OPTIONS= +if ! OMPI_BUILD_MPI_CXX_BINDINGS + TRIM_OPTIONS += --nocxx +endif +if ! OMPI_BUILD_FORTRAN_MPIFH_BINDINGS + TRIM_OPTIONS += --nofortran +endif +if ! OMPI_BUILD_FORTRAN_USEMPIF08_BINDINGS + TRIM_OPTIONS += --nof08 +endif + .1in.1: - @ echo " SED $@" - @ sed -e 's/#PACKAGE_NAME#/@PACKAGE_NAME@/g' \ - -e 's/#PACKAGE_VERSION#/@PACKAGE_VERSION@/g' \ - -e 's/#OMPI_DATE#/@OMPI_RELEASE_DATE@/g' \ - -e 's/#OPAL_DATE#/@OMPI_RELEASE_DATE@/g' \ - -e 's/#ORTE_DATE#/@OMPI_RELEASE_DATE@/g' \ - > $@ < $< + @ echo " BUILDING $@" + @ $(top_srcdir)/ompi/mpi/man/make_manpage.pl \ + --package-name='@PACKAGE_NAME@' \ + --package-version='@PACKAGE_VERSION@' \ + --ompi-date='@OMPI_RELEASE_DATE@' \ + --opal-date='@OPAL_RELEASE_DATE@' \ + --orte-date='@ORTE_RELEASE_DATE@' \ + --input=$< \ + --output=$@ .3in.3: - @ echo " SED $@" - @ sed -e 's/#PACKAGE_NAME#/@PACKAGE_NAME@/g' \ - -e 's/#PACKAGE_VERSION#/@PACKAGE_VERSION@/g' \ - -e 's/#OMPI_DATE#/@OMPI_RELEASE_DATE@/g' \ - -e 's/#OPAL_DATE#/@OMPI_RELEASE_DATE@/g' \ - -e 's/#ORTE_DATE#/@OMPI_RELEASE_DATE@/g' \ - > $@ < $< + @ echo " BUILDING $@" + @ $(top_srcdir)/ompi/mpi/man/make_manpage.pl \ + --package-name='@PACKAGE_NAME@' \ + --package-version='@PACKAGE_VERSION@' \ + --ompi-date='@OMPI_RELEASE_DATE@' \ + --opal-date='@OPAL_RELEASE_DATE@' \ + --orte-date='@ORTE_RELEASE_DATE@' \ + $(TRIM_OPTIONS) \ + --input=$< \ + --output=$@ .7in.7: - @ echo " SED $@" - @ sed -e 's/#PACKAGE_NAME#/@PACKAGE_NAME@/g' \ - -e 's/#PACKAGE_VERSION#/@PACKAGE_VERSION@/g' \ - -e 's/#OMPI_DATE#/@OMPI_RELEASE_DATE@/g' \ - -e 's/#OPAL_DATE#/@OMPI_RELEASE_DATE@/g' \ - -e 's/#ORTE_DATE#/@OMPI_RELEASE_DATE@/g' \ - > $@ < $< + @ echo " BUILDING $@" + @ $(top_srcdir)/ompi/mpi/man/make_manpage.pl \ + --package-name='@PACKAGE_NAME@' \ + --package-version='@PACKAGE_VERSION@' \ + --ompi-date='@OMPI_RELEASE_DATE@' \ + --opal-date='@OPAL_RELEASE_DATE@' \ + --orte-date='@ORTE_RELEASE_DATE@' \ + --input=$< \ + --output=$@ # A little verbosity magic; "make" will show the terse output. "make # V=1" will show the actual commands used (just like the other diff --git a/config/ompi_setup_cxx.m4 b/config/ompi_setup_cxx.m4 index 059a172aa8..b675e1d279 100644 --- a/config/ompi_setup_cxx.m4 +++ b/config/ompi_setup_cxx.m4 @@ -59,7 +59,7 @@ AC_DEFUN([OMPI_SETUP_CXX],[ _OMPI_CXX_CHECK_2D_CONST_CAST - AM_CONDITIONAL(BUILD_MPI_CXX_BINDINGS, [test "$WANT_MPI_CXX_SUPPORT" = 1]) + AM_CONDITIONAL(OMPI_BUILD_MPI_CXX_BINDINGS, [test "$WANT_MPI_CXX_SUPPORT" = 1]) AC_DEFINE_UNQUOTED(OMPI_BUILD_CXX_BINDINGS, $WANT_MPI_CXX_SUPPORT, [Whether we want MPI C++ support or not]) ]) diff --git a/ompi/mpi/Makefile.am b/ompi/mpi/Makefile.am index 60940b6e7f..f4d2970b6c 100644 --- a/ompi/mpi/Makefile.am +++ b/ompi/mpi/Makefile.am @@ -10,6 +10,8 @@ # Copyright (c) 2004-2005 The Regents of the University of California. # All rights reserved. # Copyright (c) 2006-2012 Cisco Systems, Inc. All rights reserved. +# Copyright (c) 2015 Research Organization for Information Science +# and Technology (RIST). All rights reserved. # $COPYRIGHT$ # # Additional copyrights may follow @@ -18,6 +20,7 @@ # EXTRA_DIST = \ - mpi/fortran/configure-fortran-output-bottom.h + mpi/fortran/configure-fortran-output-bottom.h \ + mpi/man/make_manpage.pl dist_ompidata_DATA += mpi/help-mpi-api.txt diff --git a/ompi/mpi/cxx/Makefile.am b/ompi/mpi/cxx/Makefile.am index 5a0efaac9f..f3a3a7e3dc 100644 --- a/ompi/mpi/cxx/Makefile.am +++ b/ompi/mpi/cxx/Makefile.am @@ -25,7 +25,7 @@ # code. AM_CPPFLAGS = -DOMPI_BUILDING_CXX_BINDINGS_LIBRARY=1 -DOMPI_SKIP_MPICXX=1 -if BUILD_MPI_CXX_BINDINGS +if OMPI_BUILD_MPI_CXX_BINDINGS mpi_lib = libmpi_cxx.la diff --git a/ompi/mpi/man/make_manpage.pl b/ompi/mpi/man/make_manpage.pl new file mode 100755 index 0000000000..c350a9c8ee --- /dev/null +++ b/ompi/mpi/man/make_manpage.pl @@ -0,0 +1,82 @@ +#!/usr/bin/env perl +# +# Copyright (c) 2015 Research Organization for Information Science +# and Technology (RIST). All rights reserved. +# Copyright (c) 2015 Cisco Systems, Inc. All rights reserved. +# $COPYRIGHT$ +# +# Subroutine to generate a bunch of Fortran declarations and symbols +# + +use strict; + +use Getopt::Long; + +my $package_name; +my $package_version; +my $ompi_date; +my $opal_date; +my $orte_date; +my $cxx = '1'; +my $fortran = '1'; +my $f08 = '1'; +my $input; +my $output; +my $help_arg = 0; + +&Getopt::Long::Configure("bundling"); +my $ok = Getopt::Long::GetOptions("package-name=s" => \$package_name, + "package-version=s" => \$package_version, + "ompi-date=s" => \$ompi_date, + "opal-date=s" => \$opal_date, + "orte-date=s" => \$orte_date, + "cxx!" => \$cxx, + "fortran!" => \$fortran, + "f08!" => \$f08, + "input=s" => \$input, + "output=s" => \$output); + +if ($help_arg || !$ok || + !defined($input) || + !defined($output) || + !defined($package_name) || + !defined($package_version) || + !defined($ompi_date) || + !defined($opal_date) || + !defined($orte_date)) { + print "Usage: $0 --package-name= --package-version= --ompi-date= --opal-date= --orte-date= --input= --output= [--nocxx] [ --nofortran] [--nof08]\n"; + exit(1 - $ok); +} + +open(FILE, $input) || + die "Can't open $input"; +my $file; +$file .= $_ + while(); +close(FILE); + +$file =~ s/#PACKAGE_NAME#/$package_name/g; +$file =~ s/#PACKAGE_VERSION#/$package_version/g; +$file =~ s/#OMPI_DATE#/$ompi_date/g; +$file =~ s/#OPAL_DATE#/$opal_date/g; +$file =~ s/#ORTE_DATE#/$orte_date/g; + +if ($cxx == 0) { + $file =~ s/\n\.SH C\+\+ Syntax.+?fi\n/\n/s; +} + +if ($fortran == 0) { + $file =~ s/\n\.SH Fortran Syntax.+?fi\n/\n/s; +} + +if ($f08 == 0) { + $file =~ s/\n\.SH Fortran 2008 Syntax.+?fi\n/\n/s; +} + +open(FILE, ">$output") || + die "Can't open $output"; +print FILE $file; +close(FILE); + +exit(0); +