Eng-Tips is the largest engineering community on the Internet

Intelligent Work Forums for Engineering Professionals

Congratulations waross on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

an exemple: creating ellipse surface

Thread starter bobof77
Start date Oct 22, 2004

Status: Not open for further replies.

Oct 22, 2004

bobof77

Mechanical

FINISH
/CLear
/PREP7
A1 = 10
B1 = 20
CSYS,1
K,1,A1,
K,2,A1,45,
K,3,A1,90,
K,4,0,0,B1
L,1,2
L,2,3
par1_= B1/A1
LOCAL,11,1,0,0,0,,90,,par1_
L,1,4
LOCAL,11,1,0,0,0,45,90,,par1_
L,2,4
LOCAL,11,1,0,0,0,90,90,,par1_
L,3,4
AL,1,3,4
AL,2,4,5
/pnum,area,1
APLOT,all