OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
titre3.F File Reference
#include "implicit_f.inc"
#include "titr_c.inc"

Go to the source code of this file.

Functions/Subroutines

subroutine titre3

Function/Subroutine Documentation

◆ titre3()

subroutine titre3

Definition at line 28 of file titre3.F.

29C------------------------------------
30C NOEUDS => LECTURE DES ELEMENTS
31C CAS IFORM8=2
32C------------------------------------
33C-----------------------------------------------
34C I m p l i c i t T y p e s
35C-----------------------------------------------
36#include "implicit_f.inc"
37C-----------------------------------------------
38C C o m m o n B l o c k s
39C-----------------------------------------------
40#include "titr_c.inc"
41C-----------------------------------------------
42C L o c a l V a r i a b l e s
43C-----------------------------------------------
44 titre(12)=' .. NODES'
45 titre(13)=' .. BOUNDARY CONDITIONS'
46 titre(14)=' .. SKEW SYSTEMS '
47 titre(15)=' .. 3D SOLID ELEMENTS'
48 titre(16)=' .. 2D SOLID ELEMENTS'
49 titre(17)=' .. 3D SHELL ELEMENTS'
50 titre(18)=' .. 3d truss elements'
51 TITRE(19)=' .. 3d beam elements'
52 TITRE(20)=' .. 3d spring elements'
53 TITRE(21)=' .. 3d triangular shell elements'
54 TITRE(22)=' .. 3d isogeometric solid elements'
55 TITRE(23)=' .. 2d triangular solid elements'
56C
57 TITRE(29)=' .. ale links '
58 TITRE(30)=' .. ale/the tables '
59 TITRE(31)=' .. properties '
60 TITRE(32)=' .. time functions '
61 TITRE(33)=' .. concentrated loads'
62 TITRE(34)=' .. pressure loads'
63 TITRE(35)=' .. initial velocities'
64 TITRE(36)=' .. detonators'
65 TITRE(37)=' .. element groups'
66 TITRE(38)=' .. interfaces '
67 titre(39)=' .. RIGID WALLS'
68 titre(40)=' .. RIGID WALLS ALE'
69 titre(41)=' .. RIGID BODIES'
70 titre(42)=' .. RIGID LINKS TO MADYMO'
71 titre(43)=' .. ADDED MASSES'
72 titre(44)=' .. IMPOSED VELOCITIES '
73 titre(45)=' .. ELEMENT BUFFER INITIALIZATION'
74 titre(46)=' .. GEOMETRY PLOT FILE '
75 titre(47)=' .. RESTART FILE '
76 titre(48)=' .. ERROR ==> NO RESTART FILE '
77 titre(49)=' .. LASER IMPACT'
78C
79 titre(50)=' .. PARALLEL RESTART FILES GENERATION'
80C
81 titre(51)=' .. FLEXIBLE BODIES'
82C
83 titre(52)=' .. EIGENVECTORS CALCULATION'
84 titre(53)=' ----> INITIAL MAPPING'
85 titre(54)=' .. MAPPING DATA'
86 titre(55)=' ----> DETONATION WAVE SHADOW'
87 titre(68)=' .. INTERFACE BUFFER INITIALIZATION'
88 titre(69)=' .. ELEMENTARY BOUNDARY CONDITIONS'
89 titre(70)=' NODAL POINT COORDINATES '
90 titre(71)=' ----------------------- '
91 titre(72)(1:37)=' NODE X-ORD '
92 titre(72)(38:77)=' Y-ORD Z-ORD '
93 titre(72)(78:89)=' '
94C
95C
96 titre(73)=' NODAL POINT SELECTION '
97 titre(74)=' --------------------- '
98 titre(75)(1:7) =' NODE '
99 titre(75)(8:50)=' IS GREATER THAN NUMNOD '
100C
101 titre(80)=' BOUNDARY CONDITIONS'
102 titre(81)=' -------------------'
103 titre(82)=
104 .' NODE TRANS. ROTAT. GRID LAGRA. SKEW '
105 titre(83)=' -WARNING BOUNDARY CONDITION NODE NUMBER'
106 titre(84)(1:7)=' NODE '
107 titre(84)(8:25)=' SKEW SYSTEM '
108 titre(85)=' SKEW SYSTEM SETS '
109 titre(87)=' NODAL POINT SKEW FRAME '
110 titre(206)(1:36)=' ELEMENTS WITH NEGATIVE MAL. NUMBER'
111 titre(206)(37:66)=' ARE WALL NEIGHBOURS ELEMENTS '
112C
113 titre(206)(67:89)=' '
114 titre(90)=' EIGHT NODE BRICK ELEMENTS'
115 titre(91)=' -------------------------'
116C
117 titre(92)(1:33)=' ELEMENT INTERNAL MATER PRSET'
118 titre(92)(34:66)=' NODE1 NODE2 NODE3 NODE4'
119 titre(93)=' NODE5 NODE6 NODE7 NODE8'
120C
121 titre(94)=' 8-NODE ELEMENT SELECTION'
122 titre(95)=' ------------------------'
123C
124 titre(100)=' TWO DIMENSIONAL ELEMENTS '
125 titre(101)=' ------------------------'
126C '----+----1----+----2----+----3----+----4----+----5----+----6----+-'
127 titre(102)=' ELEMENT INTERNAL MATER PRSET'//
128 . ' NODE1 NODE2 NODE3 NODE4 '
129C
130 titre(103)=' 4-NODE ELEMENT SELECTION'
131 titre(104)=' ------------------------'
132 titre(105)=' ANGLE THICKNESS'
133C
134 titre(110)=' SHELL ELEMENTS '
135 titre(111)=' -------------- '
136 titre(112)=' SHELL ELEMENT SELECTION'
137 titre(113)=' -----------------------'
138C
139 titre(114)=' MERGE NODES '
140 titre(115)=' --------------------------------------'
141 titre(116)=' CNODES MERGED TO NODES '
142 titre(117)=' .. CNODES'
143
144 titre(118)=' SUBMODEL SKEWS(INTERNAL) '
145 titre(119)=' --------------------------------------'
146 titre(207)=' MERGE CNODES '
147 titre(208)=' CNODES MERGED TO CNODES '
148 titre(209)=' CNODES TRANSFORMED TO NODES'
149 titre(210)=' CNODES'
150 RETURN
end diagonal values have been computed in the(sparse) matrix id.SOL