没有合适的资源?快使用搜索试试~ 我知道了~
自己编的多重插补算法,可能对大家有用
1星 需积分: 50 58 下载量 183 浏览量
2011-12-11
15:24:19
上传
评论 5
收藏 1KB TXT 举报
温馨提示
试读
3页
多学习多重插补的人有很大的帮助,参考网上的资料,自己编的。
资源推荐
资源详情
资源评论
Xe = input('输入终点横坐标 X\nXe = ');
Ye = input('输入终点纵坐标 Y\nYe = ');
h = input('输入步长\nh = ');
Tstep= (abs(Xe)+abs(Ye))/h;
Step=0;
F=0;
Xi=0;
Yi=0;
x = 0;
y = 0;
if(Xe>0&Ye>0) Xi=Xi+h; x = [x Xi]; y = [y Yi];
end
if(Xe<0&Ye>0) Yi=Yi+h; x = [x Xi]; y = [y Yi];
end
if(Xe<0&Ye<0) Xi=Xi-h; x = [x Xi]; y = [y Yi];
end
if(Xe>0&Ye<0) Yi=Yi-h; x = [x Xi]; y = [y Yi];
end
Step=1;
while (Step<Tstep)
if(Xi>0&Yi>=0) Dir = 1;
end
if(Xi<=0&Yi>0) Dir = 2;
end
if(Xi<0&Yi<=0) Dir = 3;
end
if(Xi>=0&Yi<0) Dir = 4;
end
F=Xe*Yi-Xi*Ye;
if(Dir==1)
Ye = input('输入终点纵坐标 Y\nYe = ');
h = input('输入步长\nh = ');
Tstep= (abs(Xe)+abs(Ye))/h;
Step=0;
F=0;
Xi=0;
Yi=0;
x = 0;
y = 0;
if(Xe>0&Ye>0) Xi=Xi+h; x = [x Xi]; y = [y Yi];
end
if(Xe<0&Ye>0) Yi=Yi+h; x = [x Xi]; y = [y Yi];
end
if(Xe<0&Ye<0) Xi=Xi-h; x = [x Xi]; y = [y Yi];
end
if(Xe>0&Ye<0) Yi=Yi-h; x = [x Xi]; y = [y Yi];
end
Step=1;
while (Step<Tstep)
if(Xi>0&Yi>=0) Dir = 1;
end
if(Xi<=0&Yi>0) Dir = 2;
end
if(Xi<0&Yi<=0) Dir = 3;
end
if(Xi>=0&Yi<0) Dir = 4;
end
F=Xe*Yi-Xi*Ye;
if(Dir==1)
资源评论
- qq_173016872019-05-06真的很垃圾
d344543670
- 粉丝: 0
- 资源: 1
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
最新资源
- 常用工具配置docker,elasticsearch,minio,nfs,nginx,tippercane,vsftp
- 基于IIC接口E2PROM(AT24C64)芯片FPGA读写VERILOG 设计源码+仿真激励文件.zip
- 基于FPGA深度学习的Block 模块方案实战,适合FPGA初学者
- 20225T9050袁凤(1).py
- Rsa算法详解.docx
- Youren Shang InClassQuiz.ipynb
- code-qat.zip
- usb-serial-for-android
- drools决策表示例Excel文件
- AD5724芯片FPGA Verilog驱动源码+4通道12bit位宽的DAC芯片AD5724技术手册.zip
资源上传下载、课程学习等过程中有任何疑问或建议,欢迎提出宝贵意见哦~我们会及时处理!
点击此处反馈
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功