DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦59e7711d7⟧ Ada Source

    Length: 23552 (0x5c00)
    Types: Ada Source
    Notes: 03_class, FILE, R1k_Segment, e3_tag, package Visible_Key_Names, seg_0000cd

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦this⟧ 

E3 Source Code



package Visible_Key_Names is

    type Vt100_Key_Names is
       (Nul, C_A, C_B, C_C, C_D, C_E, C_F, C_G, C_H, C_I, C_J, C_K, C_L, C_M,
        C_N, C_O, C_P, C_Q, C_R, C_S, C_T, C_U, C_V, C_W, C_X, C_Y, C_Z,
        C_Left_Bracket, C_Backslash, C_Right_Bracket, C_Circumflex, C_Underline,

        ' ', '!', '"', '#', '$', '%', '&', ''', '(', ')', '*',
        '+', ',', '-', '.', '/', '0', '1', '2', '3', '4', '5',
        '6', '7', '8', '9', ':', ';', '<', '=', '>', '?',

        '@', 'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J',
        'K', 'L', 'M', 'N', 'O', 'P', 'Q', 'R', 'S', 'T', 'U',
        'V', 'W', 'X', 'Y', 'Z', '[', '\', ']', '^', '_',

        '`', 'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j',
        'k', 'l', 'm', 'n', 'o', 'p', 'q', 'r', 's', 't', 'u',
        'v', 'w', 'x', 'y', 'z', '{', '|', '}', '~', Delete,

        -- terminal specific

        Up, Down, Left, Right, Pf1, Pf2, Pf3, Pf4, Numeric_1, Numeric_2,
        Numeric_3, Numeric_4, Numeric_5, Numeric_6, Numeric_7, Numeric_8,
        Numeric_9, Numeric_0, Dash, Dot, Enter, Numeric_Comma,

        -- escape combinations, esc-char and esc-control-char

        Esc_Nul, Esc_C_A, Esc_C_B, Esc_C_C, Esc_C_D, Esc_C_E, Esc_C_F,
        Esc_C_G, Esc_C_H, Esc_C_I, Esc_C_J, Esc_C_K, Esc_C_L, Esc_C_M,
        Esc_C_N, Esc_C_O, Esc_C_P, Esc_C_Q, Esc_C_R, Esc_C_S, Esc_C_T,
        Esc_C_U, Esc_C_V, Esc_C_W, Esc_C_X, Esc_C_Y, Esc_C_Z,

        Esc_C_Backslash, Esc_C_Circumflex, Esc_C_Underline, Esc_C_Right_Bracket,

        -- esc-esc is not defined, will map to escape (the character)

        Esc_Space, Esc_Exclam, Esc_Quotation, Esc_Sharp, Esc_Dollar,
        Esc_Percent, Esc_Ampersand, Esc_Tick, Esc_Left_Paren,
        Esc_Right_Paren, Esc_Star, Esc_Plus, Esc_Comma, Esc_Minus,
        Esc_Period, Esc_Slash, Esc_0, Esc_1, Esc_2, Esc_3, Esc_4, Esc_5,
        Esc_6, Esc_7, Esc_8, Esc_9, Esc_Colon, Esc_Semicolon,
        Esc_Less_Than, Esc_Equal, Esc_Greater_Than, Esc_Query, Esc_At_Sign,

        Esc_A, Esc_B, Esc_C, Esc_D, Esc_E, Esc_F, Esc_G, Esc_H, Esc_I,
        Esc_J, Esc_K, Esc_L, Esc_M, Esc_N, Esc_O, Esc_P, Esc_Q, Esc_R,
        Esc_S, Esc_T, Esc_U, Esc_V, Esc_W, Esc_X, Esc_Y, Esc_Z,

        Esc_Left_Bracket, Esc_Backslash,
        Esc_Right_Bracket, Esc_Circumflex, Esc_Underline,

        Esc_Grave, Esc_S_A, Esc_S_B, Esc_S_C, Esc_S_D, Esc_S_E,
        Esc_S_F, Esc_S_G, Esc_S_H, Esc_S_I, Esc_S_J, Esc_S_K, Esc_S_L,
        Esc_S_M, Esc_S_N, Esc_S_O, Esc_S_P, Esc_S_Q, Esc_S_R, Esc_S_S,
        Esc_S_T, Esc_S_U, Esc_S_V, Esc_S_W, Esc_S_X, Esc_S_Y, Esc_S_Z,

        Esc_Left_Brace, Esc_Bar, Esc_Right_Brace, Esc_Tilde, Esc_Del,

        -- renames

        Backspace, Tab, Break,

        -- spares
        F1, F2, F3, F4, F5, F6, F7, F8, F9, F10, F11,
        F12, F13, F14, F15, F16, F17, F18, F19, F20);

    -- NOTE: Esc-Control-J, Esc-Control-M, and Esc-Control-] are not
    -- actually defined due to implementation limitations.

    type Rational_Key_Names is
       (
        -- standard characters

        ' ', '!', '"', '#', '$', '%', '&', ''', '(', ')',
        '*', '+', ',', '-', '.', '/', '0', '1', '2', '3', '4',
        '5', '6', '7', '8', '9', ':', ';', '<', '=', '>', '?',

        '@', 'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J',
        'K', 'L', 'M', 'N', 'O', 'P', 'Q', 'R', 'S', 'T', 'U',
        'V', 'W', 'X', 'Y', 'Z', '[', '\', ']', '^', '_',

        '`', 'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j',
        'k', 'l', 'm', 'n', 'o', 'p', 'q', 'r', 's', 't',
        'u', 'v', 'w', 'x', 'y', 'z', '{', '|', '}', '~',


        -- other single keys

        Tab, Delete, Carriage_Return,

        F1, F2, F3, F4, F5, F6, F7, F8, F9, F10, F11,
        F12, F13, F14, F15, F16, F17, F18, F19, F20,

        Numeric_0, Numeric_1, Numeric_2, Numeric_3, Numeric_4,
        Numeric_5, Numeric_6, Numeric_7, Numeric_8, Numeric_9,
        Dash, Dot, Enter, Numeric_Comma, Up, Down, Left, Right,

        Word, Line, Window, Image, Region, Object, Mark, Begin_Of, End_Of,

        Promot, Complt, Format,

        Spare1, Spare2, Spare3, Spare4,

        -- shifted versions

        S_Tab, S_Delete, S_Carriage_Return, S_Space,

        S_F1, S_F2, S_F3, S_F4, S_F5, S_F6, S_F7, S_F8, S_F9, S_F10, S_F11,
        S_F12, S_F13, S_F14, S_F15, S_F16, S_F17, S_F18, S_F19, S_F20,

        S_Numeric_0, S_Numeric_1, S_Numeric_2, S_Numeric_3, S_Numeric_4,
        S_Numeric_5, S_Numeric_6, S_Numeric_7, S_Numeric_8, S_Numeric_9,
        S_Dash, S_Dot, S_Enter, S_Numeric_Comma, S_Up, S_Down, S_Left, S_Right,

        S_Word, S_Line, S_Window, S_Image, S_Region,
        S_Object, S_Mark, S_Begin_Of, S_End_Of,

        S_Promot, S_Complt, S_Format,

        S_Spare1, S_Spare2, S_Spare3, S_Spare4,

        -- control versions

        C_Grave, C_Minus, C_Equal, C_Semicolon, C_Tick, C_Underline,
        C_Comma, C_Period, C_0, C_1, C_2, C_3, C_4, C_5, C_6, C_7, C_8, C_9,

        C_A, C_B, C_C, C_D, C_E, C_F, C_G, C_H, C_I, C_J, C_K, C_L,
        C_M, C_N, C_O, C_P, C_Q, C_R, C_S, C_T, C_U, C_V, C_W, C_X,
        C_Y, C_Z, C_Left_Bracket, C_Right_Bracket, C_Quote, C_Slash,

        C_Delete, C_Tab, C_Carriage_Return, C_Space,

        C_F1, C_F2, C_F3, C_F4, C_F5, C_F6, C_F7, C_F8, C_F9, C_F10, C_F11,
        C_F12, C_F13, C_F14, C_F15, C_F16, C_F17, C_F18, C_F19, C_F20,

        C_Numeric_0, C_Numeric_1, C_Numeric_2, C_Numeric_3, C_Numeric_4,
        C_Numeric_5, C_Numeric_6, C_Numeric_7, C_Numeric_8, C_Numeric_9,
        C_Dash, C_Dot, C_Enter, C_Numeric_Comma, C_Up, C_Down, C_Left, C_Right,

        C_Word, C_Line, C_Window, C_Image, C_Region,
        C_Object, C_Mark, C_Begin_Of, C_End_Of,

        C_Promot, C_Complt, C_Format,

        C_Spare1, C_Spare2, C_Spare3, C_Spare4,

        -- Meta version

        M_Grave, M_Minus, M_Equal, M_Semicolon, M_Tick, M_Underline,
        M_Comma, M_Period, M_0, M_1, M_2, M_3, M_4, M_5, M_6, M_7, M_8, M_9,

        M_A, M_B, M_C, M_D, M_E, M_F, M_G, M_H, M_I, M_J, M_K, M_L,
        M_M, M_N, M_O, M_P, M_Q, M_R, M_S, M_T, M_U, M_V, M_W, M_X,
        M_Y, M_Z, M_Left_Bracket, M_Right_Bracket, M_Quote, M_Slash,

        M_Delete, M_Tab, M_Carriage_Return, M_Space,

        M_F1, M_F2, M_F3, M_F4, M_F5, M_F6, M_F7, M_F8, M_F9, M_F10, M_F11,
        M_F12, M_F13, M_F14, M_F15, M_F16, M_F17, M_F18, M_F19, M_F20,

        M_Numeric_0, M_Numeric_1, M_Numeric_2, M_Numeric_3, M_Numeric_4,
        M_Numeric_5, M_Numeric_6, M_Numeric_7, M_Numeric_8, M_Numeric_9,
        M_Dash, M_Dot, M_Enter, M_Numeric_Comma, M_Up, M_Down, M_Left, M_Right,

        M_Word, M_Line, M_Window, M_Image, M_Region,
        M_Object, M_Mark, M_Begin_Of, M_End_Of,

        M_Promot, M_Complt, M_Format,

        M_Spare1, M_Spare2, M_Spare3, M_Spare4,

        -- control shift version

        Cs_Grave, Cs_Minus, Cs_Equal, Cs_Semicolon, Cs_Tick,
        Cs_Underline, Cs_Comma, Cs_Period, Cs_0, Cs_1,
        Cs_2, Cs_3, Cs_4, Cs_5, Cs_6, Cs_7, Cs_8, Cs_9,

        Cs_A, Cs_B, Cs_C, Cs_D, Cs_E, Cs_F, Cs_G, Cs_H, Cs_I, Cs_J, Cs_K, Cs_L,
        Cs_M, Cs_N, Cs_O, Cs_P, Cs_Q, Cs_R, Cs_S, Cs_T, Cs_U, Cs_V, Cs_W, Cs_X,
        Cs_Y, Cs_Z, Cs_Left_Bracket, Cs_Right_Bracket, Cs_Quote, Cs_Slash,

        Cs_Delete, Cs_Tab, Cs_Carriage_Return, Cs_Space,

        Cs_F1, Cs_F2, Cs_F3, Cs_F4, Cs_F5, Cs_F6, Cs_F7,
        Cs_F8, Cs_F9, Cs_F10, Cs_F11, Cs_F12, Cs_F13, Cs_F14,
        Cs_F15, Cs_F16, Cs_F17, Cs_F18, Cs_F19, Cs_F20,

        Cs_Numeric_0, Cs_Numeric_1, Cs_Numeric_2, Cs_Numeric_3, Cs_Numeric_4,
        Cs_Numeric_5, Cs_Numeric_6, Cs_Numeric_7, Cs_Numeric_8,
        Cs_Numeric_9, Cs_Dash, Cs_Dot, Cs_Enter, Cs_Numeric_Comma,

        Cs_Up, Cs_Down, Cs_Left, Cs_Right,

        Cs_Word, Cs_Line, Cs_Window, Cs_Image, Cs_Region,
        Cs_Object, Cs_Mark, Cs_Begin_Of, Cs_End_Of,

        Cs_Promot, Cs_Complt, Cs_Format,

        Cs_Spare1, Cs_Spare2, Cs_Spare3, Cs_Spare4,

        -- control shift aliases

        C_Tilde, C_Backslash, C_Plus, C_Colon, C_Right_Paren, C_Exclam,
        C_At_Sign, C_Sharp, C_Dollar, C_Percent, C_Circumflex,
        C_Ampersand, C_Star, C_Left_Paren, C_Query, C_Left_Brace,
        C_Bar, C_Right_Brace, C_Greater_Than, C_Less_Than,


        -- M shift

        Ms_Grave, Ms_Minus, Ms_Equal, Ms_Semicolon, Ms_Tick,
        Ms_Underline, Ms_Comma, Ms_Period, Ms_0, Ms_1,
        Ms_2, Ms_3, Ms_4, Ms_5, Ms_6, Ms_7, Ms_8, Ms_9,

        Ms_A, Ms_B, Ms_C, Ms_D, Ms_E, Ms_F, Ms_G, Ms_H, Ms_I, Ms_J, Ms_K, Ms_L,
        Ms_M, Ms_N, Ms_O, Ms_P, Ms_Q, Ms_R, Ms_S, Ms_T, Ms_U, Ms_V, Ms_W, Ms_X,
        Ms_Y, Ms_Z, Ms_Left_Bracket, Ms_Right_Bracket, Ms_Quote, Ms_Slash,

        Ms_Delete, Ms_Tab, Ms_Carriage_Return, Ms_Space,

        Ms_F1, Ms_F2, Ms_F3, Ms_F4, Ms_F5, Ms_F6, Ms_F7,
        Ms_F8, Ms_F9, Ms_F10, Ms_F11, Ms_F12, Ms_F13, Ms_F14,
        Ms_F15, Ms_F16, Ms_F17, Ms_F18, Ms_F19, Ms_F20,

        Ms_Numeric_0, Ms_Numeric_1, Ms_Numeric_2, Ms_Numeric_3, Ms_Numeric_4,
        Ms_Numeric_5, Ms_Numeric_6, Ms_Numeric_7, Ms_Numeric_8,
        Ms_Numeric_9, Ms_Dash, Ms_Dot, Ms_Enter, Ms_Numeric_Comma,

        Ms_Up, Ms_Down, Ms_Left, Ms_Right,

        Ms_Word, Ms_Line, Ms_Window, Ms_Image, Ms_Region,
        Ms_Object, Ms_Mark, Ms_Begin_Of, Ms_End_Of,

        Ms_Promot, Ms_Complt, Ms_Format,

        Ms_Spare1, Ms_Spare2, Ms_Spare3, Ms_Spare4,

        -- M shift aliases

        M_Tilde, M_Backslash, M_Plus, M_Colon, M_Right_Paren, M_Exclam,
        M_At_Sign, M_Sharp, M_Dollar, M_Percent, M_Circumflex,
        M_Ampersand, M_Star, M_Left_Paren, M_Query, M_Left_Brace,
        M_Bar, M_Right_Brace, M_Greater_Than, M_Less_Than,


        -- meta control

        Cm_Grave, Cm_Minus, Cm_Equal, Cm_Semicolon, Cm_Tick,
        Cm_Underline, Cm_Comma, Cm_Period, Cm_0, Cm_1,
        Cm_2, Cm_3, Cm_4, Cm_5, Cm_6, Cm_7, Cm_8, Cm_9,

        Cm_A, Cm_B, Cm_C, Cm_D, Cm_E, Cm_F, Cm_G, Cm_H, Cm_I, Cm_J, Cm_K, Cm_L,
        Cm_M, Cm_N, Cm_O, Cm_P, Cm_Q, Cm_R, Cm_S, Cm_T, Cm_U, Cm_V, Cm_W, Cm_X,
        Cm_Y, Cm_Z, Cm_Left_Bracket, Cm_Right_Bracket, Cm_Quote, Cm_Slash,

        Cm_Delete, Cm_Tab, Cm_Carriage_Return, Cm_Space,

        Cm_F1, Cm_F2, Cm_F3, Cm_F4, Cm_F5, Cm_F6, Cm_F7,
        Cm_F8, Cm_F9, Cm_F10, Cm_F11, Cm_F12, Cm_F13, Cm_F14,
        Cm_F15, Cm_F16, Cm_F17, Cm_F18, Cm_F19, Cm_F20,

        Cm_Numeric_0, Cm_Numeric_1, Cm_Numeric_2, Cm_Numeric_3, Cm_Numeric_4,
        Cm_Numeric_5, Cm_Numeric_6, Cm_Numeric_7, Cm_Numeric_8,
        Cm_Numeric_9, Cm_Dash, Cm_Dot, Cm_Enter, Cm_Numeric_Comma,

        Cm_Up, Cm_Down, Cm_Left, Cm_Right,

        Cm_Word, Cm_Line, Cm_Window, Cm_Image, Cm_Region,
        Cm_Object, Cm_Mark, Cm_Begin_Of, Cm_End_Of,

        Cm_Promot, Cm_Complt, Cm_Format,

        Cm_Spare1, Cm_Spare2, Cm_Spare3, Cm_Spare4,

        -- meta control shift


        Cms_Grave, Cms_Minus, Cms_Equal, Cms_Semicolon, Cms_Tick,
        Cms_Underline, Cms_Comma, Cms_Period, Cms_0, Cms_1,
        Cms_2, Cms_3, Cms_4, Cms_5, Cms_6, Cms_7, Cms_8, Cms_9,

        Cms_A, Cms_B, Cms_C, Cms_D, Cms_E, Cms_F, Cms_G, Cms_H, Cms_I,
        Cms_J, Cms_K, Cms_L, Cms_M, Cms_N, Cms_O, Cms_P, Cms_Q, Cms_R,
        Cms_S, Cms_T, Cms_U, Cms_V, Cms_W, Cms_X, Cms_Y, Cms_Z,
        Cms_Left_Bracket, Cms_Right_Bracket, Cms_Quote, Cms_Slash,

        Cms_Delete, Cms_Tab, Cms_Carriage_Return, Cms_Space,

        Cms_F1, Cms_F2, Cms_F3, Cms_F4, Cms_F5, Cms_F6, Cms_F7,
        Cms_F8, Cms_F9, Cms_F10, Cms_F11, Cms_F12, Cms_F13, Cms_F14,
        Cms_F15, Cms_F16, Cms_F17, Cms_F18, Cms_F19, Cms_F20,

        Cms_Numeric_0, Cms_Numeric_1, Cms_Numeric_2, Cms_Numeric_3,
        Cms_Numeric_4, Cms_Numeric_5, Cms_Numeric_6,
        Cms_Numeric_7, Cms_Numeric_8, Cms_Numeric_9,
        Cms_Dash, Cms_Dot, Cms_Enter, Cms_Numeric_Comma,

        Cms_Up, Cms_Down, Cms_Left, Cms_Right,

        Cms_Word, Cms_Line, Cms_Window, Cms_Image, Cms_Region,
        Cms_Object, Cms_Mark, Cms_Begin_Of, Cms_End_Of,

        Cms_Promot, Cms_Complt, Cms_Format,

        Cms_Spare1, Cms_Spare2, Cms_Spare3, Cms_Spare4,

        -- meta control aliases

        Cm_Tilde, Cm_Backslash, Cm_Plus, Cm_Colon, Cm_Right_Paren, Cm_Exclam,
        Cm_At_Sign, Cm_Sharp, Cm_Dollar, Cm_Percent, Cm_Circumflex,
        Cm_Ampersand, Cm_Star, Cm_Left_Paren, Cm_Query, Cm_Left_Brace,
        Cm_Bar, Cm_Right_Brace, Cm_Greater_Than, Cm_Less_Than);

    type Cit500r_Key_Names is
       (
        -- standard characters

        ' ', '!', '"', '#', '$', '%', '&', ''', '(', ')',
        '*', '+', ',', '-', '.', '/', '0', '1', '2', '3', '4',
        '5', '6', '7', '8', '9', ':', ';', '<', '=', '>', '?',

        '@', 'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J',
        'K', 'L', 'M', 'N', 'O', 'P', 'Q', 'R', 'S', 'T', 'U',
        'V', 'W', 'X', 'Y', 'Z', '[', '\', ']', '^', '_',

        '`', 'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j',
        'k', 'l', 'm', 'n', 'o', 'p', 'q', 'r', 's', 't',
        'u', 'v', 'w', 'x', 'y', 'z', '{', '|', '}', '~',

        -- other single keys

        Up, Down, Left, Right, Pf1, Pf2, Pf3, Pf4, Numeric_0, Numeric_1,
        Numeric_2, Numeric_3, Numeric_4, Numeric_5, Numeric_6, Numeric_7,
        Numeric_8, Numeric_9, Dash, Dot, Enter, Numeric_Comma,

        F1, F2, F3, F4, F5, F6, F7, F8, F9, F10, F11,
        F12, F13, F14, F15, F16, F17, F18, F19, F20,

        Clear, Eol, Underscore, Home, Eop, Center,

        Compose, Tab, Backspace, Carriage_Return,

        -- shifted keys

        S_Up, S_Down, S_Left, S_Right,

        S_Pf1, S_Pf2, S_Pf3, S_Pf4,

        S_Numeric_0, S_Numeric_1, S_Numeric_2, S_Numeric_3, S_Numeric_4,
        S_Numeric_5, S_Numeric_6, S_Numeric_7, S_Numeric_8,
        S_Numeric_9, S_Enter, S_Numeric_Comma, S_Dash, S_Dot,

        S_F1, S_F2, S_F3, S_F4, S_F5, S_F6, S_F7, S_F8, S_F9, S_F10, S_F11,
        S_F12, S_F13, S_F14, S_F15, S_F16, S_F17, S_F18, S_F19, S_F20,

        S_Clear, S_Eol, S_Underscore, S_Home, S_Eop, S_Center,

        S_Tab, S_Backspace, S_Comma, S_Period,
        S_Compose, S_Carriage_Return, S_Space,

        -- control keys

        C_Space, C_Exclam, C_Sharp, C_Dollar, C_Percent, C_Ampersand,
        C_Tick, C_Left_Paren, C_Right_Paren, C_Star, C_Plus, C_Comma,
        C_Minus, C_Period, C_Slash, C_0, C_1, C_2, C_3, C_4, C_5,
        C_6, C_7, C_8, C_9, C_Colon, C_Semicolon, C_Less_Than,
        C_Equal, C_Greater_Than, C_Query, C_At_Sign, C_Quote,

        Cs_A, Cs_B, Cs_C, Cs_D, Cs_E, Cs_F, Cs_G, Cs_H, Cs_I,
        Cs_J, Cs_K, Cs_L, Cs_M, Cs_N, Cs_O, Cs_P, Cs_Q, Cs_R,
        Cs_S, Cs_T, Cs_U, Cs_V, Cs_W, Cs_X, Cs_Y, Cs_Z,

        C_Left_Bracket, C_Backslash, C_Right_Bracket,
        C_Circumflex, C_Underline, C_Grave,

        C_A, C_B, C_C, C_D, C_E, C_F, C_G, C_H, C_I, C_J, C_K, C_L, C_M,
        C_N, C_O, C_P, C_Q, C_R, C_S, C_T, C_U, C_V, C_W, C_X, C_Y,
        C_Z, C_Backspace, C_Left_Brace, C_Bar, C_Right_Brace, C_Tilde,

        C_Up, C_Down, C_Left, C_Right,

        C_Pf1, C_Pf2, C_Pf3, C_Pf4,

        C_Numeric_0, C_Numeric_1, C_Numeric_2, C_Numeric_3, C_Numeric_4,
        C_Numeric_5, C_Numeric_6, C_Numeric_7, C_Numeric_8,
        C_Numeric_9, C_Dash, C_Dot, C_Enter, C_Numeric_Comma,

        C_F1, C_F2, C_F3, C_F4, C_F5, C_F6, C_F7, C_F8, C_F9, C_F10, C_F11,
        C_F12, C_F13, C_F14, C_F15, C_F16, C_F17, C_F18, C_F19, C_F20,

        C_Clear, C_Eol, C_Underscore, C_Home, C_Eop, C_Center,

        C_Compose, C_Tab, C_Carriage_Return,

        -- control shift,  non-alaphanumerics

        Cs_Up, Cs_Down, Cs_Left, Cs_Right,

        Cs_Pf1, Cs_Pf2, Cs_Pf3, Cs_Pf4,

        Cs_Numeric_0, Cs_Numeric_1, Cs_Numeric_2, Cs_Numeric_3, Cs_Numeric_4,
        Cs_Numeric_5, Cs_Numeric_6, Cs_Numeric_7, Cs_Numeric_8, Cs_Numeric_9,

        Cs_Dash, Cs_Numeric_Comma, Cs_Dot, Cs_Enter,

        Cs_F1, Cs_F2, Cs_F3, Cs_F4, Cs_F5, Cs_F6, Cs_F7,
        Cs_F8, Cs_F9, Cs_F10, Cs_F11, Cs_F12, Cs_F13, Cs_F14,
        Cs_F15, Cs_F16, Cs_F17, Cs_F18, Cs_F19, Cs_F20,

        Cs_Clear, Cs_Eol, Cs_Underscore, Cs_Home, Cs_Eop, Cs_Center,

        Cs_Tab, Cs_Carriage_Return, Cs_Comma,
        Cs_Backspace, Cs_Period, Cs_Compose, Cs_Space,

        -- aliases

        Object, Region, Window, Image, Line, Word, Mark, S_Object, S_Region,
        S_Window, S_Image, S_Line, S_Word, S_Mark, C_Object, C_Region,
        C_Window, C_Image, C_Line, C_Word, C_Mark, Cs_Object, Cs_Region,
        Cs_Window, Cs_Image, Cs_Line, Cs_Word, Cs_Mark, Begin_Of, End_Of,
        S_Begin_Of, S_End_Of, C_Begin_Of, C_End_Of, Cs_Begin_Of, Cs_End_Of);

    type Facit_Key_Names is

       (
        -- standard ASCII sequences

        Nul, C_A, C_B, C_C, C_D, C_E, C_F, C_G, C_H, C_I, C_J, C_K, C_L,
        C_M, C_N, C_O, C_P, C_Q, C_R, C_S, C_T, C_U, C_V, C_W, C_X, C_Y, C_Z,

        C_Left_Bracket, C_Backslash, C_Right_Bracket, C_Circumflex, C_Underline,

        ' ', '!', '"', '#', '$', '%', '&', ''', '(', ')', '*',
        '+', ',', '-', '.', '/', '0', '1', '2', '3', '4', '5',
        '6', '7', '8', '9', ':', ';', '<', '=', '>', '?',

        '@', 'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J',
        'K', 'L', 'M', 'N', 'O', 'P', 'Q', 'R', 'S', 'T', 'U',
        'V', 'W', 'X', 'Y', 'Z', '[', '\', ']', '^', '_',

        '`', 'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j',
        'k', 'l', 'm', 'n', 'o', 'p', 'q', 'r', 's', 't', 'u',
        'v', 'w', 'x', 'y', 'z', '{', '|', '}', '~', Delete,

        -- unshifted terminal specific

        X1, X2, X3, X4, X5, X6, Up, Down, Left, Right, Begin_Of, End_Of,

        Pf1, Pf2, Pf3, Pf4,

        F1, F2, F3, F4, F5, F6, F7, F8, F9, F10, F11, F12,

        Numeric_1, Numeric_2, Numeric_3, Numeric_4, Numeric_5,
        Numeric_6, Numeric_7, Numeric_8, Numeric_9, Numeric_0,

        Dash, Dot, Enter, Numeric_Comma,

        -- shifted terminal specific

        S_Up, S_Down, S_X1, S_X2, S_X3, S_X4, S_X5, S_X6,

        S_F1, S_F2, S_F3, S_F4, S_F5, S_F6,
        S_F7, S_F8, S_F9, S_F10, S_F11, S_F12,


        -- escape combinations, esc-char and esc-control-char

        Esc_Nul, Esc_C_A, Esc_C_B, Esc_C_C, Esc_C_D, Esc_C_E, Esc_C_F,
        Esc_C_G, Esc_C_H, Esc_C_I, Esc_C_J, Esc_C_K, Esc_C_L, Esc_C_M,
        Esc_C_N, Esc_C_O, Esc_C_P, Esc_C_Q, Esc_C_R, Esc_C_S, Esc_C_T,
        Esc_C_U, Esc_C_V, Esc_C_W, Esc_C_X, Esc_C_Y, Esc_C_Z,

        Esc_C_Backslash, Esc_C_Circumflex, Esc_C_Underline, Esc_C_Right_Bracket,

        -- esc-esc is not defined, will map to escape (the character)

        Esc_Space, Esc_Exclam, Esc_Quotation, Esc_Sharp, Esc_Dollar,
        Esc_Percent, Esc_Ampersand, Esc_Tick, Esc_Left_Paren,
        Esc_Right_Paren, Esc_Star, Esc_Plus, Esc_Comma, Esc_Minus,
        Esc_Period, Esc_Slash, Esc_0, Esc_1, Esc_2, Esc_3, Esc_4, Esc_5,
        Esc_6, Esc_7, Esc_8, Esc_9, Esc_Colon, Esc_Semicolon,
        Esc_Less_Than, Esc_Equal, Esc_Greater_Than, Esc_Query, Esc_At_Sign,

        Esc_A, Esc_B, Esc_C, Esc_D, Esc_E, Esc_F, Esc_G, Esc_H, Esc_I,
        Esc_J, Esc_K, Esc_L, Esc_M, Esc_N, Esc_O, Esc_P, Esc_Q, Esc_R,
        Esc_S, Esc_T, Esc_U, Esc_V, Esc_W, Esc_X, Esc_Y, Esc_Z,

        Esc_Left_Bracket, Esc_Backslash,
        Esc_Right_Bracket, Esc_Circumflex, Esc_Underline,

        Esc_Grave, Esc_S_A, Esc_S_B, Esc_S_C, Esc_S_D, Esc_S_E,
        Esc_S_F, Esc_S_G, Esc_S_H, Esc_S_I, Esc_S_J, Esc_S_K, Esc_S_L,
        Esc_S_M, Esc_S_N, Esc_S_O, Esc_S_P, Esc_S_Q, Esc_S_R, Esc_S_S,
        Esc_S_T, Esc_S_U, Esc_S_V, Esc_S_W, Esc_S_X, Esc_S_Y, Esc_S_Z,

        Esc_Left_Brace, Esc_Bar, Esc_Right_Brace, Esc_Tilde, Esc_Del,

        -- esc function keys

        Esc_X1, Esc_X2, Esc_X3, Esc_X4, Esc_X5, Esc_X6, Esc_Up,
        Esc_Down, Esc_Left, Esc_Right, Esc_Begin_Of, Esc_End_Of,

        Esc_Pf1, Esc_Pf2, Esc_Pf3, Esc_Pf4,

        Esc_F1, Esc_F2, Esc_F3, Esc_F4, Esc_F5, Esc_F6,
        Esc_F7, Esc_F8, Esc_F9, Esc_F10, Esc_F11, Esc_F12,

        Esc_Numeric_1, Esc_Numeric_2, Esc_Numeric_3, Esc_Numeric_4,
        Esc_Numeric_5, Esc_Numeric_6, Esc_Numeric_7,
        Esc_Numeric_8, Esc_Numeric_9, Esc_Numeric_0,

        Esc_Dash, Esc_Dot, Esc_Enter, Esc_Numeric_Comma,

        -- shifted terminal specific

        Esc_S_X1, Esc_S_X2, Esc_S_X3, Esc_S_X4,
        Esc_S_X5, Esc_S_X6, Esc_S_Up, Esc_S_Down,

        Esc_S_F1, Esc_S_F2, Esc_S_F3, Esc_S_F4, Esc_S_F5, Esc_S_F6,
        Esc_S_F7, Esc_S_F8, Esc_S_F9, Esc_S_F10, Esc_S_F11, Esc_S_F12,

        -- control function keys

        C_F1, C_F2, C_F3, C_F4, C_F5, C_F6,
        C_F7, C_F8, C_F9, C_F10, C_F11, C_F12,


        -- escape-control function keys

        Esc_C_F1, Esc_C_F2, Esc_C_F3, Esc_C_F4, Esc_C_F5, Esc_C_F6,
        Esc_C_F7, Esc_C_F8, Esc_C_F9, Esc_C_F10, Esc_C_F11, Esc_C_F12,

        -- renames

        Backspace, Tab, Break);


end Visible_Key_Names;

E3 Meta Data

    nblk1=16
    nid=0
    hdr6=2c
        [0x00] rec0=18 rec1=00 rec2=01 rec3=024
        [0x01] rec0=13 rec1=00 rec2=02 rec3=044
        [0x02] rec0=19 rec1=00 rec2=03 rec3=028
        [0x03] rec0=1b rec1=00 rec2=04 rec3=078
        [0x04] rec0=1d rec1=00 rec2=05 rec3=080
        [0x05] rec0=19 rec1=00 rec2=06 rec3=044
        [0x06] rec0=17 rec1=00 rec2=07 rec3=040
        [0x07] rec0=17 rec1=00 rec2=08 rec3=022
        [0x08] rec0=1a rec1=00 rec2=09 rec3=066
        [0x09] rec0=1b rec1=00 rec2=0a rec3=078
        [0x0a] rec0=17 rec1=00 rec2=0b rec3=034
        [0x0b] rec0=18 rec1=00 rec2=0c rec3=030
        [0x0c] rec0=1b rec1=00 rec2=0d rec3=046
        [0x0d] rec0=1c rec1=00 rec2=0e rec3=008
        [0x0e] rec0=17 rec1=00 rec2=0f rec3=00e
        [0x0f] rec0=1a rec1=00 rec2=10 rec3=04c
        [0x10] rec0=18 rec1=00 rec2=11 rec3=01c
        [0x11] rec0=19 rec1=00 rec2=12 rec3=000
        [0x12] rec0=1d rec1=00 rec2=13 rec3=02a
        [0x13] rec0=13 rec1=00 rec2=14 rec3=00a
        [0x14] rec0=1c rec1=00 rec2=15 rec3=03c
        [0x15] rec0=0f rec1=00 rec2=16 rec3=000
    tail 0x201002fbc7b6a4b7f15bd 0x42a00088462062003