fini
/clear
/prep7

!*******************	!Geometrieparameter
dd=6			!Drahtdurchmesser


!***************************	!Modellierung
K,1,0,0,0

k,900,0,0,-5
k,950,0,5,0

cskp,11,1,1,900,950


k,2,dd/2,0,0		!Außenkreis
k,3,dd/2,90,0
larc,2,3,1,dd/2

lesize,all,,,1000

cskp,12,0,1,900,950

l,1,2
l,1,3


n,4,			!Knoten für Vernetzung
n,50,dd/2
fill,,,,,,,,0.00001

cskp,12,0,1,950,900

n,51,
n,97,dd/2
fill,,,,,,,,0.00001

al,1,2,3

ET,2,200,6		!Mesh200

amesh,all