Reynolds 方程压力与润滑膜厚-good to Greg

本程序可以用于雷诺方程计算承载力和润滑膜厚，得到力的分布图像和膜厚的分布图像

  for i=1:N+1                                                      %            
            H（i）=H0+XP（i）^2/2;        %膜厚公式前部分                  %
            DH=0;                                                        %
            for j=2:N+1                                                  %
                DL（j-1）=XP（j）-XP（j-1）;                                   %
                if（i==j||i==j-1）
                    aa=XP（i）;
                    bb=XP（j）+0.1*DL（j-1）;
                    if aa==bb
                        CIJ（ij）=（-0.5/3.14）*DL（j-1）*log（0.01）; %#ok
                    else            
                        CIJ（ij）=（-0.5/3.14）*DL（j-1）*log（（aa-bb）^2）;          
                    end
                else                                                     %
                    CIJ（ij）=（-0.5/3.14）*DL（j-1）*log（（XP（i）-XP（j））^2）;     %                    
                end                                                      %
                DH=DH+CIJ（ij）*P（j）;    %膜厚公式后部分δ（X）             %
            end                                                          %
            H（i）=H（i）+DH;               %膜厚　　                        %
        end                                                              %  

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2017-07-13 16:18  Reynolds 方程压力与润滑膜厚-good to Greg\
     文件        1297  2011-04-07 00:04  Reynolds 方程压力与润滑膜厚-good to Greg\film_thick.asv
     文件        1297  2011-04-07 00:07  Reynolds 方程压力与润滑膜厚-good to Greg\film_thick.m
     文件        1316  2011-10-11 18:13  Reynolds 方程压力与润滑膜厚-good to Greg\film_thick1.m
     文件        1138  2011-04-08 06:26  Reynolds 方程压力与润滑膜厚-good to Greg\initialization.asv
     文件        1177  2011-04-08 06:30  Reynolds 方程压力与润滑膜厚-good to Greg\initialization.m
     文件        2026  2011-10-11 18:15  Reynolds 方程压力与润滑膜厚-good to Greg\main.m
     文件        2675  2006-07-01 19:27  Reynolds 方程压力与润滑膜厚-good to Greg\matrix_element.m
     文件        4274  2011-04-07 05:49  Reynolds 方程压力与润滑膜厚-good to Greg\matrix_final.asv
     文件        4300  2011-04-08 01:13  Reynolds 方程压力与润滑膜厚-good to Greg\matrix_final.m