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
lesize,1,0.01,,,,,,,1

cskp,12,0,1,900,950

l,1,2
l,1,3

lesize,2,0.1,,,1/100,,,,1
lesize,3,0.1,,,1/100,,,,1

!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