Creo Parametric. Универсальная модель шестерни

/*Исходные данные: mn=4 /*модуль нормальный Z=47 /*число зубьев шестерни B=40 /*ширина шестерни alpha=20 /*угол профиля beta=0 /*угол наклона зуба /*Расчетные формулы параметров шестерни /*beta=acos(mn*(Z1SH+Z2KOL)/2/A) /*угол наклона зуба mt=mn/cos(beta) /*торцевой модуль d_del= mt*Z /* делительный диаметр шестерни d_vpad=d_del-2.5*mt /*диаметр впадин шестерни d_ev=d_del*cos(alpha) /*диаметр окружности эвольвенты d_versh=d_del+2*mn /*диаметр вершин R_EV=d_ev/2 /*радиус окружности эвольвенты s=mn*pi/2 /*толщ. зуба по делительной окружн-радиан t1=mt*180/d_del /*толщ. Зуба по делит. окружн. в градусах Символы размеров и соответствующие параметры шестерни (Символы d34, d33, d36 . . . . . . . d106 при повторном создании модели могут не совпадать) d34 = d_versh /* диаметр вершин d33 = B /*ширина венца шестерни d36 = d_vpad /*диаметр впадин шестерни d37 = d_ev /*диаметр окружности эвольвенты d38 = d_del /* делительный диаметр шестерни p68=Z /*идентификатор массива равный числу зубьев d84=0.3*B /*глубина полости для вытягивания полотна (толщина полотна В-0,3*В*2) d85 = 0.85*d_vpad /*наибольший диаметр полотна d86 = 0.4*d_vpad /* наименьший диаметр полотна d93 = 0.12*d_vpad /*радиус вала d95 = 3*mn /*ширина паза для шпонки d94 = 3*mn/2 /*глубина паза для шпонки d104=(d85+d86)/2 /*диаметр окружности центров отверстий в полотне d106=(d85-d86)*0.8/2 /*диаметр отверстий в полотне