SF_COLORS Module


Used by

  • module~~sf_colors~~UsedByGraph module~sf_colors SF_COLORS module~scifor SCIFOR module~scifor->module~sf_colors

Variables

Type Visibility Attributes Name Initial
type(rgb_color), public, parameter :: black = rgb_color(0, 0, 0)
type(rgb_color), public, parameter :: red = rgb_color(255, 0, 0)
type(rgb_color), public, parameter :: green = rgb_color(0, 255, 0)
type(rgb_color), public, parameter :: orange = rgb_color(255, 193, 0)
type(rgb_color), public, parameter :: blue = rgb_color(0, 0, 255)
type(rgb_color), public, parameter :: yellow = rgb_color(255, 255, 0)
type(rgb_color), public, parameter :: cyan = rgb_color(0, 255, 255)
type(rgb_color), public, parameter :: magenta = rgb_color(159, 0, 159)
type(rgb_color), public, parameter :: snow = rgb_color(255, 250, 250)
type(rgb_color), public, parameter :: ghostwhite = rgb_color(248, 248, 255)
type(rgb_color), public, parameter :: whitesmoke = rgb_color(245, 245, 245)
type(rgb_color), public, parameter :: gainsboro = rgb_color(220, 220, 220)
type(rgb_color), public, parameter :: floralwhite = rgb_color(255, 250, 240)
type(rgb_color), public, parameter :: oldlace = rgb_color(253, 245, 230)
type(rgb_color), public, parameter :: linen = rgb_color(250, 240, 230)
type(rgb_color), public, parameter :: antiquewhite = rgb_color(250, 235, 215)
type(rgb_color), public, parameter :: papayawhip = rgb_color(255, 239, 213)
type(rgb_color), public, parameter :: blanchedalmond = rgb_color(255, 235, 205)
type(rgb_color), public, parameter :: bisque = rgb_color(255, 228, 196)
type(rgb_color), public, parameter :: peachpuff = rgb_color(255, 218, 185)
type(rgb_color), public, parameter :: navajowhite = rgb_color(255, 222, 173)
type(rgb_color), public, parameter :: moccasin = rgb_color(255, 228, 181)
type(rgb_color), public, parameter :: cornsilk = rgb_color(255, 248, 220)
type(rgb_color), public, parameter :: ivory = rgb_color(255, 255, 240)
type(rgb_color), public, parameter :: lemonchiffon = rgb_color(255, 250, 205)
type(rgb_color), public, parameter :: seashell = rgb_color(255, 245, 238)
type(rgb_color), public, parameter :: honeydew = rgb_color(240, 255, 240)
type(rgb_color), public, parameter :: mintcream = rgb_color(245, 255, 250)
type(rgb_color), public, parameter :: azure = rgb_color(240, 255, 255)
type(rgb_color), public, parameter :: aliceblue = rgb_color(240, 248, 255)
type(rgb_color), public, parameter :: lavender = rgb_color(230, 230, 250)
type(rgb_color), public, parameter :: lavenderblush = rgb_color(255, 240, 245)
type(rgb_color), public, parameter :: mistyrose = rgb_color(255, 228, 225)
type(rgb_color), public, parameter :: white = rgb_color(255, 255, 255)
type(rgb_color), public, parameter :: darkslategray = rgb_color(47, 79, 79)
type(rgb_color), public, parameter :: darkslategrey = rgb_color(47, 79, 79)
type(rgb_color), public, parameter :: dimgray = rgb_color(105, 105, 105)
type(rgb_color), public, parameter :: dimgrey = rgb_color(105, 105, 105)
type(rgb_color), public, parameter :: slategray = rgb_color(112, 128, 144)
type(rgb_color), public, parameter :: slategrey = rgb_color(112, 128, 144)
type(rgb_color), public, parameter :: lightslategray = rgb_color(119, 136, 153)
type(rgb_color), public, parameter :: lightslategrey = rgb_color(119, 136, 153)
type(rgb_color), public, parameter :: gray = rgb_color(190, 190, 190)
type(rgb_color), public, parameter :: grey = rgb_color(190, 190, 190)
type(rgb_color), public, parameter :: lightgrey = rgb_color(211, 211, 211)
type(rgb_color), public, parameter :: lightgray = rgb_color(211, 211, 211)
type(rgb_color), public, parameter :: midnightblue = rgb_color(25, 25, 112)
type(rgb_color), public, parameter :: navy = rgb_color(0, 0, 128)
type(rgb_color), public, parameter :: navyblue = rgb_color(0, 0, 128)
type(rgb_color), public, parameter :: cornflowerblue = rgb_color(100, 149, 237)
type(rgb_color), public, parameter :: darkslateblue = rgb_color(72, 61, 139)
type(rgb_color), public, parameter :: slateblue = rgb_color(106, 90, 205)
type(rgb_color), public, parameter :: mediumslateblue = rgb_color(123, 104, 238)
type(rgb_color), public, parameter :: lightslateblue = rgb_color(132, 112, 255)
type(rgb_color), public, parameter :: mediumblue = rgb_color(0, 0, 205)
type(rgb_color), public, parameter :: royalblue = rgb_color(65, 105, 225)
type(rgb_color), public, parameter :: dodgerblue = rgb_color(30, 144, 255)
type(rgb_color), public, parameter :: deepskyblue = rgb_color(0, 191, 255)
type(rgb_color), public, parameter :: skyblue = rgb_color(135, 206, 235)
type(rgb_color), public, parameter :: lightskyblue = rgb_color(135, 206, 250)
type(rgb_color), public, parameter :: steelblue = rgb_color(70, 130, 180)
type(rgb_color), public, parameter :: lightsteelblue = rgb_color(176, 196, 222)
type(rgb_color), public, parameter :: lightblue = rgb_color(173, 216, 230)
type(rgb_color), public, parameter :: powderblue = rgb_color(176, 224, 230)
type(rgb_color), public, parameter :: paleturquoise = rgb_color(175, 238, 238)
type(rgb_color), public, parameter :: darkturquoise = rgb_color(0, 206, 209)
type(rgb_color), public, parameter :: mediumturquoise = rgb_color(72, 209, 204)
type(rgb_color), public, parameter :: turquoise = rgb_color(64, 224, 208)
type(rgb_color), public, parameter :: lightcyan = rgb_color(224, 255, 255)
type(rgb_color), public, parameter :: cadetblue = rgb_color(95, 158, 160)
type(rgb_color), public, parameter :: mediumaquamarine = rgb_color(102, 205, 170)
type(rgb_color), public, parameter :: aquamarine = rgb_color(127, 255, 212)
type(rgb_color), public, parameter :: darkgreen = rgb_color(0, 100, 0)
type(rgb_color), public, parameter :: darkolivegreen = rgb_color(85, 107, 47)
type(rgb_color), public, parameter :: darkseagreen = rgb_color(143, 188, 143)
type(rgb_color), public, parameter :: seagreen = rgb_color(46, 139, 87)
type(rgb_color), public, parameter :: mediumseagreen = rgb_color(60, 179, 113)
type(rgb_color), public, parameter :: lightseagreen = rgb_color(32, 178, 170)
type(rgb_color), public, parameter :: palegreen = rgb_color(152, 251, 152)
type(rgb_color), public, parameter :: springgreen = rgb_color(0, 255, 127)
type(rgb_color), public, parameter :: lawngreen = rgb_color(124, 252, 0)
type(rgb_color), public, parameter :: chartreuse = rgb_color(127, 255, 0)
type(rgb_color), public, parameter :: mediumspringgreen = rgb_color(0, 250, 154)
type(rgb_color), public, parameter :: greenyellow = rgb_color(173, 255, 47)
type(rgb_color), public, parameter :: limegreen = rgb_color(50, 205, 50)
type(rgb_color), public, parameter :: yellowgreen = rgb_color(154, 205, 50)
type(rgb_color), public, parameter :: forestgreen = rgb_color(34, 139, 34)
type(rgb_color), public, parameter :: olivedrab = rgb_color(107, 142, 35)
type(rgb_color), public, parameter :: darkkhaki = rgb_color(189, 183, 107)
type(rgb_color), public, parameter :: khaki = rgb_color(240, 230, 140)
type(rgb_color), public, parameter :: palegoldenrod = rgb_color(238, 232, 170)
type(rgb_color), public, parameter :: lightgoldenrodyellow = rgb_color(250, 250, 210)
type(rgb_color), public, parameter :: lightyellow = rgb_color(255, 255, 224)
type(rgb_color), public, parameter :: gold = rgb_color(255, 215, 0)
type(rgb_color), public, parameter :: lightgoldenrod = rgb_color(238, 221, 130)
type(rgb_color), public, parameter :: goldenrod = rgb_color(218, 165, 32)
type(rgb_color), public, parameter :: darkgoldenrod = rgb_color(184, 134, 11)
type(rgb_color), public, parameter :: rosybrown = rgb_color(188, 143, 143)
type(rgb_color), public, parameter :: indianred = rgb_color(205, 92, 92)
type(rgb_color), public, parameter :: saddlebrown = rgb_color(139, 69, 19)
type(rgb_color), public, parameter :: sienna = rgb_color(160, 82, 45)
type(rgb_color), public, parameter :: peru = rgb_color(205, 133, 63)
type(rgb_color), public, parameter :: burlywood = rgb_color(222, 184, 135)
type(rgb_color), public, parameter :: beige = rgb_color(245, 245, 220)
type(rgb_color), public, parameter :: wheat = rgb_color(245, 222, 179)
type(rgb_color), public, parameter :: sandybrown = rgb_color(244, 164, 96)
type(rgb_color), public, parameter :: chocolate = rgb_color(210, 105, 30)
type(rgb_color), public, parameter :: firebrick = rgb_color(178, 34, 34)
type(rgb_color), public, parameter :: brown = rgb_color(165, 42, 42)
type(rgb_color), public, parameter :: darksalmon = rgb_color(233, 150, 122)
type(rgb_color), public, parameter :: salmon = rgb_color(250, 128, 114)
type(rgb_color), public, parameter :: lightsalmon = rgb_color(255, 160, 122)
type(rgb_color), public, parameter :: darkorange = rgb_color(255, 140, 0)
type(rgb_color), public, parameter :: coral = rgb_color(255, 127, 80)
type(rgb_color), public, parameter :: lightcoral = rgb_color(240, 128, 128)
type(rgb_color), public, parameter :: tomato = rgb_color(255, 99, 71)
type(rgb_color), public, parameter :: orangered = rgb_color(255, 69, 0)
type(rgb_color), public, parameter :: hotpink = rgb_color(255, 105, 180)
type(rgb_color), public, parameter :: deeppink = rgb_color(255, 20, 147)
type(rgb_color), public, parameter :: pink = rgb_color(255, 192, 203)
type(rgb_color), public, parameter :: lightpink = rgb_color(255, 182, 193)
type(rgb_color), public, parameter :: palevioletred = rgb_color(219, 112, 147)
type(rgb_color), public, parameter :: maroon = rgb_color(176, 48, 96)
type(rgb_color), public, parameter :: mediumvioletred = rgb_color(199, 21, 133)
type(rgb_color), public, parameter :: violetred = rgb_color(208, 32, 144)
type(rgb_color), public, parameter :: violet = rgb_color(238, 130, 238)
type(rgb_color), public, parameter :: plum = rgb_color(221, 160, 221)
type(rgb_color), public, parameter :: orchid = rgb_color(218, 112, 214)
type(rgb_color), public, parameter :: mediumorchid = rgb_color(186, 85, 211)
type(rgb_color), public, parameter :: darkorchid = rgb_color(153, 50, 204)
type(rgb_color), public, parameter :: darkviolet = rgb_color(148, 0, 211)
type(rgb_color), public, parameter :: blueviolet = rgb_color(138, 43, 226)
type(rgb_color), public, parameter :: purple = rgb_color(160, 32, 240)
type(rgb_color), public, parameter :: mediumpurple = rgb_color(147, 112, 219)
type(rgb_color), public, parameter :: thistle = rgb_color(216, 191, 216)
type(rgb_color), public, parameter :: snow1 = rgb_color(255, 250, 250)
type(rgb_color), public, parameter :: snow2 = rgb_color(238, 233, 233)
type(rgb_color), public, parameter :: snow3 = rgb_color(205, 201, 201)
type(rgb_color), public, parameter :: snow4 = rgb_color(139, 137, 137)
type(rgb_color), public, parameter :: seashell1 = rgb_color(255, 245, 238)
type(rgb_color), public, parameter :: seashell2 = rgb_color(238, 229, 222)
type(rgb_color), public, parameter :: seashell3 = rgb_color(205, 197, 191)
type(rgb_color), public, parameter :: seashell4 = rgb_color(139, 134, 130)
type(rgb_color), public, parameter :: antiquewhite1 = rgb_color(255, 239, 219)
type(rgb_color), public, parameter :: antiquewhite2 = rgb_color(238, 223, 204)
type(rgb_color), public, parameter :: antiquewhite3 = rgb_color(205, 192, 176)
type(rgb_color), public, parameter :: antiquewhite4 = rgb_color(139, 131, 120)
type(rgb_color), public, parameter :: bisque1 = rgb_color(255, 228, 196)
type(rgb_color), public, parameter :: bisque2 = rgb_color(238, 213, 183)
type(rgb_color), public, parameter :: bisque3 = rgb_color(205, 183, 158)
type(rgb_color), public, parameter :: bisque4 = rgb_color(139, 125, 107)
type(rgb_color), public, parameter :: peachpuff1 = rgb_color(255, 218, 185)
type(rgb_color), public, parameter :: peachpuff2 = rgb_color(238, 203, 173)
type(rgb_color), public, parameter :: peachpuff3 = rgb_color(205, 175, 149)
type(rgb_color), public, parameter :: peachpuff4 = rgb_color(139, 119, 101)
type(rgb_color), public, parameter :: navajowhite1 = rgb_color(255, 222, 173)
type(rgb_color), public, parameter :: navajowhite2 = rgb_color(238, 207, 161)
type(rgb_color), public, parameter :: navajowhite3 = rgb_color(205, 179, 139)
type(rgb_color), public, parameter :: navajowhite4 = rgb_color(139, 121, 94)
type(rgb_color), public, parameter :: lemonchiffon1 = rgb_color(255, 250, 205)
type(rgb_color), public, parameter :: lemonchiffon2 = rgb_color(238, 233, 191)
type(rgb_color), public, parameter :: lemonchiffon3 = rgb_color(205, 201, 165)
type(rgb_color), public, parameter :: lemonchiffon4 = rgb_color(139, 137, 112)
type(rgb_color), public, parameter :: cornsilk1 = rgb_color(255, 248, 220)
type(rgb_color), public, parameter :: cornsilk2 = rgb_color(238, 232, 205)
type(rgb_color), public, parameter :: cornsilk3 = rgb_color(205, 200, 177)
type(rgb_color), public, parameter :: cornsilk4 = rgb_color(139, 136, 120)
type(rgb_color), public, parameter :: ivory1 = rgb_color(255, 255, 240)
type(rgb_color), public, parameter :: ivory2 = rgb_color(238, 238, 224)
type(rgb_color), public, parameter :: ivory3 = rgb_color(205, 205, 193)
type(rgb_color), public, parameter :: ivory4 = rgb_color(139, 139, 131)
type(rgb_color), public, parameter :: honeydew1 = rgb_color(240, 255, 240)
type(rgb_color), public, parameter :: honeydew2 = rgb_color(224, 238, 224)
type(rgb_color), public, parameter :: honeydew3 = rgb_color(193, 205, 193)
type(rgb_color), public, parameter :: honeydew4 = rgb_color(131, 139, 131)
type(rgb_color), public, parameter :: lavenderblush1 = rgb_color(255, 240, 245)
type(rgb_color), public, parameter :: lavenderblush2 = rgb_color(238, 224, 229)
type(rgb_color), public, parameter :: lavenderblush3 = rgb_color(205, 193, 197)
type(rgb_color), public, parameter :: lavenderblush4 = rgb_color(139, 131, 134)
type(rgb_color), public, parameter :: mistyrose1 = rgb_color(255, 228, 225)
type(rgb_color), public, parameter :: mistyrose2 = rgb_color(238, 213, 210)
type(rgb_color), public, parameter :: mistyrose3 = rgb_color(205, 183, 181)
type(rgb_color), public, parameter :: mistyrose4 = rgb_color(139, 125, 123)
type(rgb_color), public, parameter :: azure1 = rgb_color(240, 255, 255)
type(rgb_color), public, parameter :: azure2 = rgb_color(224, 238, 238)
type(rgb_color), public, parameter :: azure3 = rgb_color(193, 205, 205)
type(rgb_color), public, parameter :: azure4 = rgb_color(131, 139, 139)
type(rgb_color), public, parameter :: slateblue1 = rgb_color(131, 111, 255)
type(rgb_color), public, parameter :: slateblue2 = rgb_color(122, 103, 238)
type(rgb_color), public, parameter :: slateblue3 = rgb_color(105, 89, 205)
type(rgb_color), public, parameter :: slateblue4 = rgb_color(71, 60, 139)
type(rgb_color), public, parameter :: royalblue1 = rgb_color(72, 118, 255)
type(rgb_color), public, parameter :: royalblue2 = rgb_color(67, 110, 238)
type(rgb_color), public, parameter :: royalblue3 = rgb_color(58, 95, 205)
type(rgb_color), public, parameter :: royalblue4 = rgb_color(39, 64, 139)
type(rgb_color), public, parameter :: blue1 = rgb_color(0, 0, 255)
type(rgb_color), public, parameter :: blue2 = rgb_color(0, 0, 238)
type(rgb_color), public, parameter :: blue3 = rgb_color(0, 0, 205)
type(rgb_color), public, parameter :: blue4 = rgb_color(0, 0, 139)
type(rgb_color), public, parameter :: dodgerblue1 = rgb_color(30, 144, 255)
type(rgb_color), public, parameter :: dodgerblue2 = rgb_color(28, 134, 238)
type(rgb_color), public, parameter :: dodgerblue3 = rgb_color(24, 116, 205)
type(rgb_color), public, parameter :: dodgerblue4 = rgb_color(16, 78, 139)
type(rgb_color), public, parameter :: steelblue1 = rgb_color(99, 184, 255)
type(rgb_color), public, parameter :: steelblue2 = rgb_color(92, 172, 238)
type(rgb_color), public, parameter :: steelblue3 = rgb_color(79, 148, 205)
type(rgb_color), public, parameter :: steelblue4 = rgb_color(54, 100, 139)
type(rgb_color), public, parameter :: deepskyblue1 = rgb_color(0, 191, 255)
type(rgb_color), public, parameter :: deepskyblue2 = rgb_color(0, 178, 238)
type(rgb_color), public, parameter :: deepskyblue3 = rgb_color(0, 154, 205)
type(rgb_color), public, parameter :: deepskyblue4 = rgb_color(0, 104, 139)
type(rgb_color), public, parameter :: skyblue1 = rgb_color(135, 206, 255)
type(rgb_color), public, parameter :: skyblue2 = rgb_color(126, 192, 238)
type(rgb_color), public, parameter :: skyblue3 = rgb_color(108, 166, 205)
type(rgb_color), public, parameter :: skyblue4 = rgb_color(74, 112, 139)
type(rgb_color), public, parameter :: lightskyblue1 = rgb_color(176, 226, 255)
type(rgb_color), public, parameter :: lightskyblue2 = rgb_color(164, 211, 238)
type(rgb_color), public, parameter :: lightskyblue3 = rgb_color(141, 182, 205)
type(rgb_color), public, parameter :: lightskyblue4 = rgb_color(96, 123, 139)
type(rgb_color), public, parameter :: slategray1 = rgb_color(198, 226, 255)
type(rgb_color), public, parameter :: slategray2 = rgb_color(185, 211, 238)
type(rgb_color), public, parameter :: slategray3 = rgb_color(159, 182, 205)
type(rgb_color), public, parameter :: slategray4 = rgb_color(108, 123, 139)
type(rgb_color), public, parameter :: lightsteelblue1 = rgb_color(202, 225, 255)
type(rgb_color), public, parameter :: lightsteelblue2 = rgb_color(188, 210, 238)
type(rgb_color), public, parameter :: lightsteelblue3 = rgb_color(162, 181, 205)
type(rgb_color), public, parameter :: lightsteelblue4 = rgb_color(110, 123, 139)
type(rgb_color), public, parameter :: lightblue1 = rgb_color(191, 239, 255)
type(rgb_color), public, parameter :: lightblue2 = rgb_color(178, 223, 238)
type(rgb_color), public, parameter :: lightblue3 = rgb_color(154, 192, 205)
type(rgb_color), public, parameter :: lightblue4 = rgb_color(104, 131, 139)
type(rgb_color), public, parameter :: lightcyan1 = rgb_color(224, 255, 255)
type(rgb_color), public, parameter :: lightcyan2 = rgb_color(209, 238, 238)
type(rgb_color), public, parameter :: lightcyan3 = rgb_color(180, 205, 205)
type(rgb_color), public, parameter :: lightcyan4 = rgb_color(122, 139, 139)
type(rgb_color), public, parameter :: paleturquoise1 = rgb_color(187, 255, 255)
type(rgb_color), public, parameter :: paleturquoise2 = rgb_color(174, 238, 238)
type(rgb_color), public, parameter :: paleturquoise3 = rgb_color(150, 205, 205)
type(rgb_color), public, parameter :: paleturquoise4 = rgb_color(102, 139, 139)
type(rgb_color), public, parameter :: cadetblue1 = rgb_color(152, 245, 255)
type(rgb_color), public, parameter :: cadetblue2 = rgb_color(142, 229, 238)
type(rgb_color), public, parameter :: cadetblue3 = rgb_color(122, 197, 205)
type(rgb_color), public, parameter :: cadetblue4 = rgb_color(83, 134, 139)
type(rgb_color), public, parameter :: turquoise1 = rgb_color(0, 245, 255)
type(rgb_color), public, parameter :: turquoise2 = rgb_color(0, 229, 238)
type(rgb_color), public, parameter :: turquoise3 = rgb_color(0, 197, 205)
type(rgb_color), public, parameter :: turquoise4 = rgb_color(0, 134, 139)
type(rgb_color), public, parameter :: cyan1 = rgb_color(0, 255, 255)
type(rgb_color), public, parameter :: cyan2 = rgb_color(0, 238, 238)
type(rgb_color), public, parameter :: cyan3 = rgb_color(0, 205, 205)
type(rgb_color), public, parameter :: cyan4 = rgb_color(0, 139, 139)
type(rgb_color), public, parameter :: darkslategray1 = rgb_color(151, 255, 255)
type(rgb_color), public, parameter :: darkslategray2 = rgb_color(141, 238, 238)
type(rgb_color), public, parameter :: darkslategray3 = rgb_color(121, 205, 205)
type(rgb_color), public, parameter :: darkslategray4 = rgb_color(82, 139, 139)
type(rgb_color), public, parameter :: aquamarine1 = rgb_color(127, 255, 212)
type(rgb_color), public, parameter :: aquamarine2 = rgb_color(118, 238, 198)
type(rgb_color), public, parameter :: aquamarine3 = rgb_color(102, 205, 170)
type(rgb_color), public, parameter :: aquamarine4 = rgb_color(69, 139, 116)
type(rgb_color), public, parameter :: darkseagreen1 = rgb_color(193, 255, 193)
type(rgb_color), public, parameter :: darkseagreen2 = rgb_color(180, 238, 180)
type(rgb_color), public, parameter :: darkseagreen3 = rgb_color(155, 205, 155)
type(rgb_color), public, parameter :: darkseagreen4 = rgb_color(105, 139, 105)
type(rgb_color), public, parameter :: seagreen1 = rgb_color(84, 255, 159)
type(rgb_color), public, parameter :: seagreen2 = rgb_color(78, 238, 148)
type(rgb_color), public, parameter :: seagreen3 = rgb_color(67, 205, 128)
type(rgb_color), public, parameter :: seagreen4 = rgb_color(46, 139, 87)
type(rgb_color), public, parameter :: palegreen1 = rgb_color(154, 255, 154)
type(rgb_color), public, parameter :: palegreen2 = rgb_color(144, 238, 144)
type(rgb_color), public, parameter :: palegreen3 = rgb_color(124, 205, 124)
type(rgb_color), public, parameter :: palegreen4 = rgb_color(84, 139, 84)
type(rgb_color), public, parameter :: springgreen1 = rgb_color(0, 255, 127)
type(rgb_color), public, parameter :: springgreen2 = rgb_color(0, 238, 118)
type(rgb_color), public, parameter :: springgreen3 = rgb_color(0, 205, 102)
type(rgb_color), public, parameter :: springgreen4 = rgb_color(0, 139, 69)
type(rgb_color), public, parameter :: green1 = rgb_color(0, 255, 0)
type(rgb_color), public, parameter :: green2 = rgb_color(0, 238, 0)
type(rgb_color), public, parameter :: green3 = rgb_color(0, 205, 0)
type(rgb_color), public, parameter :: green4 = rgb_color(0, 139, 0)
type(rgb_color), public, parameter :: chartreuse1 = rgb_color(127, 255, 0)
type(rgb_color), public, parameter :: chartreuse2 = rgb_color(118, 238, 0)
type(rgb_color), public, parameter :: chartreuse3 = rgb_color(102, 205, 0)
type(rgb_color), public, parameter :: chartreuse4 = rgb_color(69, 139, 0)
type(rgb_color), public, parameter :: olivedrab1 = rgb_color(192, 255, 62)
type(rgb_color), public, parameter :: olivedrab2 = rgb_color(179, 238, 58)
type(rgb_color), public, parameter :: olivedrab3 = rgb_color(154, 205, 50)
type(rgb_color), public, parameter :: olivedrab4 = rgb_color(105, 139, 34)
type(rgb_color), public, parameter :: darkolivegreen1 = rgb_color(202, 255, 112)
type(rgb_color), public, parameter :: darkolivegreen2 = rgb_color(188, 238, 104)
type(rgb_color), public, parameter :: darkolivegreen3 = rgb_color(162, 205, 90)
type(rgb_color), public, parameter :: darkolivegreen4 = rgb_color(110, 139, 61)
type(rgb_color), public, parameter :: khaki1 = rgb_color(255, 246, 143)
type(rgb_color), public, parameter :: khaki2 = rgb_color(238, 230, 133)
type(rgb_color), public, parameter :: khaki3 = rgb_color(205, 198, 115)
type(rgb_color), public, parameter :: khaki4 = rgb_color(139, 134, 78)
type(rgb_color), public, parameter :: lightgoldenrod1 = rgb_color(255, 236, 139)
type(rgb_color), public, parameter :: lightgoldenrod2 = rgb_color(238, 220, 130)
type(rgb_color), public, parameter :: lightgoldenrod3 = rgb_color(205, 190, 112)
type(rgb_color), public, parameter :: lightgoldenrod4 = rgb_color(139, 129, 76)
type(rgb_color), public, parameter :: lightyellow1 = rgb_color(255, 255, 224)
type(rgb_color), public, parameter :: lightyellow2 = rgb_color(238, 238, 209)
type(rgb_color), public, parameter :: lightyellow3 = rgb_color(205, 205, 180)
type(rgb_color), public, parameter :: lightyellow4 = rgb_color(139, 139, 122)
type(rgb_color), public, parameter :: yellow1 = rgb_color(255, 255, 0)
type(rgb_color), public, parameter :: yellow2 = rgb_color(238, 238, 0)
type(rgb_color), public, parameter :: yellow3 = rgb_color(205, 205, 0)
type(rgb_color), public, parameter :: yellow4 = rgb_color(139, 139, 0)
type(rgb_color), public, parameter :: gold1 = rgb_color(255, 215, 0)
type(rgb_color), public, parameter :: gold2 = rgb_color(238, 201, 0)
type(rgb_color), public, parameter :: gold3 = rgb_color(205, 173, 0)
type(rgb_color), public, parameter :: gold4 = rgb_color(139, 117, 0)
type(rgb_color), public, parameter :: goldenrod1 = rgb_color(255, 193, 37)
type(rgb_color), public, parameter :: goldenrod2 = rgb_color(238, 180, 34)
type(rgb_color), public, parameter :: goldenrod3 = rgb_color(205, 155, 29)
type(rgb_color), public, parameter :: goldenrod4 = rgb_color(139, 105, 20)
type(rgb_color), public, parameter :: darkgoldenrod1 = rgb_color(255, 185, 15)
type(rgb_color), public, parameter :: darkgoldenrod2 = rgb_color(238, 173, 14)
type(rgb_color), public, parameter :: darkgoldenrod3 = rgb_color(205, 149, 12)
type(rgb_color), public, parameter :: darkgoldenrod4 = rgb_color(139, 101, 8)
type(rgb_color), public, parameter :: rosybrown1 = rgb_color(255, 193, 193)
type(rgb_color), public, parameter :: rosybrown2 = rgb_color(238, 180, 180)
type(rgb_color), public, parameter :: rosybrown3 = rgb_color(205, 155, 155)
type(rgb_color), public, parameter :: rosybrown4 = rgb_color(139, 105, 105)
type(rgb_color), public, parameter :: indianred1 = rgb_color(255, 106, 106)
type(rgb_color), public, parameter :: indianred2 = rgb_color(238, 99, 99)
type(rgb_color), public, parameter :: indianred3 = rgb_color(205, 85, 85)
type(rgb_color), public, parameter :: indianred4 = rgb_color(139, 58, 58)
type(rgb_color), public, parameter :: sienna1 = rgb_color(255, 130, 71)
type(rgb_color), public, parameter :: sienna2 = rgb_color(238, 121, 66)
type(rgb_color), public, parameter :: sienna3 = rgb_color(205, 104, 57)
type(rgb_color), public, parameter :: sienna4 = rgb_color(139, 71, 38)
type(rgb_color), public, parameter :: burlywood1 = rgb_color(255, 211, 155)
type(rgb_color), public, parameter :: burlywood2 = rgb_color(238, 197, 145)
type(rgb_color), public, parameter :: burlywood3 = rgb_color(205, 170, 125)
type(rgb_color), public, parameter :: burlywood4 = rgb_color(139, 115, 85)
type(rgb_color), public, parameter :: wheat1 = rgb_color(255, 231, 186)
type(rgb_color), public, parameter :: wheat2 = rgb_color(238, 216, 174)
type(rgb_color), public, parameter :: wheat3 = rgb_color(205, 186, 150)
type(rgb_color), public, parameter :: wheat4 = rgb_color(139, 126, 102)
type(rgb_color), public, parameter :: tan1 = rgb_color(255, 165, 79)
type(rgb_color), public, parameter :: tan2 = rgb_color(238, 154, 73)
type(rgb_color), public, parameter :: tan3 = rgb_color(205, 133, 63)
type(rgb_color), public, parameter :: tan4 = rgb_color(139, 90, 43)
type(rgb_color), public, parameter :: chocolate1 = rgb_color(255, 127, 36)
type(rgb_color), public, parameter :: chocolate2 = rgb_color(238, 118, 33)
type(rgb_color), public, parameter :: chocolate3 = rgb_color(205, 102, 29)
type(rgb_color), public, parameter :: chocolate4 = rgb_color(139, 69, 19)
type(rgb_color), public, parameter :: firebrick1 = rgb_color(255, 48, 48)
type(rgb_color), public, parameter :: firebrick2 = rgb_color(238, 44, 44)
type(rgb_color), public, parameter :: firebrick3 = rgb_color(205, 38, 38)
type(rgb_color), public, parameter :: firebrick4 = rgb_color(139, 26, 26)
type(rgb_color), public, parameter :: brown1 = rgb_color(255, 64, 64)
type(rgb_color), public, parameter :: brown2 = rgb_color(238, 59, 59)
type(rgb_color), public, parameter :: brown3 = rgb_color(205, 51, 51)
type(rgb_color), public, parameter :: brown4 = rgb_color(139, 35, 35)
type(rgb_color), public, parameter :: salmon1 = rgb_color(255, 140, 105)
type(rgb_color), public, parameter :: salmon2 = rgb_color(238, 130, 98)
type(rgb_color), public, parameter :: salmon3 = rgb_color(205, 112, 84)
type(rgb_color), public, parameter :: salmon4 = rgb_color(139, 76, 57)
type(rgb_color), public, parameter :: lightsalmon1 = rgb_color(255, 160, 122)
type(rgb_color), public, parameter :: lightsalmon2 = rgb_color(238, 149, 114)
type(rgb_color), public, parameter :: lightsalmon3 = rgb_color(205, 129, 98)
type(rgb_color), public, parameter :: lightsalmon4 = rgb_color(139, 87, 66)
type(rgb_color), public, parameter :: orange1 = rgb_color(255, 165, 0)
type(rgb_color), public, parameter :: orange2 = rgb_color(238, 154, 0)
type(rgb_color), public, parameter :: orange3 = rgb_color(205, 133, 0)
type(rgb_color), public, parameter :: orange4 = rgb_color(139, 90, 0)
type(rgb_color), public, parameter :: darkorange1 = rgb_color(255, 127, 0)
type(rgb_color), public, parameter :: darkorange2 = rgb_color(238, 118, 0)
type(rgb_color), public, parameter :: darkorange3 = rgb_color(205, 102, 0)
type(rgb_color), public, parameter :: darkorange4 = rgb_color(139, 69, 0)
type(rgb_color), public, parameter :: coral1 = rgb_color(255, 114, 86)
type(rgb_color), public, parameter :: coral2 = rgb_color(238, 106, 80)
type(rgb_color), public, parameter :: coral3 = rgb_color(205, 91, 69)
type(rgb_color), public, parameter :: coral4 = rgb_color(139, 62, 47)
type(rgb_color), public, parameter :: tomato1 = rgb_color(255, 99, 71)
type(rgb_color), public, parameter :: tomato2 = rgb_color(238, 92, 66)
type(rgb_color), public, parameter :: tomato3 = rgb_color(205, 79, 57)
type(rgb_color), public, parameter :: tomato4 = rgb_color(139, 54, 38)
type(rgb_color), public, parameter :: orangered1 = rgb_color(255, 69, 0)
type(rgb_color), public, parameter :: orangered2 = rgb_color(238, 64, 0)
type(rgb_color), public, parameter :: orangered3 = rgb_color(205, 55, 0)
type(rgb_color), public, parameter :: orangered4 = rgb_color(139, 37, 0)
type(rgb_color), public, parameter :: red1 = rgb_color(255, 0, 0)
type(rgb_color), public, parameter :: red2 = rgb_color(238, 0, 0)
type(rgb_color), public, parameter :: red3 = rgb_color(205, 0, 0)
type(rgb_color), public, parameter :: red4 = rgb_color(139, 0, 0)
type(rgb_color), public, parameter :: debianred = rgb_color(215, 7, 81)
type(rgb_color), public, parameter :: deeppink1 = rgb_color(255, 20, 147)
type(rgb_color), public, parameter :: deeppink2 = rgb_color(238, 18, 137)
type(rgb_color), public, parameter :: deeppink3 = rgb_color(205, 16, 118)
type(rgb_color), public, parameter :: deeppink4 = rgb_color(139, 10, 80)
type(rgb_color), public, parameter :: hotpink1 = rgb_color(255, 110, 180)
type(rgb_color), public, parameter :: hotpink2 = rgb_color(238, 106, 167)
type(rgb_color), public, parameter :: hotpink3 = rgb_color(205, 96, 144)
type(rgb_color), public, parameter :: hotpink4 = rgb_color(139, 58, 98)
type(rgb_color), public, parameter :: pink1 = rgb_color(255, 181, 197)
type(rgb_color), public, parameter :: pink2 = rgb_color(238, 169, 184)
type(rgb_color), public, parameter :: pink3 = rgb_color(205, 145, 158)
type(rgb_color), public, parameter :: pink4 = rgb_color(139, 99, 108)
type(rgb_color), public, parameter :: lightpink1 = rgb_color(255, 174, 185)
type(rgb_color), public, parameter :: lightpink2 = rgb_color(238, 162, 173)
type(rgb_color), public, parameter :: lightpink3 = rgb_color(205, 140, 149)
type(rgb_color), public, parameter :: lightpink4 = rgb_color(139, 95, 101)
type(rgb_color), public, parameter :: palevioletred1 = rgb_color(255, 130, 171)
type(rgb_color), public, parameter :: palevioletred2 = rgb_color(238, 121, 159)
type(rgb_color), public, parameter :: palevioletred3 = rgb_color(205, 104, 137)
type(rgb_color), public, parameter :: palevioletred4 = rgb_color(139, 71, 93)
type(rgb_color), public, parameter :: maroon1 = rgb_color(255, 52, 179)
type(rgb_color), public, parameter :: maroon2 = rgb_color(238, 48, 167)
type(rgb_color), public, parameter :: maroon3 = rgb_color(205, 41, 144)
type(rgb_color), public, parameter :: maroon4 = rgb_color(139, 28, 98)
type(rgb_color), public, parameter :: violetred1 = rgb_color(255, 62, 150)
type(rgb_color), public, parameter :: violetred2 = rgb_color(238, 58, 140)
type(rgb_color), public, parameter :: violetred3 = rgb_color(205, 50, 120)
type(rgb_color), public, parameter :: violetred4 = rgb_color(139, 34, 82)
type(rgb_color), public, parameter :: magenta1 = rgb_color(255, 0, 255)
type(rgb_color), public, parameter :: magenta2 = rgb_color(238, 0, 238)
type(rgb_color), public, parameter :: magenta3 = rgb_color(205, 0, 205)
type(rgb_color), public, parameter :: magenta4 = rgb_color(139, 0, 139)
type(rgb_color), public, parameter :: orchid1 = rgb_color(255, 131, 250)
type(rgb_color), public, parameter :: orchid2 = rgb_color(238, 122, 233)
type(rgb_color), public, parameter :: orchid3 = rgb_color(205, 105, 201)
type(rgb_color), public, parameter :: orchid4 = rgb_color(139, 71, 137)
type(rgb_color), public, parameter :: plum1 = rgb_color(255, 187, 255)
type(rgb_color), public, parameter :: plum2 = rgb_color(238, 174, 238)
type(rgb_color), public, parameter :: plum3 = rgb_color(205, 150, 205)
type(rgb_color), public, parameter :: plum4 = rgb_color(139, 102, 139)
type(rgb_color), public, parameter :: mediumorchid1 = rgb_color(224, 102, 255)
type(rgb_color), public, parameter :: mediumorchid2 = rgb_color(209, 95, 238)
type(rgb_color), public, parameter :: mediumorchid3 = rgb_color(180, 82, 205)
type(rgb_color), public, parameter :: mediumorchid4 = rgb_color(122, 55, 139)
type(rgb_color), public, parameter :: darkorchid1 = rgb_color(191, 62, 255)
type(rgb_color), public, parameter :: darkorchid2 = rgb_color(178, 58, 238)
type(rgb_color), public, parameter :: darkorchid3 = rgb_color(154, 50, 205)
type(rgb_color), public, parameter :: darkorchid4 = rgb_color(104, 34, 139)
type(rgb_color), public, parameter :: purple1 = rgb_color(155, 48, 255)
type(rgb_color), public, parameter :: purple2 = rgb_color(145, 44, 238)
type(rgb_color), public, parameter :: purple3 = rgb_color(125, 38, 205)
type(rgb_color), public, parameter :: purple4 = rgb_color(85, 26, 139)
type(rgb_color), public, parameter :: mediumpurple1 = rgb_color(171, 130, 255)
type(rgb_color), public, parameter :: mediumpurple2 = rgb_color(159, 121, 238)
type(rgb_color), public, parameter :: mediumpurple3 = rgb_color(137, 104, 205)
type(rgb_color), public, parameter :: mediumpurple4 = rgb_color(93, 71, 139)
type(rgb_color), public, parameter :: thistle1 = rgb_color(255, 225, 255)
type(rgb_color), public, parameter :: thistle2 = rgb_color(238, 210, 238)
type(rgb_color), public, parameter :: thistle3 = rgb_color(205, 181, 205)
type(rgb_color), public, parameter :: thistle4 = rgb_color(139, 123, 139)
type(rgb_color), public, parameter :: gray0 = rgb_color(0, 0, 0)
type(rgb_color), public, parameter :: grey0 = rgb_color(0, 0, 0)
type(rgb_color), public, parameter :: gray1 = rgb_color(3, 3, 3)
type(rgb_color), public, parameter :: grey1 = rgb_color(3, 3, 3)
type(rgb_color), public, parameter :: gray2 = rgb_color(5, 5, 5)
type(rgb_color), public, parameter :: grey2 = rgb_color(5, 5, 5)
type(rgb_color), public, parameter :: gray3 = rgb_color(8, 8, 8)
type(rgb_color), public, parameter :: grey3 = rgb_color(8, 8, 8)
type(rgb_color), public, parameter :: gray4 = rgb_color(10, 10, 10)
type(rgb_color), public, parameter :: grey4 = rgb_color(10, 10, 10)
type(rgb_color), public, parameter :: gray5 = rgb_color(13, 13, 13)
type(rgb_color), public, parameter :: grey5 = rgb_color(13, 13, 13)
type(rgb_color), public, parameter :: gray6 = rgb_color(15, 15, 15)
type(rgb_color), public, parameter :: grey6 = rgb_color(15, 15, 15)
type(rgb_color), public, parameter :: gray7 = rgb_color(18, 18, 18)
type(rgb_color), public, parameter :: grey7 = rgb_color(18, 18, 18)
type(rgb_color), public, parameter :: gray8 = rgb_color(20, 20, 20)
type(rgb_color), public, parameter :: grey8 = rgb_color(20, 20, 20)
type(rgb_color), public, parameter :: gray9 = rgb_color(23, 23, 23)
type(rgb_color), public, parameter :: grey9 = rgb_color(23, 23, 23)
type(rgb_color), public, parameter :: gray10 = rgb_color(26, 26, 26)
type(rgb_color), public, parameter :: grey10 = rgb_color(26, 26, 26)
type(rgb_color), public, parameter :: gray11 = rgb_color(28, 28, 28)
type(rgb_color), public, parameter :: grey11 = rgb_color(28, 28, 28)
type(rgb_color), public, parameter :: gray12 = rgb_color(31, 31, 31)
type(rgb_color), public, parameter :: grey12 = rgb_color(31, 31, 31)
type(rgb_color), public, parameter :: gray13 = rgb_color(33, 33, 33)
type(rgb_color), public, parameter :: grey13 = rgb_color(33, 33, 33)
type(rgb_color), public, parameter :: gray14 = rgb_color(36, 36, 36)
type(rgb_color), public, parameter :: grey14 = rgb_color(36, 36, 36)
type(rgb_color), public, parameter :: gray15 = rgb_color(38, 38, 38)
type(rgb_color), public, parameter :: grey15 = rgb_color(38, 38, 38)
type(rgb_color), public, parameter :: gray16 = rgb_color(41, 41, 41)
type(rgb_color), public, parameter :: grey16 = rgb_color(41, 41, 41)
type(rgb_color), public, parameter :: gray17 = rgb_color(43, 43, 43)
type(rgb_color), public, parameter :: grey17 = rgb_color(43, 43, 43)
type(rgb_color), public, parameter :: gray18 = rgb_color(46, 46, 46)
type(rgb_color), public, parameter :: grey18 = rgb_color(46, 46, 46)
type(rgb_color), public, parameter :: gray19 = rgb_color(48, 48, 48)
type(rgb_color), public, parameter :: grey19 = rgb_color(48, 48, 48)
type(rgb_color), public, parameter :: gray20 = rgb_color(51, 51, 51)
type(rgb_color), public, parameter :: grey20 = rgb_color(51, 51, 51)
type(rgb_color), public, parameter :: gray21 = rgb_color(54, 54, 54)
type(rgb_color), public, parameter :: grey21 = rgb_color(54, 54, 54)
type(rgb_color), public, parameter :: gray22 = rgb_color(56, 56, 56)
type(rgb_color), public, parameter :: grey22 = rgb_color(56, 56, 56)
type(rgb_color), public, parameter :: gray23 = rgb_color(59, 59, 59)
type(rgb_color), public, parameter :: grey23 = rgb_color(59, 59, 59)
type(rgb_color), public, parameter :: gray24 = rgb_color(61, 61, 61)
type(rgb_color), public, parameter :: grey24 = rgb_color(61, 61, 61)
type(rgb_color), public, parameter :: gray25 = rgb_color(64, 64, 64)
type(rgb_color), public, parameter :: grey25 = rgb_color(64, 64, 64)
type(rgb_color), public, parameter :: gray26 = rgb_color(66, 66, 66)
type(rgb_color), public, parameter :: grey26 = rgb_color(66, 66, 66)
type(rgb_color), public, parameter :: gray27 = rgb_color(69, 69, 69)
type(rgb_color), public, parameter :: grey27 = rgb_color(69, 69, 69)
type(rgb_color), public, parameter :: gray28 = rgb_color(71, 71, 71)
type(rgb_color), public, parameter :: grey28 = rgb_color(71, 71, 71)
type(rgb_color), public, parameter :: gray29 = rgb_color(74, 74, 74)
type(rgb_color), public, parameter :: grey29 = rgb_color(74, 74, 74)
type(rgb_color), public, parameter :: gray30 = rgb_color(77, 77, 77)
type(rgb_color), public, parameter :: grey30 = rgb_color(77, 77, 77)
type(rgb_color), public, parameter :: gray31 = rgb_color(79, 79, 79)
type(rgb_color), public, parameter :: grey31 = rgb_color(79, 79, 79)
type(rgb_color), public, parameter :: gray32 = rgb_color(82, 82, 82)
type(rgb_color), public, parameter :: grey32 = rgb_color(82, 82, 82)
type(rgb_color), public, parameter :: gray33 = rgb_color(84, 84, 84)
type(rgb_color), public, parameter :: grey33 = rgb_color(84, 84, 84)
type(rgb_color), public, parameter :: gray34 = rgb_color(87, 87, 87)
type(rgb_color), public, parameter :: grey34 = rgb_color(87, 87, 87)
type(rgb_color), public, parameter :: gray35 = rgb_color(89, 89, 89)
type(rgb_color), public, parameter :: grey35 = rgb_color(89, 89, 89)
type(rgb_color), public, parameter :: gray36 = rgb_color(92, 92, 92)
type(rgb_color), public, parameter :: grey36 = rgb_color(92, 92, 92)
type(rgb_color), public, parameter :: gray37 = rgb_color(94, 94, 94)
type(rgb_color), public, parameter :: grey37 = rgb_color(94, 94, 94)
type(rgb_color), public, parameter :: gray38 = rgb_color(97, 97, 97)
type(rgb_color), public, parameter :: grey38 = rgb_color(97, 97, 97)
type(rgb_color), public, parameter :: gray39 = rgb_color(99, 99, 99)
type(rgb_color), public, parameter :: grey39 = rgb_color(99, 99, 99)
type(rgb_color), public, parameter :: gray40 = rgb_color(102, 102, 102)
type(rgb_color), public, parameter :: grey40 = rgb_color(102, 102, 102)
type(rgb_color), public, parameter :: gray41 = rgb_color(105, 105, 105)
type(rgb_color), public, parameter :: grey41 = rgb_color(105, 105, 105)
type(rgb_color), public, parameter :: gray42 = rgb_color(107, 107, 107)
type(rgb_color), public, parameter :: grey42 = rgb_color(107, 107, 107)
type(rgb_color), public, parameter :: gray43 = rgb_color(110, 110, 110)
type(rgb_color), public, parameter :: grey43 = rgb_color(110, 110, 110)
type(rgb_color), public, parameter :: gray44 = rgb_color(112, 112, 112)
type(rgb_color), public, parameter :: grey44 = rgb_color(112, 112, 112)
type(rgb_color), public, parameter :: gray45 = rgb_color(115, 115, 115)
type(rgb_color), public, parameter :: grey45 = rgb_color(115, 115, 115)
type(rgb_color), public, parameter :: gray46 = rgb_color(117, 117, 117)
type(rgb_color), public, parameter :: grey46 = rgb_color(117, 117, 117)
type(rgb_color), public, parameter :: gray47 = rgb_color(120, 120, 120)
type(rgb_color), public, parameter :: grey47 = rgb_color(120, 120, 120)
type(rgb_color), public, parameter :: gray48 = rgb_color(122, 122, 122)
type(rgb_color), public, parameter :: grey48 = rgb_color(122, 122, 122)
type(rgb_color), public, parameter :: gray49 = rgb_color(125, 125, 125)
type(rgb_color), public, parameter :: grey49 = rgb_color(125, 125, 125)
type(rgb_color), public, parameter :: gray50 = rgb_color(127, 127, 127)
type(rgb_color), public, parameter :: grey50 = rgb_color(127, 127, 127)
type(rgb_color), public, parameter :: gray51 = rgb_color(130, 130, 130)
type(rgb_color), public, parameter :: grey51 = rgb_color(130, 130, 130)
type(rgb_color), public, parameter :: gray52 = rgb_color(133, 133, 133)
type(rgb_color), public, parameter :: grey52 = rgb_color(133, 133, 133)
type(rgb_color), public, parameter :: gray53 = rgb_color(135, 135, 135)
type(rgb_color), public, parameter :: grey53 = rgb_color(135, 135, 135)
type(rgb_color), public, parameter :: gray54 = rgb_color(138, 138, 138)
type(rgb_color), public, parameter :: grey54 = rgb_color(138, 138, 138)
type(rgb_color), public, parameter :: gray55 = rgb_color(140, 140, 140)
type(rgb_color), public, parameter :: grey55 = rgb_color(140, 140, 140)
type(rgb_color), public, parameter :: gray56 = rgb_color(143, 143, 143)
type(rgb_color), public, parameter :: grey56 = rgb_color(143, 143, 143)
type(rgb_color), public, parameter :: gray57 = rgb_color(145, 145, 145)
type(rgb_color), public, parameter :: grey57 = rgb_color(145, 145, 145)
type(rgb_color), public, parameter :: gray58 = rgb_color(148, 148, 148)
type(rgb_color), public, parameter :: grey58 = rgb_color(148, 148, 148)
type(rgb_color), public, parameter :: gray59 = rgb_color(150, 150, 150)
type(rgb_color), public, parameter :: grey59 = rgb_color(150, 150, 150)
type(rgb_color), public, parameter :: gray60 = rgb_color(153, 153, 153)
type(rgb_color), public, parameter :: grey60 = rgb_color(153, 153, 153)
type(rgb_color), public, parameter :: gray61 = rgb_color(156, 156, 156)
type(rgb_color), public, parameter :: grey61 = rgb_color(156, 156, 156)
type(rgb_color), public, parameter :: gray62 = rgb_color(158, 158, 158)
type(rgb_color), public, parameter :: grey62 = rgb_color(158, 158, 158)
type(rgb_color), public, parameter :: gray63 = rgb_color(161, 161, 161)
type(rgb_color), public, parameter :: grey63 = rgb_color(161, 161, 161)
type(rgb_color), public, parameter :: gray64 = rgb_color(163, 163, 163)
type(rgb_color), public, parameter :: grey64 = rgb_color(163, 163, 163)
type(rgb_color), public, parameter :: gray65 = rgb_color(166, 166, 166)
type(rgb_color), public, parameter :: grey65 = rgb_color(166, 166, 166)
type(rgb_color), public, parameter :: gray66 = rgb_color(168, 168, 168)
type(rgb_color), public, parameter :: grey66 = rgb_color(168, 168, 168)
type(rgb_color), public, parameter :: gray67 = rgb_color(171, 171, 171)
type(rgb_color), public, parameter :: grey67 = rgb_color(171, 171, 171)
type(rgb_color), public, parameter :: gray68 = rgb_color(173, 173, 173)
type(rgb_color), public, parameter :: grey68 = rgb_color(173, 173, 173)
type(rgb_color), public, parameter :: gray69 = rgb_color(176, 176, 176)
type(rgb_color), public, parameter :: grey69 = rgb_color(176, 176, 176)
type(rgb_color), public, parameter :: gray70 = rgb_color(179, 179, 179)
type(rgb_color), public, parameter :: grey70 = rgb_color(179, 179, 179)
type(rgb_color), public, parameter :: gray71 = rgb_color(181, 181, 181)
type(rgb_color), public, parameter :: grey71 = rgb_color(181, 181, 181)
type(rgb_color), public, parameter :: gray72 = rgb_color(184, 184, 184)
type(rgb_color), public, parameter :: grey72 = rgb_color(184, 184, 184)
type(rgb_color), public, parameter :: gray73 = rgb_color(186, 186, 186)
type(rgb_color), public, parameter :: grey73 = rgb_color(186, 186, 186)
type(rgb_color), public, parameter :: gray74 = rgb_color(189, 189, 189)
type(rgb_color), public, parameter :: grey74 = rgb_color(189, 189, 189)
type(rgb_color), public, parameter :: gray75 = rgb_color(191, 191, 191)
type(rgb_color), public, parameter :: grey75 = rgb_color(191, 191, 191)
type(rgb_color), public, parameter :: gray76 = rgb_color(194, 194, 194)
type(rgb_color), public, parameter :: grey76 = rgb_color(194, 194, 194)
type(rgb_color), public, parameter :: gray77 = rgb_color(196, 196, 196)
type(rgb_color), public, parameter :: grey77 = rgb_color(196, 196, 196)
type(rgb_color), public, parameter :: gray78 = rgb_color(199, 199, 199)
type(rgb_color), public, parameter :: grey78 = rgb_color(199, 199, 199)
type(rgb_color), public, parameter :: gray79 = rgb_color(201, 201, 201)
type(rgb_color), public, parameter :: grey79 = rgb_color(201, 201, 201)
type(rgb_color), public, parameter :: gray80 = rgb_color(204, 204, 204)
type(rgb_color), public, parameter :: grey80 = rgb_color(204, 204, 204)
type(rgb_color), public, parameter :: gray81 = rgb_color(207, 207, 207)
type(rgb_color), public, parameter :: grey81 = rgb_color(207, 207, 207)
type(rgb_color), public, parameter :: gray82 = rgb_color(209, 209, 209)
type(rgb_color), public, parameter :: grey82 = rgb_color(209, 209, 209)
type(rgb_color), public, parameter :: gray83 = rgb_color(212, 212, 212)
type(rgb_color), public, parameter :: grey83 = rgb_color(212, 212, 212)
type(rgb_color), public, parameter :: gray84 = rgb_color(214, 214, 214)
type(rgb_color), public, parameter :: grey84 = rgb_color(214, 214, 214)
type(rgb_color), public, parameter :: gray85 = rgb_color(217, 217, 217)
type(rgb_color), public, parameter :: grey85 = rgb_color(217, 217, 217)
type(rgb_color), public, parameter :: gray86 = rgb_color(219, 219, 219)
type(rgb_color), public, parameter :: grey86 = rgb_color(219, 219, 219)
type(rgb_color), public, parameter :: gray87 = rgb_color(222, 222, 222)
type(rgb_color), public, parameter :: grey87 = rgb_color(222, 222, 222)
type(rgb_color), public, parameter :: gray88 = rgb_color(224, 224, 224)
type(rgb_color), public, parameter :: grey88 = rgb_color(224, 224, 224)
type(rgb_color), public, parameter :: gray89 = rgb_color(227, 227, 227)
type(rgb_color), public, parameter :: grey89 = rgb_color(227, 227, 227)
type(rgb_color), public, parameter :: gray90 = rgb_color(229, 229, 229)
type(rgb_color), public, parameter :: grey90 = rgb_color(229, 229, 229)
type(rgb_color), public, parameter :: gray91 = rgb_color(232, 232, 232)
type(rgb_color), public, parameter :: grey91 = rgb_color(232, 232, 232)
type(rgb_color), public, parameter :: gray92 = rgb_color(235, 235, 235)
type(rgb_color), public, parameter :: grey92 = rgb_color(235, 235, 235)
type(rgb_color), public, parameter :: gray93 = rgb_color(237, 237, 237)
type(rgb_color), public, parameter :: grey93 = rgb_color(237, 237, 237)
type(rgb_color), public, parameter :: gray94 = rgb_color(240, 240, 240)
type(rgb_color), public, parameter :: grey94 = rgb_color(240, 240, 240)
type(rgb_color), public, parameter :: gray95 = rgb_color(242, 242, 242)
type(rgb_color), public, parameter :: grey95 = rgb_color(242, 242, 242)
type(rgb_color), public, parameter :: gray96 = rgb_color(245, 245, 245)
type(rgb_color), public, parameter :: grey96 = rgb_color(245, 245, 245)
type(rgb_color), public, parameter :: gray97 = rgb_color(247, 247, 247)
type(rgb_color), public, parameter :: grey97 = rgb_color(247, 247, 247)
type(rgb_color), public, parameter :: gray98 = rgb_color(250, 250, 250)
type(rgb_color), public, parameter :: grey98 = rgb_color(250, 250, 250)
type(rgb_color), public, parameter :: gray99 = rgb_color(252, 252, 252)
type(rgb_color), public, parameter :: grey99 = rgb_color(252, 252, 252)
type(rgb_color), public, parameter :: gray100 = rgb_color(255, 255, 255)
type(rgb_color), public, parameter :: grey100 = rgb_color(255, 255, 255)
type(rgb_color), public, parameter :: darkgrey = rgb_color(169, 169, 169)
type(rgb_color), public, parameter :: darkgray = rgb_color(169, 169, 169)
type(rgb_color), public, parameter :: darkblue = rgb_color(0, 0, 139)
type(rgb_color), public, parameter :: darkcyan = rgb_color(0, 139, 139)
type(rgb_color), public, parameter :: darkmagenta = rgb_color(139, 0, 139)
type(rgb_color), public, parameter :: darkred = rgb_color(139, 0, 0)
type(rgb_color), public, parameter :: lightgreen = rgb_color(144, 238, 144)

Interfaces

public interface operator(+)

  • public elemental function add_colors(c1, c2) result(c)

    Arguments

    Type IntentOptional Attributes Name
    type(rgb_color), intent(in) :: c1
    type(rgb_color), intent(in) :: c2

    Return Value type(rgb_color)

public interface assignment(=)

  • public elemental subroutine equal_colors(C1, C2)

    Arguments

    Type IntentOptional Attributes Name
    type(rgb_color), intent(inout) :: C1
    type(rgb_color), intent(in) :: C2

public interface operator(-)

public interface operator(*)

  • public elemental function scalar_left_color(k, cin) result(cout)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=8), intent(in) :: k
    type(rgb_color), intent(in) :: cin

    Return Value type(rgb_color)

public interface operator(.dot.)

  • public function dot_scalar_colors(v, cin) result(cout)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=8), intent(in), dimension(:) :: v
    type(rgb_color), intent(in), dimension(size(v)) :: cin

    Return Value type(rgb_color)


Derived Types

type, public ::  rgb_color

Components

Type Visibility Attributes Name Initial
integer, public :: r
integer, public :: g
integer, public :: b

Functions

public function rgb(c) result(num)

Arguments

Type IntentOptional Attributes Name
type(rgb_color), intent(in) :: c

Return Value integer

public elemental function add_colors(c1, c2) result(c)

Arguments

Type IntentOptional Attributes Name
type(rgb_color), intent(in) :: c1
type(rgb_color), intent(in) :: c2

Return Value type(rgb_color)

public elemental function subtract_colors(c1, c2) result(c)

Arguments

Type IntentOptional Attributes Name
type(rgb_color), intent(in) :: c1
type(rgb_color), intent(in) :: c2

Return Value type(rgb_color)

public elemental function scalar_left_color(k, cin) result(cout)

Arguments

Type IntentOptional Attributes Name
real(kind=8), intent(in) :: k
type(rgb_color), intent(in) :: cin

Return Value type(rgb_color)

public elemental function scalar_right_color(k, cin) result(cout)

Arguments

Type IntentOptional Attributes Name
real(kind=8), intent(in) :: k
type(rgb_color), intent(in) :: cin

Return Value type(rgb_color)

public function dot_scalar_colors(v, cin) result(cout)

Arguments

Type IntentOptional Attributes Name
real(kind=8), intent(in), dimension(:) :: v
type(rgb_color), intent(in), dimension(size(v)) :: cin

Return Value type(rgb_color)

public function pick_color(string) result(crgb)

Arguments

Type IntentOptional Attributes Name
character(len=*) :: string

Return Value type(rgb_color)


Subroutines

public elemental subroutine equal_colors(C1, C2)

Arguments

Type IntentOptional Attributes Name
type(rgb_color), intent(inout) :: C1
type(rgb_color), intent(in) :: C2