par_Bcast_scalar_int Subroutine

private subroutine par_Bcast_scalar_int(scalar_int, fromRank)

Uses

  • proc~~par_bcast_scalar_int~~UsesGraph proc~par_bcast_scalar_int par_Bcast_scalar_int module~modgvec_globals MODgvec_Globals proc~par_bcast_scalar_int->module~modgvec_globals iso_fortran_env iso_fortran_env module~modgvec_globals->iso_fortran_env

Broadcast a scalar from MPI rank 'fromRank' to all MPI ranks.

Arguments

Type IntentOptional Attributes Name
integer, intent(inout) :: scalar_int
integer :: fromRank

Calls

proc~~par_bcast_scalar_int~~CallsGraph proc~par_bcast_scalar_int par_Bcast_scalar_int mpi_bcast mpi_bcast proc~par_bcast_scalar_int->mpi_bcast

Called by

proc~~par_bcast_scalar_int~~CalledByGraph proc~par_bcast_scalar_int par_Bcast_scalar_int interface~par_bcast par_Bcast interface~par_bcast->proc~par_bcast_scalar_int proc~evalforce EvalForce proc~evalforce->interface~par_bcast proc~fillstrings FillStrings proc~fillstrings->interface~par_bcast proc~hmap_axisnb_init_params hmap_axisNB_init_params proc~hmap_axisnb_init_params->interface~par_bcast proc~init_la_from_solution Init_LA_from_Solution proc~init_la_from_solution->interface~par_bcast proc~initmhd3d t_functional_mhd3d%InitMHD3D proc~initmhd3d->interface~par_bcast proc~initprofilesgp InitProfilesGP proc~initprofilesgp->interface~par_bcast proc~initsolutionmhd3d t_functional_mhd3d%InitSolutionMHD3D proc~initsolutionmhd3d->interface~par_bcast proc~initsolutionmhd3d->proc~evalforce proc~initsolutionmhd3d->proc~init_la_from_solution proc~initsolutionmhd3d->proc~initprofilesgp 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~hmap_axisnb_init->proc~hmap_axisnb_init_params proc~minimizemhd3d_descent MinimizeMHD3D_descent proc~minimizemhd3d_descent->proc~evalforce program~gvec_post GVEC_POST program~gvec_post->proc~evalforce program~gvec_post->proc~initprofilesgp proc~minimizemhd3d t_functional_mhd3d%MinimizeMHD3D proc~minimizemhd3d->proc~minimizemhd3d_descent

Source Code

  SUBROUTINE par_Bcast_scalar_int(scalar_int,fromRank)
  ! MODULES
    USE MODgvec_Globals, ONLY : wp
    IMPLICIT NONE
  !--------------------------------------------------------------------------------------------------------------------------------
  ! INPUT VARIABLES
    INTEGER, INTENT(INOUT)       :: scalar_int
    INTEGER                      :: fromRank
  !--------------------------------------------------------------------------------------------------------------------------------
  ! LOCAL VARIABLES
#   if MPI
    INTEGER     :: ierr
  !================================================================================================================================
  ! BODY
    CALL MPI_Bcast(scalar_int, 1, MPI_INTEGER, fromRank, worldComm, ierr)
#   endif
  END SUBROUTINE par_Bcast_scalar_int