fplot_colors Module



Contents


Variables

Type Visibility Attributes Name Initial
type(color), public, parameter :: CLR_BLACK = color(0, 0, 0)

Black.

type(color), public, parameter :: CLR_BLUE = color(0, 0, 255)

Blue.

type(color), public, parameter :: CLR_CYAN = color(0, 255, 255)

Cyan.

type(color), public, parameter :: CLR_GRAY = color(128, 128, 128)

Gray.

type(color), public, parameter :: CLR_GREEN = color(0, 128, 0)

Green.

type(color), public, parameter :: CLR_LIME = color(0, 255, 0)

Lime.

type(color), public, parameter :: CLR_MAGENTA = color(255, 0, 255)

Magenta.

type(color), public, parameter :: CLR_MAROON = color(128, 0, 0)

Maroon.

type(color), public, parameter :: CLR_NAVY = color(0, 0, 128)

Navy.

type(color), public, parameter :: CLR_OLIVE = color(128, 128, 0)

Olive.

type(color), public, parameter :: CLR_ORANGE = color(255, 165, 0)

Orange.

type(color), public, parameter :: CLR_PURPLE = color(128, 0, 128)

Purple.

type(color), public, parameter :: CLR_RED = color(255, 0, 0)

Red.

type(color), public, parameter :: CLR_SILVER = color(192, 192, 192)

Silver.

type(color), public, parameter :: CLR_TEAL = color(0, 128, 128)

Teal.

type(color), public, parameter :: CLR_WHITE = color(255, 255, 255)

White.

type(color), public, parameter :: CLR_YELLOW = color(255, 255, 0)

Yellow.

type(color), public, parameter, dimension(7) :: color_list = [color(0, int(0.447*255), int(0.741*255)), color(int(0.85*255), int(0.325*255), int(0.098*255)), color(int(0.929*255), int(0.694*255), int(0.125*255)), color(int(0.494*255), int(0.184*255), int(0.556*255)), color(int(0.466*255), int(0.674*255), int(0.188*255)), color(int(0.301*255), int(0.745*255), int(0.933*255)), color(int(0.635*255), int(0.078*255), int(0.184*255))]

Interfaces

public interface operator(/=)

  • private pure function clr_not_equals(x, y) result(rst)

    Arguments

    Type IntentOptional Attributes Name
    type(color), intent(in) :: x
    type(color), intent(in) :: y

    Return Value logical

public interface operator(==)

  • private pure function clr_equals(x, y) result(rst)

    Arguments

    Type IntentOptional Attributes Name
    type(color), intent(in) :: x
    type(color), intent(in) :: y

    Return Value logical


Derived Types

type, public ::  color

Describes an RGB color.

Components

Type Visibility Attributes Name Initial
integer(kind=int32), public :: blue = 255

The blue component of the color (must be between 0 and 255).

integer(kind=int32), public :: green = 0

The green component of the color (must be between 0 and 255).

integer(kind=int32), public :: red = 0

The red component of the color (must be between 0 and 255).

Type-Bound Procedures

procedure , public , pass :: copy_from => clr_copy_from Subroutine
procedure , public , pass :: to_hex_string => clr_to_hex_string Function