iCAx开思网

标题: GRIP [打印本页]

作者: caress124 时间: 2009-3-3 20:16
标题: GRIP
本帖最后由 caress124 于 2009-3-10 13:03 编辑

在GRIP里用什么函数（或方法）去分析R角的大小？
最好有个完整的代码供参考。。。。谢谢

作者: look_tfq 时间: 2009-3-3 20:48
entity/srf,pt(2)
number/pmt(20),u,v,MiniR
data/u,0,v,0,MiniR,0

mask/71
S1:
ident/'Pick a surface',srf,cursor,x,y,z,rsp
jump/S1:,end:,,,rsp
$$sparf/srf,x,y,z,u,v

pmt=spropf(srf,0,0)
MiniR=pmt(19)

do/Uend:,u,0,1,0.01
do/Vend:,v,0,1,0.01

pmt=spropf(srf,u,v)
if/absf(pmt(19))<miniR,MiniR=absf(pmt(19))
$$print/pmt(19)

Vend:
Uend:

messg/'MiniR='+fstrl(MiniR)

end:
halt

作者: look_tfq 时间: 2009-3-3 20:50
这个是分析曲面上选定点最小R

作者: look_tfq 时间: 2009-3-3 20:51
可以是规则弧面或不规则曲面

作者: look_tfq 时间: 2009-3-3 20:52
曲线分析要简单的多了，自己参考一下书上都有的

作者: procamcae 时间: 2009-3-5 20:21
跟楼主沾光了，哈哈。高手，多多指点~~

作者: caress124 时间: 2009-3-10 13:02
呵呵，谢谢解答

作者: LIUCHANGLIN 时间: 2009-3-21 21:25
好像2楼的朋友做出来的分析有误差!!!

作者: caress124 时间: 2009-3-24 16:30

look_tfq 发表于 2009-3-3 20:48
entity/srf,pt(2)
number/pmt(20),u,v,MiniR
data/u,0,v,0,MiniR,0

mask/71
S1:
ident/'Pick a surface',srf,cursor,x,y,z,rsp
jump/S1:,end:,,,rsp
$$sparf/srf,x,y,z,u,v

pmt=spropf(srf,0,0)
Mini ...

作者: ACAIGG 时间: 2010-9-2 20:50
学习学习!!!

作者: caress124 时间: 2010-9-11 10:27
呵呵，谢谢大家

作者: qq421266066 时间: 2011-8-22 14:41
entity/srf,pt(2)
number/pmt(20),u,v,MiniR
data/u,0,v,0,MiniR,0

mask/71
S1:
ident/'Pick a surface',srf,cursor,x,y,z,rsp
jump/S1:,end:,,,rsp
$$sparf/srf,x,y,z,u,v

pmt=spropf(srf,0,0)
MiniR=pmt(19)

do/Uend:,u,0,1,0.01
do/Vend:,v,0,1,0.01

pmt=spropf(srf,u,v)
if/absf(pmt(19))<miniR,MiniR=absf(pmt(19))
$$print/pmt(19)

Vend:
Uend:

messg/'MiniR='+fstrl(MiniR)

end:
halt

欢迎光临 iCAx开思网 (https://www.icax.org/)