刀具信息 教材的编码出错

fuhuasuiyue

global mom_tool_name mom_tool_type
7 j0 f/ X  W6 R- l9 lglobal mom_tool_diameter mom_tool_corner1_radius mom_tool_flute_length
2 d8 j! M* A0 {: g2 q: w' c( Cglobal mom_tool_length tip_angle mom_tool_point_angle RAD2DEG
, B; [5 n- e0 Xif ![ info exists mom_tool_corner1_radius ] { set mom_tool_corner1_radius
0 }
8 M$ ?" v7 N+ g& @if { $mom_tool_type == "Drilling Tool" }  {
set tip_angle [ expr $mom_tool_point_angle * $RAD2DEG ]
MOM_output_literal ";(D=[format "%.2f" $mom_tool_diameter] Tip
+ A8 Q* ?" M2 T2 v+ dangle=[format "%.2f" $tip_angle] F=[format "%.2f" $mom_tool_flute_length]
L=[format "%.2f" $mom_tool_length])"
& S, @8 r- J) \1 \* b} else {
MOM_out_literal ";(D=[format "%.2f" $mom_tool_diameter] R=[format
"%.2f" $mom_tool_corner1_radius] F=[format "%.2f" $mom_tool_flute_length]
; N5 D( m. h/ `4 |  _% }$ [L=[format "%.2f" $mom_tool_length])"
8 L9 v1 v" j5 [& z7 Z/ E}