本科毕业设计，用fortran编程，用传递矩阵法计算航空发动机转子临界转速。

传递矩阵法是转子动力学中计算临界转速及其他动力特性参数的最常用的方法，该文档详细描述了该方法的原理和matlab编程实现该方法的过程

[例3.6]某对称离散信道的信道转移概率矩阵P为： 1/3 1/3 1/6 1/6 1/6 1/6 1/3 1/3 计算其最佳信源概率和信道容量C。 附：程序代码如下： #include #include #define MAX 50 double Calculate_a(int k,double pa[]); double Calculate_C1(double pa[],double a[]); double Calculate_C2(double a[]); int r,s; double pba[MAX][MAX]; void main() { int i,j; double C1,C2,E; double a[MAX],pa[MAX]; E=0.000001; printf("请输入信源符号个数r:\n"); scanf("%d",&r); printf("请输入信宿符号个数s:\n"); scanf("%d",&s); printf("请输入精确度E:\n"); scanf("%lf",&E); printf("请输入信源P[ai]:\n"); for(i=0;i

2009-01-13 00:00:00 19KB 离散信道 转移概率矩阵 信道传递矩阵 最佳信源概率

1