mpi_check_single_access Subroutine

public subroutine mpi_check_single_access()

Uses

  • proc~~mpi_check_single_access~~UsesGraph proc~mpi_check_single_access mpi_check_single_access module~modgvec_globals MODgvec_Globals proc~mpi_check_single_access->module~modgvec_globals iso_fortran_env iso_fortran_env module~modgvec_globals->iso_fortran_env

Arguments

None

Called by

proc~~mpi_check_single_access~~CalledByGraph proc~mpi_check_single_access mpi_check_single_access proc~ncfile_closefile t_ncfile%ncfile_closefile proc~ncfile_closefile->proc~mpi_check_single_access proc~ncfile_handle_error t_ncfile%ncfile_handle_error proc~ncfile_closefile->proc~ncfile_handle_error proc~ncfile_def_dim t_ncfile%ncfile_def_dim proc~ncfile_def_dim->proc~mpi_check_single_access proc~ncfile_def_dim->proc~ncfile_handle_error proc~ncfile_end_def_mode t_ncfile%ncfile_end_def_mode proc~ncfile_end_def_mode->proc~mpi_check_single_access proc~ncfile_end_def_mode->proc~ncfile_handle_error proc~ncfile_enter_groups t_ncfile%ncfile_enter_groups proc~ncfile_enter_groups->proc~mpi_check_single_access proc~ncfile_openfile t_ncfile%ncfile_openfile proc~ncfile_enter_groups->proc~ncfile_openfile proc~ncfile_free t_ncfile%ncfile_free proc~ncfile_free->proc~mpi_check_single_access proc~ncfile_free->proc~ncfile_closefile proc~ncfile_get_array t_ncfile%ncfile_get_array proc~ncfile_get_array->proc~mpi_check_single_access proc~ncfile_get_array->proc~ncfile_enter_groups proc~ncfile_get_array->proc~ncfile_handle_error proc~ncfile_get_scalar t_ncfile%ncfile_get_scalar proc~ncfile_get_scalar->proc~mpi_check_single_access proc~ncfile_get_scalar->proc~ncfile_enter_groups proc~ncfile_get_scalar->proc~ncfile_handle_error proc~ncfile_get_var_dims t_ncfile%ncfile_get_var_dims proc~ncfile_get_var_dims->proc~mpi_check_single_access proc~ncfile_get_var_dims->proc~ncfile_enter_groups proc~ncfile_get_var_dims->proc~ncfile_handle_error proc~ncfile_get_var_ndims t_ncfile%ncfile_get_var_ndims proc~ncfile_get_var_ndims->proc~mpi_check_single_access proc~ncfile_get_var_ndims->proc~ncfile_enter_groups proc~ncfile_get_var_ndims->proc~ncfile_handle_error proc~ncfile_handle_error->proc~mpi_check_single_access proc~ncfile_init ncfile_init proc~ncfile_init->proc~mpi_check_single_access proc~ncfile_init->proc~ncfile_openfile proc~ncfile_openfile->proc~mpi_check_single_access proc~ncfile_openfile->proc~ncfile_handle_error proc~ncfile_put_array t_ncfile%ncfile_put_array proc~ncfile_put_array->proc~mpi_check_single_access proc~ncfile_put_array->proc~ncfile_handle_error proc~ncfile_put_array->proc~ncfile_openfile proc~ncfile_put_attributes_char t_ncfile%ncfile_put_attributes_char proc~ncfile_put_attributes_char->proc~mpi_check_single_access proc~ncfile_put_attributes_char->proc~ncfile_handle_error proc~ncfile_put_char t_ncfile%ncfile_put_char proc~ncfile_put_char->proc~mpi_check_single_access proc~ncfile_put_char->proc~ncfile_handle_error proc~ncfile_put_scalar t_ncfile%ncfile_put_scalar proc~ncfile_put_scalar->proc~mpi_check_single_access proc~ncfile_put_scalar->proc~ncfile_handle_error proc~ncfile_var_exists t_ncfile%ncfile_var_exists proc~ncfile_var_exists->proc~mpi_check_single_access proc~ncfile_var_exists->proc~ncfile_enter_groups proc~bff_init t_boundaryFromFile%bff_init proc~bff_init->proc~ncfile_init proc~readnetcdf~2 ReadNETCDF proc~bff_init->proc~readnetcdf~2 proc~hmap_axisnb_init_params hmap_axisNB_init_params proc~hmap_axisnb_init_params->proc~ncfile_init proc~readnetcdf ReadNETCDF proc~hmap_axisnb_init_params->proc~readnetcdf proc~visu_axisnb Visu_axisNB proc~hmap_axisnb_init_params->proc~visu_axisnb proc~readnetcdf->proc~ncfile_closefile proc~readnetcdf->proc~ncfile_get_array proc~readnetcdf->proc~ncfile_get_scalar proc~readnetcdf~2->proc~ncfile_closefile proc~readnetcdf~2->proc~ncfile_get_array proc~readnetcdf~2->proc~ncfile_get_scalar proc~readnetcdf~2->proc~ncfile_var_exists proc~writedatatonetcdf WriteDataToNETCDF proc~writedatatonetcdf->proc~ncfile_def_dim proc~writedatatonetcdf->proc~ncfile_end_def_mode proc~writedatatonetcdf->proc~ncfile_init proc~writedatatonetcdf->proc~ncfile_put_array proc~writedatatonetcdf->proc~ncfile_put_attributes_char proc~writedatatonetcdf->proc~ncfile_put_char interface~t_hmap_axisnb t_hmap_axisNB interface~t_hmap_axisnb->proc~hmap_axisnb_init_params proc~hmap_axisnb_init hmap_axisNB_init interface~t_hmap_axisnb->proc~hmap_axisnb_init proc~boundaryfromfile_new boundaryFromFile_new proc~boundaryfromfile_new->proc~bff_init proc~hmap_axisnb_init->proc~hmap_axisnb_init_params proc~visu_axisnb->proc~writedatatonetcdf proc~visufrenet VisuFrenet proc~visufrenet->proc~writedatatonetcdf proc~hmap_frenet_init_params hmap_frenet_init_params proc~hmap_frenet_init_params->proc~visufrenet interface~t_hmap_frenet t_hmap_frenet interface~t_hmap_frenet->proc~hmap_frenet_init_params proc~hmap_frenet_init hmap_frenet_init interface~t_hmap_frenet->proc~hmap_frenet_init proc~hmap_frenet_init->proc~hmap_frenet_init_params

Source Code

  SUBROUTINE mpi_check_single_access()
    USE MODgvec_Globals,ONLY: abort,MPIroot
    IMPLICIT NONE
    !===============================================================================================================================
#if MPI
    IF(.NOT. MPIroot) &
       CALL abort(__STAMP__,&
                  "netcdf routines are supposed to be called by MPIroot only")
#endif /*MPI*/
  END SUBROUTINE mpi_check_single_access