牛头刨床机构运动分析

  • 格式:docx
  • 大小:278.42 KB
  • 文档页数:7

下载文档原格式

  / 9
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

牛头刨床机构运动分析

程序编写:

#include

#include

#define PI 3.1415926

void main()

{

double a=0.115,b=0.630,c=0.170,d=0.300,e=0.620,f=3.5;

double B,C,E,F,G,I,L,M,O,P,Q;

double x=0;

printf(" @1 @3 @4 Se W3 W4 Ve A3 A4 Ae S3 S33 \n");

while(x<6.3)

{

B=atan((d+a*sin(x))/(a*cos(x)));

if(B<0)B=PI+B;

C=PI-asin((e-b*sin(B))/c);

if(C<0)C=PI+C;

E=b*cos(B)+c*cos(C);

F=(a*f*(a+d*sin(x)))/(d*d+a*a+2*d*a*sin(x));

G=-(F*b*cos(B))/(c*cos(C));

I=-(F*b*sin(B-C))/cos(C);

L=((d*d-a*a)*d*a*f*f*cos(x))/((d*d+a*a+2*d*a*sin(x))*(d*d+a*a+

2*d*a*sin(x)));

M=(F*F*b*sin(B)+G*G*c*sin(C)-L*b*cos(B))/(c*cos(C));

O=-(L*b*sin(B-C)+F*F*b*cos(B-C)-G*G*c)/cos(C);

P=a*cos(x)/cos(B);

Q=-f*a*sin(x-B);

printf("%3.0f %3.3f %3.3f %3.3f %3.3f %3.3f %3.3f %3.3f %3.3f %3.3f %3.3f %3.3f\n",x*180/PI,(B *180)/PI,(C*180)/PI,E,F,G,I,L,M,O,P,Q);

x=x+PI*2/180;

}

}

计算结果