{'fraction_non_alphanumeric': 0.01901565995525727, 'fraction_numerical': 0.003355704697986577, 'mean_word_length': 5.215277777777778, 'pattern_counts': {'":': 0, '<': 0, '<?xml version=': 0, '>': 0, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
Rapid application development using the Tcl/Tk language

During the last year high level applications at CEBAF were written using the Tcl/Tk scripting language. This language is rapidly gaining in popularity, in part due to the ease of constructing programs with X11 graphical user interfaces, and in part due to the ease of adding compiled user code for specialized purposes. Extensions to the language provide object oriented programming, which was used to develop a hierarchy of classes relevant for high level accelerator control. We describe the basic language features, some 3rd party add-on packages, and local additions to the toolbox. Next we describe the features of the accelerator object hierarchy, and finally describe applications written using this toolbox such as the ModelServer prototype, Slow Orbit and Energy Lock, the Linac Energy Management System, and other applications.