通过TCL编程，采用纤维法实现简单矩形截面的弯矩-曲率关系分析，附件为分析源代码。(Through TCL programming, the bending moment-curvature relationship of simple rectangular section is analyzed by fiber method. The accessory is the analysis source code.)