!Vernetzung
!Aufgabe von TanjaF8
finish
/clear
*abbr,tanjaf8,/input,tanjaf8,txt
!alle Maße in µm
berx=100  !Bereich in x
bery=80   !Bereich in y
dick=2    !Dicke
rad=0.2   !Rundungs-Radius
nw=0.2    !Netz-Weite
/prep7
et,1,plane121
mp,perx,1,1
!------Geometrie-----
rectng,-berx/2,berx/2,-bery/2,bery/2
rectng,0,berx/2,-dick/2,dick/2
asba,1,2
adele,3
lplot
!----Kantenverrundung----
lfillt,7,8,rad   !L2
lfillt,5,8,rad   !L6
!--------------------
al,all
!-------Vernetzung------
lesize,2,nw
lesize,6,nw
!L3: oben  L1:unten
lesize,1,nw*20
lesize,3,nw*20
!---Kreis als Vernetzungshilfe----
pcirc,dick*2
aovlap,all
adele,3
!A4: Kreis  A5: Bereich
esize,nw*2
amesh,4
esize,nw*20
amesh,5