set_intel Subroutine

private pure elemental subroutine set_intel(this, intel)

Type Bound

filters

Arguments

Type IntentOptional Attributes Name
class(filters), intent(inout) :: this
logical, intent(in) :: intel

Contents

Source Code


Source Code

   elemental pure subroutine set_intel(this, intel)
      class(filters), intent(inout) :: this
      logical, intent(in)           :: intel

      this%intel = intel
   end subroutine set_intel