block_obj_SetPeriodicity Subroutine

private pure subroutine block_obj_SetPeriodicity(this, periods)

Sets block periodicity in each direction.

Type Bound

block_obj

Arguments

Type IntentOptional Attributes Name
class(block_obj), intent(inout) :: this

A block object
logical, intent(in) :: periods(3)

Periodicity

Called by

proc~~block_obj_setperiodicity~~CalledByGraph proc~block_obj_setperiodicity block_obj%block_obj_SetPeriodicity proc~collision_obj_setupcollisionblock collision_obj%collision_obj_SetupCollisionBlock proc~collision_obj_setupcollisionblock->proc~block_obj_setperiodicity proc~collision_obj_setupcollisionblock2 collision_obj%collision_obj_SetupCollisionBlock2 proc~collision_obj_setupcollisionblock2->proc~block_obj_setperiodicity proc~cdifs_obj_preparesolver cdifs_obj_PrepareSolver proc~cdifs_obj_preparesolver->proc~collision_obj_setupcollisionblock proc~grans_obj_preparesolvercollision grans_obj_PrepareSolverCollision proc~grans_obj_preparesolvercollision->proc~collision_obj_setupcollisionblock interface~cdifs_obj_preparesolver cdifs_obj%cdifs_obj_PrepareSolver interface~cdifs_obj_preparesolver->proc~cdifs_obj_preparesolver proc~grans_obj_preparesolver grans_obj_PrepareSolver proc~grans_obj_preparesolver->proc~grans_obj_preparesolvercollision interface~grans_obj_preparesolver grans_obj%grans_obj_PrepareSolver interface~grans_obj_preparesolver->proc~grans_obj_preparesolver

Source Code

    pure subroutine block_obj_SetPeriodicity(this,periods)
      !> Sets block periodicity in each direction.
      implicit none
      class(block_obj), intent(inout) :: this                                  !! A block object
      logical,          intent(in)    :: periods(3)                            !! Periodicity

      this%periods = periods

      return
    end subroutine block_obj_SetPeriodicity