ColorsUcs4 Derived Type

type, public :: ColorsUcs4


Components

Type Visibility Attributes Name Initial
character(kind=ucs4, len=:), public, allocatable :: reset
character(kind=ucs4, len=:), public, allocatable :: bold
character(kind=ucs4, len=:), public, allocatable :: faint
character(kind=ucs4, len=:), public, allocatable :: italic
character(kind=ucs4, len=:), public, allocatable :: underline
character(kind=ucs4, len=:), public, allocatable :: blink
character(kind=ucs4, len=:), public, allocatable :: reverse
character(kind=ucs4, len=:), public, allocatable :: hidden
character(kind=ucs4, len=:), public, allocatable :: strikethrough
character(kind=ucs4, len=:), public, allocatable :: red
character(kind=ucs4, len=:), public, allocatable :: green
character(kind=ucs4, len=:), public, allocatable :: yellow
character(kind=ucs4, len=:), public, allocatable :: blue
character(kind=ucs4, len=:), public, allocatable :: magenta
character(kind=ucs4, len=:), public, allocatable :: cyan
character(kind=ucs4, len=:), public, allocatable :: white
character(kind=ucs4, len=:), public, allocatable :: bright_red
character(kind=ucs4, len=:), public, allocatable :: bright_green
character(kind=ucs4, len=:), public, allocatable :: bright_yellow
character(kind=ucs4, len=:), public, allocatable :: bright_blue
character(kind=ucs4, len=:), public, allocatable :: bright_magenta
character(kind=ucs4, len=:), public, allocatable :: bright_cyan
character(kind=ucs4, len=:), public, allocatable :: bright_white

Type-Bound Procedures

procedure, public :: init => init_colors_ucs4

  • interface

    private module subroutine init_colors_ucs4(this)

    Arguments

    Type IntentOptional Attributes Name
    class(ColorsUcs4), intent(out) :: this

Source Code

    type :: ColorsUcs4
        character(len=:, kind=ucs4), allocatable :: &
            reset, bold, faint, italic, underline, blink, reverse, hidden, strikethrough, &
            red, green, yellow, blue, magenta, cyan, white, &
            bright_red, bright_green, bright_yellow, bright_blue, bright_magenta, bright_cyan, &
            bright_white
        contains
            procedure :: init => init_colors_ucs4
    end type ColorsUcs4