get_backlight_actual_brightness Subroutine

  1. forclust.f90
  2. forclust
  3. get_backlight_actual_brightness

private impure elemental subroutine get_backlight_actual_brightness(this, actual_brightness)

Type Bound

linux_backlight

Arguments

Type IntentOptional Attributes Name
class(linux_backlight), intent(inout) :: this
integer, intent(out), optional :: actual_brightness

Contents

Source Code

get_backlight_actual_brightness

Source Code

   elemental impure subroutine get_backlight_actual_brightness(this, actual_brightness)
      class(linux_backlight), intent(inout)          :: this
      integer,                intent(out),  optional :: actual_brightness

      if (present(actual_brightness)) actual_brightness = this%actual_brightness
      if (this%debug=='on') print'(a,i0)', 'actual brightness:         ', this%actual_brightness
   end subroutine get_backlight_actual_brightness