set_colors Subroutine

private pure subroutine set_colors(this, colors)

Type Bound

format_lut

Arguments

Type IntentOptional Attributes Name
class(format_lut), intent(inout) :: this
integer, intent(in), dimension(:,:) :: colors

Source Code

   pure subroutine set_colors(this, colors)
      class(format_lut),       intent(inout) :: this
      integer, dimension(:,:), intent(in)    :: colors
      this%colors = colors
   end subroutine set_colors