finish



/clear,start
Eb=38800			! E-Modul Beton [N/mm˛] *

fys=500 			! Streckgrenze Stahl [N/mm˛] *



/prep7			!Preprocessing starten*



csys,0			!Normales kartesisches Koodrinatensystem*



/pnum,kp,1		!Keypoints/Nummern anzeigen*



/pnum,line,1		!Linien anzeigen*



/pnum,area,0		!Flaechen anzeigen*


querz = 1		!nur gerade
quers =	15*querz

lz = 10
ls = 7*lz


! define keypoints		K,number,x,y,z

!Stahlleiste

K,1,0,0,0			!Grundflaeche Auflager
k,2,0,0,2
K,3,0,30,0
K,4,0,30,2

K,5,10,0,0			!Auflager Ende
K,7,10,30,0



			!Anfang erster Zahn

K,13,50,14,2
K,14,50,14,12
K,15,50,16,12
K,16,50,16,2




!ende erster Zahn

K,21,75,14,2
K,22,75,14,12
K,23,75,16,12
K,24,75,16,2




!Anfang zweiter Zahn

K,29,125,14,2
K,30,125,14,12
K,31,125,16,12
K,32,125,16,2

!Ende zweiter Zahn

K,37,150,14,2
K,38,150,14,12
K,39,150,16,12
K,40,150,16,2


K,41,175,0,0			!Grundflaeche Symmetrieachse
k,42,175,0,2
K,43,175,30,0
K,44,175,30,2



L,1,2	!1
L,1,3	!2
L,2,4	!3
L,3,4	!4


L,5,7	!5
L,3,43	!6
L,4,44	!7
L,1,41	!8
L,2,42	!9

L,43,44	!10
L,44,42	!11
L,43,41	!12
L,42,41	!13

!Zahn 1

L,13,16	!14
L,24,21	!15
L,23,22	!16
L,15,14	!17
L,16,15	!18
L,14,13	!19
L,24,23	!20
L,22,21	!21
L,16,24	!22
L,15,23	!23
L,14,22	!24
L,13,21	!25

!Zahn 2

L,32,29	!26
L,40,37	!27
L,31,30	!28
L,39,38	!29
L,32,31	!30
L,29,30	!31
L,40,39	!32
L,38,37	!33
L,32,40	!34
L,29,37	!35
L,31,39	!36
L,30,38	!37


LESIZE,15,,,querz,,,,,1,
LESIZE,16,,,querz,,,,,1,
LESIZE,14,,,querz,,,,,1,
LESIZE,17,,,querz,,,,,1,

LESIZE,27,,,querz,,,,,1,
LESIZE,26,,,querz,,,,,1,
LESIZE,28,,,querz,,,,,1,
LESIZE,29,,,querz,,,,,1,

LESIZE,11,,,quers,,,,,1,
LESIZE,12,,,quers,,,,,1,
LESIZE,2,,,quers,,,,,1,
LESIZE,3,,,quers,,,,,1,

LESIZE,6,,,ls,,,,,1,
LESIZE,7,,,ls,,,,,1,
LESIZE,8,,,ls,,,,,1,
LESIZE,9,,,ls,,,,,1,


LESIZE,22,,,lz,,,,,1,
LESIZE,23,,,lz,,,,,1,
LESIZE,24,,,lz,,,,,1,
LESIZE,25,,,lz,,,,,1,

LESIZE,34,,,lz,,,,,1,
LESIZE,35,,,lz,,,,,1,
LESIZE,36,,,lz,,,,,1,
LESIZE,37,,,lz,,,,,1,

LESIZE,18,,,2,,,,,1,
LESIZE,21,,,2,,,,,1,

LESIZE,30,,,2,,,,,1,
LESIZE,33,,,2,,,,,1,


 


!Areas Stahl erstellen



!Unten

A,3,4,2,1	!1
A,44,43,41,42	!2
A,3,4,44,43	!3
A,2,1,41,42	!4
A,4,2,42,44	!5 	!Kontakt
A,3,1,41,43	!6

!Zahn 1

A,16,13,14,15	!7	!Kontakt
A,24,21,22,23	!8	!Kontakt
A,16,13,21,24	!9	!kein
A,14,15,23,22	!10	!Kontakt
A,16,24,23,15	!11	!Kontakt
A,14,13,21,22	!12	!Kontakt


!Zahn 2

A,32,29,37,40	!13	!kein
A,31,30,38,39	!14	!Kontakt
A,40,37,38,39	!15	!Kontakt
A,32,29,30,31	!16	!Kontakt
A,32,40,39,31	!17	!Kontakt
A,29,37,38,30	!18	!Kontakt


!Beton

K,45,50,0,2
K,46,50,30,2


K,47,75,0,2
K,48,75,30,2


K,49,125,0,2
K,50,125,30,2

K,51,150,0,2
K,52,150,30,2

K,53,0,0,52
K,54,0,30,52

K,55,50,0,52
K,56,50,30,52

K,57,75,0,52
K,58,75,30,52

K,59,125,0,52
K,60,125,30,52

K,61,150,0,52
K,62,150,30,52

K,63,175,0,52
K,64,175,30,52

!Verbundmittel oben

K,65,50,16,52
K,66,50,14,52

K,67,75,16,52
K,68,75,14,52

K,69,125,16,52
K,70,125,14,52

K,71,150,16,52
K,72,150,14,52

K,73,50,14,12	!Leiste beton Oben
K,74,50,16,12

K,75,75,14,12
K,76,75,16,12

K,77,125,14,12
K,78,125,16,12

K,79,150,14,12
K,80,150,16,12


L,54,53	!38
L,54,56	!39
L,53,55	!40
L,56,55	!41
L,56,58	!42
L,55,57	!43
L,57,58	!44
L,58,60	!45
L,60,59	!46
L,60,62	!47
L,59,61	!48
L,61,62	!49
L,62,64	!50
L,61,63	!51
L,64,63	!52
L,57,59 !53
L,64,44	!54
L,63,42	!55
L,54,4	!56
L,53,2	!57

!Beton auf Stahlleiste

L,2,45	!58
L,4,46	!59
L,46,16	!60
L,45,13	!61

L,46,48	!62
L,45,47	!63
L,47,21	!64
L,48,24	!65

L,48,50	!66
L,47,49	!67
L,49,29	!68
L,50,32	!69

L,51,37	!70
L,40,52	!71

L,62,52	!72
L,60,50	!73
L,58,48	!74
L,56,46	!75
L,55,45	!76
L,57,47	!77
L,59,49	!78
L,61,51	!79
L,51,42	!80
L,52,44	!81
L,58,67	!82
L,65,56	!83
L,55,66	!84
L,57,68	!85
L,60,69	!86
L,62,71	!87
L,70,59	!88
L,72,61	!89
L,67,68	!90
L,65,66	!91
L,65,67	!92
L,65,74	!93
L,66,73	!94
L,67,76 !95
L,68,75 !96

L,69,78 !97
L,70,77 !98
L,71,80	!99
L,72,79 !100
L,69,71	!101
L,70,72	!102
L,50,52 !103
L,49,51	!104


LESIZE,56,,,20,,,,,1,
LESIZE,57,,,20,,,,,1,
LESIZE,75,,,20,,,,,1,
LESIZE,76,,,20,,,,,1,

LESIZE,77,,,20,,,,,1,
LESIZE,74,,,20,,,,,1,
LESIZE,73,,,20,,,,,1,
LESIZE,78,,,20,,,,,1,


LESIZE,54,,,20,,,,,1,
LESIZE,55,,,20,,,,,1,
LESIZE,72,,,20,,,,,1,
LESIZE,79,,,20,,,,,1,

LESIZE,80,,,10,,,,,1,
LESIZE,81,,,10,,,,,1,
LESIZE,59,,,10,,,,,1,
LESIZE,51,,,10,,,,,1,
LESIZE,50,,,10,,,,,1,

LESIZE,58,,,20,,,,,1,
LESIZE,40,,,20,,,,,1,

LESIZE,45,,,20,,,,,1,
LESIZE,53,,,20,,,,,1,

LESIZE,46,,,10,,,,,1,
LESIZE,44,,,10,,,,,1,


LESIZE,10,,,1,,,,,1,
LESIZE,1,,,1,,,,,1,
LESIZE,13,,,1,,,,,1,
LESIZE,82,,,7,,,,,1,
LESIZE,83,,,7,,,,,1,
LESIZE,84,,,7,,,,,1,
LESIZE,85,,,7,,,,,1,
LESIZE,86,,,7,,,,,1,
LESIZE,87,,,7,,,,,1,
LESIZE,88,,,7,,,,,1,
LESIZE,89,,,7,,,,,1,

LESIZE,90,,,1,,,,,1,
LESIZE,91,,,1,,,,,1,
LESIZE,42,,,5,,,,,1,
LESIZE,62,,,5,,,,,1,
LESIZE,22,,,10,,,,,1,
LESIZE,92,,,10,,,,,1,
LESIZE,25,,,10,,,,,1,

LESIZE,42,,,5,,,,,1,
LESIZE,43,,,5,,,,,1,
LESIZE,47,,,5,,,,,1,
LESIZE,48,,,5,,,,,1,

LESIZE,34,,,5,,,,,1,
LESIZE,35,,,5,,,,,1,

LESIZE,93,,,16,,,,,1,
LESIZE,94,,,16,,,,,1,
LESIZE,95,,,16,,,,,1,
LESIZE,96,,,16,,,,,1,

LESIZE,97,,,16,,,,,1,
LESIZE,98,,,16,,,,,1,
LESIZE,99,,,16,,,,,1,
LESIZE,100,,,16,,,,,1,

LESIZE,46,,,15,,,,,1,
LESIZE,44,,,15,,,,,1,
LESIZE,101,,,10,,,,,1,
LESIZE,102,,,10,,,,,1,
LESIZE,103,,,10,,,,,1,
LESIZE,104,,,10,,,,,1,




!Areas beton

!Betonkloetze zwischen

A,52,51,42,44	!19	!Kontakt
A,64,63,42,44	!20
A,62,61,63,64	!21
A,62,61,51,52	!22	!Kontakt
A,62,64,44,52	!23
A,61,63,42,51	!24

A,54,53,55,56	!25
A,54,53,2,4	!26
A,56,55,45,46	!27	!kontakt
A,4,46,45,2	!28 	!Kontakt
A,54,4,46,56	!29
A,53,55,45,2	!30

A,58,57,59,60	!31	
A,60,59,49,50	!32	!Kontakt
A,50,49,47,48	!33	!Kontakt
A,48,47,57,58	!34	!Kontakt
A,58,60,50,48	!35
A,57,59,49,47	!36

!betonkloetze neben leiste

A,16,24,67,65	!37	!Kontakt
A,16,46,56,65	!38
A,24,48,58,67	!39
A,46,48,58,56	!40
A,46,48,24,16	!41	!Kontakt
A,56,58,67,65	!42

A,13,21,68,66	!43	!Kontakt
A,13,45,55,66	!44
A,21,47,57,68	!45
A,45,47,57,55	!46
A,13,21,47,45	!47	!Kontakt
A,68,57,55,66	!48

A,32,50,60,69	!49
A,40,52,62,71	!50
A,32,40,71,69	!51	!Kontakt
A,50,52,62,60	!52
A,50,52,40,32	!53	!Kontakt
A,60,62,71,69	!54


A,37,29,70,72	!55	!Kontakt
A,37,51,61,72	!56
A,29,49,59,70	!57
A,51,49,59,61	!58
A,37,51,49,29	!59	!Kontakt
A,72,61,59,70	!60

!Area zaehne oben

A,73,74,76,75	!61	!Kontakt
A,65,66,68,67	!62
A,74,76,67,65	!63
A,73,75,68,66	!64
A,76,75,68,67	!65
A,74,73,66,65	!66

A,77,78,80,79	!67	!Kontakt
A,78,80,71,69	!68
A,69,71,72,70	!69
A,80,79,72,71	!70
A,79,77,70,72	!71
A,77,78,69,70	!72

!Volumen Stahl

VA,1,2,3,4,5,6
VA,7,8,9,10,11,12
VA,13,14,15,16,17,18

!Volumen Beton

VA,19,20,21,22,23,24
VA,25,26,27,28,29,30
VA,31,32,33,34,35,36

VA,37,38,39,40,41,42
VA,43,44,45,46,47,48
VA,49,50,51,52,53,54
VA,55,56,57,58,59,60

VA,61,62,63,64,65,66
VA,67,68,69,70,71,72

!Elemente definieren	

ET,1,SOLID185, 

ET,3,CONTA174,

ET,2,TARGE170,  


                  



! Element Solid 185 


KEYOPT,1,2,0,

KEYOPT,1,3,0,

KEYOPT,1,6,0,

KEYOPT,1,10,0,



! Material Stahl *



MPTEMP,,,,,,,,

MPTEMP,1,0,

MPDATA,EX,1,,210000,         ! E-Modul [N/mm˛] 

MPDATA,PRXY,1,,0.3,          ! Querkontraktion 



! Material Beton *



MPTEMP,,,,,,,,  

MPTEMP,1,0,

MPDATA,EX,2,,Eb,             ! E-Modul [N/mm˛]

MPDATA,PRXY,2,,0.2,          ! Querkontraktion 




!Daten den Volumen zuweisen


VSEL,s,volu,,1,,
VSEL,a,volu,,2,,
VSEL,a,volu,,3,,

VATT,1,,1,0,                 ! Verbindet Elementeigenschaften mit den ausgewaehlten Volumen 

ALLSEL

VSEL,s,volu,,4,,
VSEL,a,volu,,5,,
VSEL,a,volu,,6,,
VSEL,a,volu,,7,,
VSEL,a,volu,,8,,
VSEL,a,volu,,9,,
VSEL,a,volu,,10,,
VSEL,a,volu,,11,,
VSEL,a,volu,,12,,
VATT,2,,1,0,                 ! Verbindet Elementeigenschaften mit den ausgewaehlten Volumen 

ALLSEL



VMESH,all


ALLSEL




!stahl weise ich die targe

KEYOPT,3,9,0,

R,3,

RMORE,

RMORE,,0

RMORE,0
mp,mu,3,0,

asel,s,area,,5,
!asel,a,area,,7,
!asel,a,area,,8,
!asel,a,area,,10,
!asel,a,area,,11,
!asel,a,area,,12,
!asel,a,area,,14,
!asel,a,area,,15,
!asel,a,area,,16,
!asel,a,area,,17,
!asel,a,area,,18,




NSLA,s,1,		!Nimmt die Nodes in der Area

ESLN,s,0,		!Nimmt die Elements an den Nodes

TYPE,2,			!Weist den Elementen ein (Kontakt)Element zu

REAL,3,			!Weist den Elementen Real constand zu

MAT,3,			!Weist Element Material attribute pointer

ESURF,			!command generates elements of the currently active element type overlaid on the free faces of existing elements.

ALLSEL

asel,s,area,,19,
!asel,a,area,,22,
!asel,a,area,,27,
asel,a,area,,28,
!asel,a,area,,32,
asel,a,area,,33,
!asel,a,area,,34,
!asel,a,area,,37,
asel,a,area,,41,
!asel,a,area,,43,
asel,a,area,,47,
!asel,a,area,,51,
asel,a,area,,53,
!asel,a,area,,55,
asel,a,area,,59,
!asel,a,area,,61,
!asel,a,area,,67,



NSLA,s,1,

ESLN,s,0,

TYPE,3,

REAL,3,

MAT,3,

ESURF,

ALLSEL