当前位置:首页 >> 建筑/土木 >>

复化辛普森正反算一体化程序


复化辛普森正反算一体化程序.txt FX5800计算器的复化辛普森程序(正反算、全线路、新线路)终极版 FHXPSzhu(主程序) "1.ZS,2.FS" ?→Q 输入1正算,输入2反算 “NEW=0,OLD ≠0”?Z:If Z=0:Then “X0=”?A:“Y0=”?B:“C0=”?C:“1/R0=”?D:“1/RI=”?E:“SP=”?F:“EP= ”

?G:Ifend:Q=2=>Goto 2 Lbl 1 :“KM=,<0 STOP”?H:H<0=>STOP:“PJ=”?O:“PY=”?L Lbl Z:Z=1=> Prog“01”:Z=2=> Prog“02” :Fix 3 H- F→M:(E-D)/( G-F)*M→N:C+(N+2 D)M*90/π→P:P<0=>P+360→P A+M(cos(C)+4∑cos(C+7.5*(2K+1)M((2K+1)N/12 +2D)/π),K,0,5)+2∑(cos(C+15KM(KN/6+2D)/π) ,K,1,5)+cos(P))/36+Lcos(P+O)→X B+M(sin(C)+4∑sin(C+7.5*(2K+1)M((2K+1)N/12 +2D)/π),K,0,5)+2∑(sin(C+15KM(KN/6+2D)/π) ,K,1,5)+sin(P))/36+Lsin(P+O)→Y Q=2=>Goto 4 "X=":X◢ "Y=":Y◢ “FWJ=”:P?DMS◢ Norm 2:Goto 1 Lbl 2:“XD=,<0,STOP”?R:R<0=>STOP:“YD=”?S “KMDG=”?H :90→O:0→L:Goto Z (H线路范围内的任意桩号) Lbl 4:Pol(R-X,S-Y):J<0 => J+360→J While abs(Icos(J-P))≤0.001:P-J>180=> J+360→J: P-J<-180=> P+360→P:IF P-J>0:then -I→L:else I→L ifend Goto 3: Whileend:H+Icos(J-P)→H:Goto Z Lbl 3:Fix 3 “ZHUANGHAO”:H◢ “JULI”:L◢ Norm 2:Goto 2 01(数据库子程序) If H<=第一曲线终点桩号:then 第一曲线起点X→A:第一曲线起点Y→B:第一曲线起点方位角→C:起点曲率→D:终 点曲率→E:起点桩号→F:终点桩号→G:return:ifend …………… 程序说明: 1、 该程序可以计算任意线形(直线、圆曲线、缓和曲线、不完整曲线)任意桩号的坐标(正算,输入1),也可根据坐 标计算该点到线路的距离及垂足桩号(反算,输入2); 2、 (NEW=0,OLD≠0)?如果要计算的点为数据库线路中的点,则输入数据库编号(以整数1、2、3…代替输入);如 果在数据库中没有要计算线路的数据,则输入0,并按提示输入曲线要素(X0:曲线起点X坐标,Y0:曲线起点Y坐标, C0:曲线起点方位角,1/R0:曲线起点曲率,直线为0,1/RI:曲线终点曲率,直线为0,SP:曲线起点桩号,EP:曲线终点 桩号),KM为待求点桩号,PJ为待求点与线路的偏角(正交输入90,斜交输入实际角度),“PY”为偏中距离,线路上 的点输入0,右偏输入+值,左偏输入-值; 3、 正算显示坐标及切线方位角;反算输入线路的任意桩号(此桩号越接近真实值计算速度越快)、待求点坐标,显示 待求点桩号及偏中距离; 4、 正算子程序为复化辛普森公式编写而成,此时线元段数N取6,已经可以满足精度要求;反算子程序为角度趋近的方 法编写,计算速度有点慢。 www.cegong.com 深度测工 欢迎您的访问与支持!!!

第 1 页

Create PDF files without this message by purchasing novaPDF printer (http://www.novapdf.com)


相关文章:
5800线元正反算程序复化辛普森公式
5800线元正反算程序复化辛普森公式_建筑/土木_工程科技_专业资料。精简5800,全线路坐标正反算程序FX5800 复化辛普森程序(正反算、全线路、新线路) WH 主程序 "1...
Fx5800复化辛普森万能程序
Fx5800复化辛普森万能程序_建筑/土木_工程科技_专业资料。Fx5800 复化辛普森万能程序(正反算一体化) ? ? ? 复制地址 转载 分享 城里外乡人 2010 年 08 月 ...
复化辛普森公式应用
复化辛普森公式应用_建筑/土木_工程科技_专业资料。测量学习资料。...用辛卜生公式计算坐标的精度可由人为或程序自行判断, 其计算结果完全能保证坐标...
复化梯形公式,辛普森公式的matlab程序
复化梯形公式与辛普森公式的 matlab 程序程序代码】 cclc; disp('1.复化梯形公式求解'); disp('2.simpson 公式求解'); disp('请进行选择:'); c=input(...
正反算程序
公路曲线及匝道多线路正、 反算综合程序(四)(增补 公路曲线及匝道多线路正、 ...(四 ⑴有关资料 采用复化辛普森公式: 采用复化辛普森公式: X=XA+H / 6(...
复化辛普森公式
运用辛普森算法进行计算 实验设备及 二 、实验设备及实验环境 电脑,Windows-Xp,Microsoft Visual C++ 实验原理 三、实验原理 应用复化辛普森公式进行实验 四、程序源...
复化辛普森公式和高斯求积公式方法计算积分,matlab程序
复化辛普森公式和高斯求积公式方法计算积分,matlab程序_数学_自然科学_专业资料。复化辛普森公式和高斯求积公式方法计算积分,熟悉matlab的操作。...
复化辛普森求积公式
(i-1) %计算节点 X(i)=x(i)+0.5*h %计算节点中点 yn=eval(subs(f,...Sn=h/6*(-y(1)+4*S2(i+1)+2*S1(i+1)+yn) %复化辛普森求积公式 ...
数值分析实验报告模板-复化辛普森公式-高斯公式
? 1 0 x ln xdx 2.利用高斯求积公式计算积分: 1 1、 0 x ln xdx dx 2、 四、实验步骤(或记录) : 1、程序实现(源程序) 利用复化辛普森公式计算积分 ...
能用的复化梯形公式和复化辛普森公式
能用的复化梯形公式和复化辛普森公式_数学_自然科学_专业资料。%Compound trapezoid formula 复化梯形法 function y = traint(a,b,n,f) h = (b - a) /...
更多相关标签:
辛普森公式matlab程序 | 辛普森案 程序正义 | 辛普森杀妻案程序法 | 程序正义 辛普森 | 辛普森案与程序正义 | 复化辛普森积分的程序 | 高斯投影正反算程序 | 5800坐标正反算程序 |