| /dports/net/openmpi3/openmpi-3.1.6/ompi/mpi/fortran/use-mpi-f08/profile/ |
| H A D | pinit_f08.F90 | 12 integer :: c_ierror local
14 call ompi_init_f(c_ierror)
15 if (present(ierror)) ierror = c_ierror
|
| H A D | pfinalize_f08.F90 | 12 integer :: c_ierror local
14 call ompi_finalize_f(c_ierror)
15 if (present(ierror)) ierror = c_ierror
|
| H A D | ptype_free_keyval_f08.F90 | 13 integer :: c_ierror local
15 call ompi_type_free_keyval_f(type_keyval,c_ierror)
16 if (present(ierror)) ierror = c_ierror
|
| H A D | padd_error_class_f08.F90 | 13 integer :: c_ierror local
15 call ompi_add_error_class_f(errorclass,c_ierror)
16 if (present(ierror)) ierror = c_ierror
|
| H A D | pfinalized_f08.F90 | 15 integer :: c_ierror local
17 call PMPI_Finalized(flag,c_ierror)
18 if (present(ierror)) ierror = c_ierror
|
| H A D | pwin_free_keyval_f08.F90 | 13 integer :: c_ierror local
15 call ompi_win_free_keyval_f(win_keyval,c_ierror)
16 if (present(ierror)) ierror = c_ierror
|
| /dports/net/openmpi3/openmpi-3.1.6/ompi/mpi/fortran/use-mpi-f08/ |
| H A D | init_f08.F90 | 12 integer :: c_ierror local
14 call ompi_init_f(c_ierror)
15 if (present(ierror)) ierror = c_ierror
|
| H A D | finalize_f08.F90 | 12 integer :: c_ierror local
14 call ompi_finalize_f(c_ierror)
15 if (present(ierror)) ierror = c_ierror
|
| H A D | initialized_f08.F90 | 15 integer :: c_ierror local
17 call PMPI_Initialized(flag,c_ierror)
18 if (present(ierror)) ierror = c_ierror
|
| H A D | comm_free_keyval_f08.F90 | 13 integer :: c_ierror local
15 call ompi_comm_free_keyval_f(comm_keyval,c_ierror)
16 if (present(ierror)) ierror = c_ierror
|
| H A D | finalized_f08.F90 | 15 integer :: c_ierror local
17 call PMPI_Finalized(flag,c_ierror)
18 if (present(ierror)) ierror = c_ierror
|
| /dports/net/openmpi/openmpi-4.1.1/ompi/mpi/fortran/use-mpi-f08/ |
| H A D | init_f08.F90 | 14 integer :: c_ierror local
16 call ompi_init_f(c_ierror)
17 if (present(ierror)) ierror = c_ierror
|
| H A D | finalize_f08.F90 | 14 integer :: c_ierror local
16 call ompi_finalize_f(c_ierror)
17 if (present(ierror)) ierror = c_ierror
|
| H A D | initialized_f08.F90 | 15 integer :: c_ierror local
17 call PMPI_Initialized(flag,c_ierror)
18 if (present(ierror)) ierror = c_ierror
|
| H A D | comm_free_keyval_f08.F90 | 15 integer :: c_ierror local
17 call ompi_comm_free_keyval_f(comm_keyval,c_ierror)
18 if (present(ierror)) ierror = c_ierror
|
| H A D | query_thread_f08.F90 | 15 integer :: c_ierror local
17 call ompi_query_thread_f(provided,c_ierror)
18 if (present(ierror)) ierror = c_ierror
|
| H A D | type_free_keyval_f08.F90 | 15 integer :: c_ierror local
17 call ompi_type_free_keyval_f(type_keyval,c_ierror)
18 if (present(ierror)) ierror = c_ierror
|
| H A D | win_free_keyval_f08.F90 | 15 integer :: c_ierror local
17 call ompi_win_free_keyval_f(win_keyval,c_ierror)
18 if (present(ierror)) ierror = c_ierror
|
| /dports/net/openmpi/openmpi-4.1.1/ompi/mpi/fortran/use-mpi-f08/profile/ |
| H A D | pinit_f08.F90 | 14 integer :: c_ierror local
16 call ompi_init_f(c_ierror)
17 if (present(ierror)) ierror = c_ierror
|
| H A D | pfinalize_f08.F90 | 14 integer :: c_ierror local
16 call ompi_finalize_f(c_ierror)
17 if (present(ierror)) ierror = c_ierror
|
| H A D | pis_thread_main_f08.F90 | 15 integer :: c_ierror local
17 call PMPI_Is_thread_main(flag,c_ierror)
18 if (present(ierror)) ierror = c_ierror
|
| H A D | pwin_free_keyval_f08.F90 | 15 integer :: c_ierror local
17 call ompi_win_free_keyval_f(win_keyval,c_ierror)
18 if (present(ierror)) ierror = c_ierror
|
| H A D | pfinalized_f08.F90 | 15 integer :: c_ierror local
17 call PMPI_Finalized(flag,c_ierror)
18 if (present(ierror)) ierror = c_ierror
|
| H A D | pinitialized_f08.F90 | 15 integer :: c_ierror local
17 call PMPI_Initialized(flag,c_ierror)
18 if (present(ierror)) ierror = c_ierror
|
| H A D | pquery_thread_f08.F90 | 15 integer :: c_ierror local
17 call ompi_query_thread_f(provided,c_ierror)
18 if (present(ierror)) ierror = c_ierror
|