# Last edited on 2002-03-24 23:59:30 by stolfi
s:^\(declare \):#\1:
s:^ *[;]::
#
s:\(= abacus_slider_width / 2\) *$:\1;:
s:^\(  1 - abacus_slider_round_min_R\) *$:\1;:
s:^\(  [-] abacus_space_HX [+] 6 [*] .*abacus_frame_width/2\) *$:\1;:
s:^\(  abacus_slider_cap_base_R.*abacus_slider_cos_t)\) *$:\1;:
s:^\(  abacus_slider_round_HY\) *$:\1;:
s:^\(  abacus_slider_round_maj_R *[+].*abacus_slider_sin_t\) *$:\1;:
s:^\(  abacus_slider_round_min_R [*] abacus_slider_cos_t\) *$:\1;:
s:^\(  max(max(ring_i_thickness, ring_o_thickness), ring_m_thickness)\) *$:\1;:
s:^\(  min(min(ring_i_thickness, ring_o_thickness), ring_m_thickness)\) *$:\1;:
s:^\(#declare abacus_frame_HY = abacus_frame_thickness / 2\) *$:\1;:
s:^\(#declare abacus_slider_scale = .*abacus_slider_width)\) *$:\1;:
s:^\(#declare abacus_slider_scaled_width = .*abacus_frame_width) / 9\) *$:\1;:
s:^\(#declare abacus_space_HX = abacus_space_width / 2\) *$:\1;:
s:^\(#declare abacus_space_HZ = abacus_space_height / 2\) *$:\1;:
s:^\(#declare abacus_space_height = abacus_height - 2 [*] abacus_frame_width\) *$:\1;:
s:^\(#declare abacus_space_width = abacus_width - 2 [*] abacus_frame_width\) *$:\1;:
s:^\(#declare abacus_stick_spacing = abacus_space_height / 4.5\) *$:\1;:
s:^\(#declare dt = 360.0 / n\) *$:\1;:
s:^\(#declare legend_depth =  ring_i_thickness\) *$:\1;:
s:^\(#declare legend_depth =  ring_relief_thickness [+] ring_legend_relief\) *$:\1;:
s:^\(#declare legend_font_depth  = 1[.]00\) *$:\1;:
s:^\(#declare legend_font_depth = 1\) *$:\1;:
s:^\(#declare legend_font_gap    = 0[.]20\) *$:\1;:
s:^\(#declare legend_font_height = 0[.]66\) *$:\1;:
s:^\(#declare legend_font_height = 0[.]75\) *$:\1;:
s:^\(#declare legend_font_width  = 0[.]55\) *$:\1;:
s:^\(#declare legend_font_width = 0[.]50\) *$:\1;:
s:^\(#declare legend_radius = (ring_i_radius [+] ring_m_radius)/2\) *$:\1;:
s:^\(#declare legend_radius = (ring_m_radius [+] ring_o_radius)/2\) *$:\1;:
s:^\(#declare legend_width =  (2[.]0/3[.]0)[*](ring_m_radius - ring_i_radius)\) *$:\1;:
s:^\(#declare legend_width =  (2[.]0/3[.]0)[*](ring_o_radius - ring_m_radius)\) *$:\1;:
s:^\(#declare legend_width =  0[.]55[*](ring_o_radius - ring_m_radius)\) *$:\1;:
s:^\(#declare legend_width =  0[.]60[*](ring_m_radius - ring_i_radius)\) *$:\1;:
s:^\(#declare n = n_up [+] n_dn\) *$:\1;:
s:^\(#declare n_dn = strlen(legend_text_dn)\) *$:\1;:
s:^\(#declare n_up = strlen(legend_text_up)\) *$:\1;:
s:^\(#declare ring_m_thickness = max(ring_o_thickness, ring_i_thickness)\) *$:\1;:
s:^\(#declare ring_relief_thickness = ring_max_thickness - ring_min_thickness\) *$:\1;:
s:^\(#declare ring_ridge_radius = 0[.][0123456789]*\) *$:\1;:
s:^\(#declare ring_width = ring_o_radius - ring_i_radius\) *$:\1;:
s:^\(#declare xs = 2[*]3[.]1415926*legend_radius .* legend_font_gap)\) *$:\1;:
s:^\(#declare ys = legend_depth / legend_font_depth\) *$:\1;:
s:^\(#declare zs = legend_width / legend_font_height\) *$:\1;:
s:^\(#declare abacus_slider_HY = abacus_slider_width / 2\) *$:\1;:
# s:^\(\) *$:\1;:
# s:^\(\) *$:\1;:
