OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
hm_option_count.F
Go to the documentation of this file.
1Copyright> OpenRadioss
2Copyright> Copyright (C) 1986-2025 Altair Engineering Inc.
3Copyright>
4Copyright> This program is free software: you can redistribute it and/or modify
5Copyright> it under the terms of the GNU Affero General Public License as published by
6Copyright> the Free Software Foundation, either version 3 of the License, or
7Copyright> (at your option) any later version.
8Copyright>
9Copyright> This program is distributed in the hope that it will be useful,
10Copyright> but WITHOUT ANY WARRANTY; without even the implied warranty of
11Copyright> MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12Copyright> GNU Affero General Public License for more details.
13Copyright>
14Copyright> You should have received a copy of the GNU Affero General Public License
15Copyright> along with this program. If not, see <https://www.gnu.org/licenses/>.
16Copyright>
17Copyright>
18Copyright> Commercial Alternative: Altair Radioss Software
19Copyright>
20Copyright> As an alternative to this open-source version, Altair also offers Altair Radioss
21Copyright> software under a commercial license. Contact Altair to discuss further if the
22Copyright> commercial version may interest you: https://www.altair.com/radioss/.
23!||====================================================================
24!|| hm_option_count ../starter/source/devtools/hm_reader/hm_option_count.F
25!||--- called by ------------------------------------------------------
26!|| contrl ../starter/source/starter/contrl.F
27!|| hm_convert_2d_elements_seatbelt ../starter/source/devtools/hm_reader/hm_convert_2d_elements_seatbelt.F
28!|| hm_convert_fail_tab ../starter/source/devtools/hm_reader/hm_convert_fail_tab.F
29!|| hm_convert_inter_type19 ../starter/source/devtools/hm_reader/hm_convert_inter_type19.F
30!|| hm_count_2d_element_seatbelt ../starter/source/devtools/hm_reader/hm_count_2d_element_seatbelt.F
31!|| hm_debug_print_option ../starter/source/devtools/hm_reader/hm_debug_print_option.F
32!|| hm_get_max_id ../starter/source/devtools/hm_reader/hm_get_max_id.F
33!|| hm_messages ../starter/source/devtools/hm_reader/hm_messages.F
34!|| hm_preread_bem ../starter/source/loads/bem/hm_read_bem.F
35!|| hm_preread_impacc ../starter/source/constraints/general/impvel/hm_preread_impacc.F
36!|| hm_preread_impdisp ../starter/source/constraints/general/impvel/hm_preread_impdisp.F
37!|| hm_preread_impvel ../starter/source/constraints/general/impvel/hm_preread_impvel.F
38!|| hm_preread_impvel0 ../starter/source/constraints/general/impvel/hm_preread_impvel0.F
39!|| hm_read_ale_grid ../starter/source/general_controls/ale_grid/hm_read_ale_grid.F
40!|| hm_read_ale_muscl ../starter/source/general_controls/ale_cfd/hm_read_ale_muscl.F
41!|| hm_read_ale_solver ../starter/source/general_controls/ale_cfd/hm_read_ale_solver.F
42!|| hm_read_analy ../starter/source/general_controls/computation/hm_read_analy.F
43!|| hm_read_bem ../starter/source/loads/bem/hm_read_bem.F
44!|| hm_read_box ../starter/source/model/box/hm_read_box.F
45!|| hm_read_caa ../starter/source/general_controls/computation/hm_read_caa.F
46!|| hm_read_checksum ../starter/source/output/checksum/checksum_option.F90
47!|| hm_read_defshell ../starter/source/general_controls/default_values/hm_read_defshell.F
48!|| hm_read_defsolid ../starter/source/general_controls/default_values/hm_read_defsolid.F
49!|| hm_read_eos ../starter/source/materials/eos/hm_read_eos.F
50!|| hm_read_fail ../starter/source/materials/fail/hm_read_fail.f
51!|| hm_read_funct ../starter/source/tools/curve/hm_read_funct.F
52!|| hm_read_funct_python ../starter/source/tools/curve/hm_read_funct_python.F90
53!|| hm_read_gauge ../starter/source/output/gauge/hm_read_gauge.F
54!|| hm_read_impacc ../starter/source/constraints/general/impvel/hm_read_impacc.F
55!|| hm_read_implicit ../starter/source/general_controls/computation/hm_read_implicit.F
56!|| hm_read_impvel ../starter/source/constraints/general/impvel/hm_read_impvel.f
57!|| hm_read_inista ../starter/source/initial_conditions/inista/hm_read_inista.F
58!|| hm_read_inistate_d00 ../starter/source/elements/initia/hm_read_inistate_d00.F
59!|| hm_read_inivel ../starter/source/initial_conditions/general/inivel/hm_read_inivel.F
60!|| hm_read_intsub ../starter/source/output/subinterface/hm_read_intsub.F
61!|| hm_read_ioflag ../starter/source/general_controls/inputoutput/hm_read_ioflag.F
62!|| hm_read_lagmul ../starter/source/tools/lagmul/hm_read_lagmul.f
63!|| hm_read_leak ../starter/source/airbag/hm_read_leak.F
64!|| hm_read_move_funct ../starter/source/tools/curve/hm_read_move_funct.f
65!|| hm_read_nonlocal ../starter/source/materials/nonlocal/hm_read_nonlocal.F
66!|| hm_read_pcyl ../starter/source/loads/general/load_pcyl/hm_read_pcyl.F
67!|| hm_read_perturb ../starter/source/general_controls/computation/hm_read_perturb.F
68!|| hm_read_perturb_fail ../starter/source/general_controls/computation/hm_read_perturb_fail.F
69!|| hm_read_prethgrou ../starter/source/output/th/hm_read_prethgrou.F
70!|| hm_read_refsta ../starter/source/loads/reference_state/refsta/hm_read_refsta.F
71!|| hm_read_sensors ../starter/source/tools/sensor/hm_read_sensors.F
72!|| hm_read_sms ../starter/source/general_controls/computation/hm_read_sms.F
73!|| hm_read_sphcel ../starter/source/elements/reader/hm_read_sphcel.F
74!|| hm_read_sphglo ../starter/source/general_controls/computation/hm_read_sphglo.F
75!|| hm_read_spmd ../starter/source/general_controls/computation/hm_read_spmd.F
76!|| hm_read_submodel ../starter/source/model/assembling/hm_read_submodel.F
77!|| hm_read_table1 ../starter/source/tools/curve/hm_read_table.F
78!|| hm_read_table2 ../starter/source/tools/curve/hm_read_table.F
79!|| hm_read_therm ../starter/source/materials/therm/hm_read_therm.F
80!|| hm_read_therm_stress ../starter/source/materials/therm/hm_read_therm_stress.F90
81!|| hm_read_thgrou ../starter/source/output/th/hm_read_thgrou.F
82!|| hm_read_unit ../starter/source/general_controls/computation/hm_read_unit.f
83!|| hm_read_upwind ../starter/source/general_controls/computation/hm_read_upwind.F
84!|| hm_read_visc ../starter/source/materials/visc/hm_read_visc.F
85!|| hm_yctrl ../starter/source/elements/initia/hm_yctrl.F
86!|| lecfill ../starter/source/elements/initia/lecfill.F
87!|| lecsubmod ../starter/source/model/submodel/lecsubmod.f
88!|| lectrans ../starter/source/model/transformation/lectrans.F
89!|| lectranssub ../starter/source/model/submodel/lectranssub.F
90!|| lectur ../starter/source/starter/lectur.F
91!|| nbfunct ../starter/source/tools/curve/nbfunc.F
92!|| nbsph ../starter/source/elements/sph/nbsph.f
93!|| r2r_prelec ../starter/source/coupling/rad2rad/r2r_prelec.F
94!|| read_ale_mat ../starter/source/materials/ale/read_ale_mat.f
95!|| read_detonators ../starter/source/initial_conditions/detonation/read_detonators.f
96!|| read_engine_driver ../starter/source/general_controls/engine/read_engine_driver.F
97!|| read_euler_mat ../starter/source/materials/ale/read_euler_mat.F
98!|| read_rwall ../starter/source/constraints/general/rwall/read_rwall.F
99!||--- calls -----------------------------------------------------
100!||--- uses -----------------------------------------------------
101!|| message_mod ../starter/share/message_module/message_mod.F
102!|| submodel_mod ../starter/share/modules1/submodel_mod.F
103!||====================================================================
104 SUBROUTINE hm_option_count(ENTITY_TYPE, HM_OPTION_NUMBER)
105C-----------------------------------------------
106C ROUTINE DESCRIPTION :
107C ===================
108C COUNT NUMBER OF /ENTITY_TYPE KEYWORDS USING HM_READER
109C-----------------------------------------------
110C DUMMY ARGUMENTS DESCRIPTION:
111C ===================
112C
113C NAME DESCRIPTION
114C
115C ENTITY_TYPE KEYWORD YOU WANT TO FIND NUMBER OF OCCURRENCES
116C 'MATERIAL'
117C 'PROPERTY'
118C 'PART'
119C 'TRANSFORM'
120C 'SUBSET'
121C 'SENSOR'
122C 'INTER'
123C 'RWALL'
124C 'FAILURE'
125C 'DAMP'
126C 'GAUGE'
127C 'RBODY'
128C 'ACCEL'
129C 'BCS'
130C 'AIRBAG'
131C 'FRICTION'
132C 'UNIT'
133C ...........
134C HM_OPTION_NUMBER NUMBER OF OCCURRENCES
135C============================================================================
136C M o d u l e s
137C-----------------------------------------------
138 USE message_mod
139 USE submodel_mod
140C-----------------------------------------------
141C I m p l i c i t T y p e s
142C-----------------------------------------------
143#include "implicit_f.inc"
144C-----------------------------------------------
145C D u m m y A r g u m e n t s
146C-----------------------------------------------
147C INPUT ARGUMENTS
148 CHARACTER*(*),INTENT(IN)::ENTITY_TYPE
149C OUTPUT ARGUMENTS
150 INTEGER,INTENT(OUT)::HM_OPTION_NUMBER
151C-----------------------------------------------
152 CALL cpp_option_count(entity_type(1:len_trim(entity_type)),len_trim(entity_type),hm_option_number)
153 RETURN
154C
155 END
hm_option_count
subroutine hm_option_count(entity_type, hm_option_number)
Definition hm_option_count.F:105
hm_read_fail
subroutine hm_read_fail(mat_param, nummat, maxfail, fail_tag, ntable, table, failwave, nloc_dmg, unitab, lsubmodel)
Definition hm_read_fail.F:92
hm_read_impvel
subroutine hm_read_impvel(fbfvel, ibfvel, ikine, ikine1lag, itab, itabm1, igrnod, x0, ixr, ipart, ipartr, iskn, nom_opt, nimpdisp, nimpvel, unitab, lsubmodel)
Definition hm_read_impvel.F:45
hm_read_lagmul
subroutine hm_read_lagmul(lsubmodel)
Definition hm_read_lagmul.F:39
hm_read_move_funct
subroutine hm_read_move_funct(npc, pld, nfunct, table, ntable, funcrypt, unitab, lsubmodel)
Definition hm_read_move_funct.F:38
hm_read_unit
subroutine hm_read_unit(unitab, lsubmodel)
Definition hm_read_unit.F:46
lecsubmod
subroutine lecsubmod(isubmod, x, unitab, itabm1, rtrans, itab, lsubmodel, is_dyna, iskwn, liskn, skew, lskew, siskwn, sskew)
Definition lecsubmod.F:45
message_mod
Definition message_mod.F:1257
submodel_mod
Definition submodel_mod.F:717
nbsph
subroutine nbsph(lsubmodel)
Definition nbsph.F:39
read_ale_mat
subroutine read_ale_mat(lsubmodel, unitab, ipm, pm)
Definition read_ale_mat.F:39
read_detonators
subroutine read_detonators(itabm1, itab, igrnod, pm, ipm, x, unitab, lsubmodel, detonators)
Definition read_detonators.F:47
starter
program starter
Definition starter.F:39