1package CONFIG is 2 3 OUTPUT_SCREEN_SIZE : INTEGER := 20; 4 5 type CONFIGURATION_TYPE is (DEVELOPER_VERSION, USER_VERSION, ONLY_MEANINGS); 6 7 CONFIGURATION : CONFIGURATION_TYPE := DEVELOPER_VERSION; 8 9 type METHOD_TYPE is (INTERACTIVE, COMMAND_LINE_INPUT, COMMAND_LINE_FILES); 10 11 METHOD : METHOD_TYPE := INTERACTIVE; 12 13 type LANGUAGE_TYPE is (LATIN_TO_ENGLISH, ENGLISH_TO_LATIN); 14 15 LANGUAGE : LANGUAGE_TYPE := LATIN_TO_ENGLISH; 16 17 SUPPRESS_PREFACE : BOOLEAN := FALSE; 18 19 20end CONFIG; 21