set_hsv Subroutine

private pure elemental subroutine set_hsv(this, h, s, v)

Type Bound

color

Arguments

Type IntentOptional Attributes Name
class(color), intent(inout) :: this
real(kind=rk), intent(in) :: h
real(kind=rk), intent(in) :: s
real(kind=rk), intent(in) :: v

Called by

proc~~set_hsv~~CalledByGraph proc~set_hsv color%set_hsv proc~set color%set proc~set->proc~set_hsv program~demo_color demo_color program~demo_color->proc~set program~example26 example26 program~example26->proc~set program~example27 example27 program~example27->proc~set program~example28 example28 program~example28->proc~set

Source Code

   elemental pure subroutine set_hsv(this, h, s, v)
      class(color), intent(inout) :: this
      real(rk),    intent(in)    :: h, s, v

      this%h = h
      this%s = s
      this%v = v
   end subroutine set_hsv