field_k_local Function

public function field_k_local(it, ik)

Uses

FIXME : Add documentation

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: it
integer, intent(in) :: ik

Return Value logical


Contents

Source Code

field_k_local

Source Code

  function field_k_local(it,ik)
    use mp, only: iproc, nproc
    implicit none
    integer, intent(in) :: ik, it
    logical :: field_k_local

    ! This is temporary while the fields are being parallelised
    field_k_local = (mod(it-1,nproc) == iproc)
  end function field_k_local