set_light_ambient Subroutine

private subroutine set_light_ambient(self, rgb)

The ambient, diffuse and specular colors ([r, g, b], 0 to 1) of the window's light (OpenFrames' defaults: 0.2 gray, white, none). The window's light is used while no frame of the scene has a light source (set_light_source_enabled).

Type Bound

WindowProxy

Arguments

Type IntentOptional Attributes Name
class(WindowProxy), intent(inout) :: self
real(kind=wp), intent(in) :: rgb(3)

[r, g, b], 0 to 1 (default 0.2 gray)

Calls

proc~~set_light_ambient~~CallsGraph proc~set_light_ambient WindowProxy%set_light_ambient proc~apply_window_light apply_window_light proc~set_light_ambient->proc~apply_window_light interface~vkf_light_set vkf_light_set proc~apply_window_light->interface~vkf_light_set interface~vkf_viewer_light vkf_viewer_light proc~apply_window_light->interface~vkf_viewer_light

Source Code

    subroutine set_light_ambient(self, rgb)
        class(WindowProxy), intent(inout) :: self
        real(wp), intent(in) :: rgb(3)                      !! [r, g, b], 0 to 1 (default 0.2 gray)
        self%light_ambient_ = rgb
        call apply_window_light(self)
    end subroutine set_light_ambient