OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
tri7box.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!|| tri7box ../engine/share/modules/tri7box.F
25!||--- called by ------------------------------------------------------
26!|| assparxx ../engine/source/assembly/assparxx.F
27!|| check_fi ../engine/source/mpi/interfaces/spmd_i25slide.F
28!|| cp_ifront ../engine/source/implicit/produt_v.F
29!|| deallocate_fi1_tmp ../engine/source/mpi/interfaces/spmd_i25slide.F
30!|| frictionparts_model_ortho ../engine/source/interfaces/int07/frictionparts_model.F
31!|| i10corp3 ../engine/source/interfaces/int10/i10corp3.F
32!|| i10for3 ../engine/source/interfaces/int10/i10for3.F
33!|| i10optcd ../engine/source/interfaces/intsort/i10optcd.F
34!|| i10sms2 ../engine/source/interfaces/int10/i10sms2.F
35!|| i10tri ../engine/source/interfaces/intsort/i10tri.F
36!|| i11ass0 ../engine/source/interfaces/int11/i11ass3.F
37!|| i11ass05 ../engine/source/interfaces/int11/i11ass3.F
38!|| i11ass2 ../engine/source/interfaces/int11/i11ass3.F
39!|| i11ass25 ../engine/source/interfaces/int11/i11ass3.F
40!|| i11ass3 ../engine/source/interfaces/int11/i11ass3.F
41!|| i11buce_vox ../engine/source/interfaces/intsort/i11buce.F
42!|| i11cor3 ../engine/source/interfaces/int11/i11cor3.F
43!|| i11corp3 ../engine/source/interfaces/int11/i11corp3.F
44!|| i11for3 ../engine/source/interfaces/int11/i11for3.F
45!|| i11keg3 ../engine/source/interfaces/int11/i11keg3.F
46!|| i11kfor3 ../engine/source/interfaces/int11/i11keg3.F
47!|| i11main_tri ../engine/source/interfaces/intsort/i11main_tri.F
48!|| i11optcd ../engine/source/interfaces/intsort/i11optcd.F
49!|| i11pen3 ../engine/source/interfaces/intsort/i11pen3.F
50!|| i11pen3_vox ../engine/source/interfaces/intsort/i11pen3.F
51!|| i11sms2 ../engine/source/interfaces/int11/i11sms2.F
52!|| i11sto ../engine/source/interfaces/intsort/i11sto.F
53!|| i11sto_vox ../engine/source/interfaces/intsort/i11sto.F
54!|| i11trc ../engine/source/interfaces/intsort/i11trc.F
55!|| i11tri ../engine/source/interfaces/intsort/i11tri.F
56!|| i11trivox ../engine/source/interfaces/intsort/i11trivox.F
57!|| i17cut ../engine/source/interfaces/int17/i17tri.F
58!|| i17for3 ../engine/source/interfaces/int17/i17for3.F
59!|| i17lll4_pena ../engine/source/interfaces/int17/i17for3.F
60!|| i17vit_pena ../engine/source/interfaces/int17/i17for3.F
61!|| i18dst3 ../engine/source/interfaces/int18/i18dst3.F
62!|| i18for3 ../engine/source/interfaces/int18/i18for3.F
63!|| i18kine_f ../engine/source/interfaces/int18/i18main_kine.F
64!|| i18kine_i ../engine/source/interfaces/int18/i18main_kine.F
65!|| i18kine_s ../engine/source/interfaces/int18/i18main_kine.F
66!|| i18kine_v ../engine/source/interfaces/int18/i18main_kine.F
67!|| i18main_kine_1 ../engine/source/interfaces/int18/i18main_kine.F
68!|| i18main_kine_2 ../engine/source/interfaces/int18/i18main_kine.F
69!|| i18tri ../engine/source/interfaces/int18/i18tri.F
70!|| i20ass0 ../engine/source/interfaces/int20/i20for3.F
71!|| i20ass05 ../engine/source/interfaces/int20/i20for3.F
72!|| i20ass2 ../engine/source/interfaces/int20/i20for3.F
73!|| i20ass25 ../engine/source/interfaces/int20/i20for3.F
74!|| i20cor3 ../engine/source/interfaces/int20/i20cor3.F
75!|| i20cor3e ../engine/source/interfaces/int20/i20cor3.F
76!|| i20cor3t ../engine/source/interfaces/int20/i20cor3t.F
77!|| i20for3 ../engine/source/interfaces/int20/i20for3.F
78!|| i20for3c ../engine/source/interfaces/int20/i20for3.F
79!|| i20for3e ../engine/source/interfaces/int20/i20for3.F
80!|| i20optcd ../engine/source/interfaces/intsort/i20optcd.F
81!|| i20optcde ../engine/source/interfaces/intsort/i20optcd.F
82!|| i20pen3_edge ../engine/source/interfaces/intsort/i20sto.F
83!|| i20sms2e ../engine/source/interfaces/int20/i20sms2.F
84!|| i20sto ../engine/source/interfaces/intsort/i20sto.F
85!|| i20tri ../engine/source/interfaces/intsort/i20tri.F
86!|| i20tri_edge ../engine/source/interfaces/intsort/i20tri.F
87!|| i20xsinir ../engine/source/interfaces/intsort/i20main_tri.F
88!|| i21ass3 ../engine/source/interfaces/int21/i21ass3.F
89!|| i21buce ../engine/source/interfaces/intsort/i21buce.F
90!|| i21cor3 ../engine/source/interfaces/int21/i21cor3.F
91!|| i21sms2 ../engine/source/interfaces/int21/i21sms2.F
92!|| i22ass0 ../engine/source/interfaces/int22/i22assembly.F
93!|| i22ass2 ../engine/source/interfaces/int22/i22assembly.F
94!|| i22buce ../engine/source/interfaces/intsort/i22buce.F
95!|| i22cor3 ../engine/source/interfaces/int22/i22cor3.F
96!|| i22main_tri ../engine/source/interfaces/intsort/i22main_tri.F
97!|| i22shell_getminmax ../engine/source/interfaces/intsort/i22main_tri.F
98!|| i23buce ../engine/source/interfaces/intsort/i23buce.F
99!|| i23cor3 ../engine/source/interfaces/int23/i23cor3.F
100!|| i23cor3t ../engine/source/interfaces/int23/i23cor3t.F
101!|| i23for3 ../engine/source/interfaces/int23/i23for3.F
102!|| i23main_tri ../engine/source/interfaces/intsort/i23main_tri.F
103!|| i23optcd ../engine/source/interfaces/int23/i23optcd.F
104!|| i23trivox ../engine/source/interfaces/intsort/i23trivox.F
105!|| i24_save_sub ../engine/source/interfaces/int24/i24_save_sub.F
106!|| i24ass0 ../engine/source/interfaces/int24/i24for3.F
107!|| i24ass2 ../engine/source/interfaces/int24/i24for3.F
108!|| i24buce ../engine/source/interfaces/intsort/i24buce.F
109!|| i24cor3 ../engine/source/interfaces/int24/i24cor3.F
110!|| i24cor3t ../engine/source/interfaces/intsort/i24cor3t.F
111!|| i24cork3 ../engine/source/interfaces/int24/i24cork3.F
112!|| i24corkm ../engine/source/interfaces/int24/i24cork3.F
113!|| i24corp3 ../engine/source/interfaces/int24/i24cork3.F
114!|| i24dst3 ../engine/source/interfaces/int24/i24dst3.F
115!|| i24dst3e ../engine/source/interfaces/int24/i24dst3e.F
116!|| i24edgt ../engine/source/interfaces/intsort/i24sto.F
117!|| i24for1_fic ../engine/source/interfaces/int24/i24for3e.F
118!|| i24for1_ficr ../engine/source/interfaces/int24/i24for3e.F
119!|| i24for3 ../engine/source/interfaces/int24/i24for3.F
120!|| i24gap_pxfem ../engine/source/interfaces/int24/i24gap_pxfem.F
121!|| i24iply_pxfem ../engine/source/interfaces/int24/i24iply_pxfem.F
122!|| i24ispt2_ini ../engine/source/interfaces/int24/i24cor3.F
123!|| i24ispt2_ini_opttri ../engine/source/interfaces/int24/i24cor3.F
124!|| i24keg3 ../engine/source/interfaces/int24/i24ke3.F
125!|| i24main_tri ../engine/source/interfaces/intsort/i24main_tri.F
126!|| i24nexttria ../engine/source/interfaces/int24/i24dst3.F
127!|| i24nexttria2 ../engine/source/interfaces/int24/i24dst3.F
128!|| i24nitschfor3 ../engine/source/interfaces/int24/i24nitschfor3.F
129!|| i24optcd ../engine/source/interfaces/intsort/i24optcd.F
130!|| i24s1s2 ../engine/source/interfaces/intsort/i24sto.F
131!|| i24sms2 ../engine/source/interfaces/int24/i24for3.F
132!|| i24sto ../engine/source/interfaces/intsort/i24sto.F
133!|| i24trc ../engine/source/interfaces/intsort/i7trc.F
134!|| i24trivox ../engine/source/interfaces/intsort/i24trivox.F
135!|| i25ass0 ../engine/source/interfaces/int25/i25ass3.F
136!|| i25ass2 ../engine/source/interfaces/int25/i25ass3.F
137!|| i25ass3 ../engine/source/interfaces/int25/i25ass3.F
138!|| i25asse0 ../engine/source/interfaces/int25/i25asse.F
139!|| i25asse05 ../engine/source/interfaces/int25/i25asse.F
140!|| i25asse05_e2s ../engine/source/interfaces/int25/i25ass_e2s.F
141!|| i25asse0_e2s ../engine/source/interfaces/int25/i25ass_e2s.F
142!|| i25asse2 ../engine/source/interfaces/int25/i25asse.F
143!|| i25asse25 ../engine/source/interfaces/int25/i25asse.F
144!|| i25asse25_e2s ../engine/source/interfaces/int25/i25ass_e2s.F
145!|| i25asse2_e2s ../engine/source/interfaces/int25/i25ass_e2s.F
146!|| i25buce ../engine/source/interfaces/intsort/i25buce.F
147!|| i25buce_edg ../engine/source/interfaces/intsort/i25buce_edg.F
148!|| i25comp_1 ../engine/source/interfaces/int25/i25comp_1.F
149!|| i25comp_2 ../engine/source/interfaces/int25/i25comp_2.F
150!|| i25cor3_1 ../engine/source/interfaces/int25/i25cor3.F
151!|| i25cor3_21 ../engine/source/interfaces/int25/i25cor3.F
152!|| i25cor3_22 ../engine/source/interfaces/int25/i25cor3.F
153!|| i25cor3_3 ../engine/source/interfaces/int25/i25cor3.F
154!|| i25cor3_e2s ../engine/source/interfaces/int25/i25cor3_e2s.F
155!|| i25cor3e ../engine/source/interfaces/int25/i25cor3e.F
156!|| i25cor3t ../engine/source/interfaces/intsort/i25cor3t.F
157!|| i25dst3_1 ../engine/source/interfaces/int25/i25dst3_1.F
158!|| i25dst3_21 ../engine/source/interfaces/int25/i25dst3_21.F
159!|| i25dst3_22 ../engine/source/interfaces/int25/i25dst3_22.F
160!|| i25dst3_3 ../engine/source/interfaces/int25/i25dst3_3.F
161!|| i25for3 ../engine/source/interfaces/int25/i25for3.F
162!|| i25for3_e2s ../engine/source/interfaces/int25/i25for3_e2s.F
163!|| i25for3e ../engine/source/interfaces/int25/i25for3e.F
164!|| i25glob ../engine/source/interfaces/int25/i25dst3_1.F
165!|| i25glob_22 ../engine/source/interfaces/int25/i25dst3_22.F
166!|| i25irtlm ../engine/source/interfaces/int25/i25irtlm.F
167!|| i25keepf ../engine/source/interfaces/int25/i25slid.F
168!|| i25main_free ../engine/source/interfaces/intsort/i25main_free.F
169!|| i25main_opt_tri ../engine/source/interfaces/intsort/i25main_opt_tri.F
170!|| i25main_slid ../engine/source/interfaces/int25/i25main_slid.F
171!|| i25main_tri ../engine/source/interfaces/intsort/i25main_tri.F
172!|| i25maind_2 ../engine/source/interfaces/int25/i25maind_2.F
173!|| i25mainf ../engine/source/interfaces/int25/i25mainf.F
174!|| i25optcd ../engine/source/interfaces/intsort/i25optcd.F
175!|| i25optcd_e2s ../engine/source/interfaces/intsort/i25optcd_e2s.F
176!|| i25optcd_edg ../engine/source/interfaces/intsort/i25optcd_edg.F
177!|| i25pen3_e2s ../engine/source/interfaces/intsort/i25pen3_e2s.F
178!|| i25pen3_edg ../engine/source/interfaces/intsort/i25pen3_edg.F
179!|| i25prep_add ../engine/source/interfaces/int25/i25slid.F
180!|| i25prep_nindex ../engine/source/interfaces/int25/i25slid.F
181!|| i25prep_send ../engine/source/interfaces/int25/i25slid.F
182!|| i25prep_sizbufs ../engine/source/interfaces/int25/i25slid.F
183!|| i25prep_slid_1 ../engine/source/interfaces/int25/i25slid.F
184!|| i25prep_slid_2 ../engine/source/interfaces/int25/i25slid.F
185!|| i25s1s2 ../engine/source/interfaces/intsort/i25sto.F
186!|| i25sms0e ../engine/source/interfaces/int25/i25smse.F
187!|| i25sms2 ../engine/source/interfaces/int25/i25for3.F
188!|| i25sms2e ../engine/source/interfaces/int25/i25smse.F
189!|| i25sms_e2s ../engine/source/interfaces/int25/i25sms_e2s.F
190!|| i25sto ../engine/source/interfaces/intsort/i25sto.F
191!|| i25sto_e2s ../engine/source/interfaces/intsort/i25sto_e2s.F
192!|| i25sto_edg ../engine/source/interfaces/intsort/i25sto_edg.F
193!|| i25tagn ../engine/source/interfaces/int25/i25norm.F
194!|| i25trc_e2s ../engine/source/interfaces/intsort/i25trc_e2s.F
195!|| i25trc_edg ../engine/source/interfaces/intsort/i25trc_edg.F
196!|| i25trivox ../engine/source/interfaces/intsort/i25trivox.F
197!|| i25trivox_edg ../engine/source/interfaces/intsort/i25trivox_edg.F
198!|| i7ass0 ../engine/source/interfaces/int07/i7ass3.F
199!|| i7ass05 ../engine/source/interfaces/int07/i7ass3.F
200!|| i7ass2 ../engine/source/interfaces/int07/i7ass3.F
201!|| i7ass25 ../engine/source/interfaces/int07/i7ass3.F
202!|| i7ass33 ../engine/source/interfaces/int07/i7ass3.F
203!|| i7assigeo0 ../engine/source/interfaces/int07/i7ass3.F
204!|| i7buce ../engine/source/interfaces/intsort/i7buce.F
205!|| i7buce_vox ../engine/source/interfaces/intsort/i7buce.F
206!|| i7cor3 ../engine/source/interfaces/int07/i7cor3.F
207!|| i7cor3t ../engine/source/interfaces/int07/i7cor3t.F
208!|| i7cork3 ../engine/source/interfaces/int07/i7cork3.F
209!|| i7corp3 ../engine/source/interfaces/int07/i7cork3.F
210!|| i7for3 ../engine/source/interfaces/int07/i7for3.F
211!|| i7main_tri ../engine/source/interfaces/intsort/i7main_tri.F
212!|| i7optcd ../engine/source/interfaces/intsort/i7optcd.F
213!|| i7sms2 ../engine/source/interfaces/int07/i7sms2.F
214!|| i7trc ../engine/source/interfaces/intsort/i7trc.F
215!|| i7tri ../engine/source/interfaces/intsort/i7tri.F
216!|| i7trivox ../engine/source/interfaces/intsort/i7trivox.F
217!|| i_cor_epfit3 ../engine/source/interfaces/int24/i24cor3.F
218!|| i_corpfit3 ../engine/source/interfaces/int24/i24cor3.F
219!|| imp_fr7i ../engine/source/mpi/implicit/imp_fri.F
220!|| imp_stif24 ../engine/source/implicit/imp_solv.F
221!|| impl_sav ../engine/source/interfaces/int24/i24main.F
222!|| impl_sav0 ../engine/source/interfaces/int24/i24main.F
223!|| impl_sav1 ../engine/source/interfaces/int24/i24main.F
224!|| init_trim ../engine/source/interfaces/intsort/init_trim.F
225!|| int18_alloc ../engine/source/interfaces/int18/int18_alloc.F
226!|| int18_law151_omp_accumulation ../engine/source/interfaces/int18/int18_law151_omp_accumulation.F
227!|| intcrit ../engine/source/interfaces/intsort/intcrit.F
228!|| inter7_collision_detection ../engine/source/interfaces/intsort/inter7_collision_detection.F90
229!|| inter_prepare_sort ../engine/source/interfaces/generic/inter_prepare_sort.F
230!|| inter_sort_07 ../engine/source/interfaces/int07/inter_sort_07.F
231!|| intmass_update ../engine/source/interfaces/interf/intmass_update.F
232!|| inttri ../engine/source/interfaces/intsort/inttri.F
233!|| lech3d ../engine/source/output/h3d/h3d_build_fortran/lech3d.F
234!|| mpp_init ../engine/source/mpi/interfaces/spmd_i7tool.F
235!|| multi_i18_force_poff ../engine/source/interfaces/int18/multi_i18_force_poff.F
236!|| multi_i18_force_pon ../engine/source/interfaces/int18/multi_i18_force_pon.F
237!|| prelech3d ../engine/source/output/h3d/h3d_build_fortran/prelech3d.F90
238!|| print_stif ../engine/source/implicit/imp_solv.F
239!|| reallocate_fi1 ../engine/source/mpi/interfaces/spmd_i25slide.F
240!|| reallocate_fi2 ../engine/source/mpi/interfaces/spmd_i25slide.F
241!|| spbuc3 ../engine/source/elements/sph/spbuc3.F
242!|| sphtri0 ../engine/source/elements/sph/sphtri0.F
243!|| spmd_cell_exchange ../engine/source/mpi/generic/spmd_cell_exchange.F
244!|| spmd_cell_list_exchange ../engine/source/mpi/interfaces/spmd_cell_list_exchange.F
245!|| spmd_cell_size_exchange ../engine/source/mpi/interfaces/spmd_cell_size_exchange.F
246!|| spmd_cell_size_exchange_init ../engine/source/mpi/interfaces/spmd_cell_size_exchange_init.F
247!|| spmd_cell_size_post_rcv ../engine/source/mpi/interfaces/spmd_cell_size_post_rcv.F
248!|| spmd_check_tag ../engine/source/mpi/ams/spmd_check_tag.F
249!|| spmd_exch_efric ../engine/source/mpi/interfaces/spmd_exch_efric.F
250!|| spmd_exch_i24 ../engine/source/mpi/interfaces/spmd_exch_i24.F
251!|| spmd_exch_i25 ../engine/source/mpi/interfaces/spmd_exch_i25.F
252!|| spmd_exch_inter_18 ../engine/source/mpi/interfaces/spmd_exch_inter_18.F
253!|| spmd_exch_press ../engine/source/mpi/interfaces/spmd_exch_press.F
254!|| spmd_exch_smst2 ../engine/source/mpi/ams/spmd_exch_smst2.F
255!|| spmd_exch_sorting_efric ../engine/source/mpi/interfaces/spmd_exch_sorting_efric.F
256!|| spmd_get_penis ../engine/source/mpi/interfaces/send_cand.F
257!|| spmd_get_penis20 ../engine/source/mpi/interfaces/send_cand.F
258!|| spmd_get_stif ../engine/source/mpi/interfaces/send_cand.F
259!|| spmd_get_stif11 ../engine/source/mpi/interfaces/send_cand.F
260!|| spmd_get_stif20 ../engine/source/mpi/interfaces/send_cand.F
261!|| spmd_get_stif20e ../engine/source/mpi/interfaces/send_cand.F
262!|| spmd_get_stif25 ../engine/source/mpi/interfaces/send_cand.F
263!|| spmd_get_stif25_edg ../engine/source/mpi/interfaces/spmd_getstif25_edg.F
264!|| spmd_i17frots_pon ../engine/source/mpi/interfaces/spmd_i17frots_pon.F
265!|| spmd_i18kine_com_a ../engine/source/mpi/interfaces/spmd_i18kine_com_a.F
266!|| spmd_i18kine_com_acc ../engine/source/mpi/interfaces/spmd_i18kine_com_acc.F
267!|| spmd_i18kine_com_ms ../engine/source/mpi/interfaces/spmd_i18kine_com_ms.F
268!|| spmd_i18kine_com_v ../engine/source/mpi/interfaces/spmd_i18kine_com_v.F
269!|| spmd_i18kine_macc_com_poff ../engine/source/mpi/interfaces/spmd_i18kine_macc_com_poff.F
270!|| spmd_i18kine_msf_com_poff ../engine/source/mpi/interfaces/spmd_i18kine_msf_com_poff.F
271!|| spmd_i18kine_pene_com_poff ../engine/source/mpi/interfaces/spmd_i18kine_pene_com_poff.F
272!|| spmd_i20normf ../engine/source/mpi/interfaces/spmd_i20normf.F
273!|| spmd_i21fthecom ../engine/source/mpi/interfaces/send_cand.F
274!|| spmd_i24_prepare ../engine/source/interfaces/int24/i24_prepare.F
275!|| spmd_i25_prepare ../engine/source/interfaces/int25/i25_prepare.F
276!|| spmd_i25_slide_gat ../engine/source/mpi/interfaces/spmd_i25slide.F
277!|| spmd_i25front_init ../engine/source/mpi/interfaces/spmd_i25front.F
278!|| spmd_i25front_nor ../engine/source/mpi/interfaces/spmd_i25front.F
279!|| spmd_i7fcom_poff ../engine/source/mpi/forces/spmd_i7fcom_poff.F
280!|| spmd_i7fcom_pon ../engine/source/mpi/forces/spmd_i7fcom_pon.F
281!|| spmd_i7itied_cand ../engine/source/mpi/interfaces/spmd_i7itied_cand.F
282!|| spmd_i7xvcom2 ../engine/source/mpi/interfaces/spmd_i7xvcom2.F
283!|| spmd_ifront ../engine/source/mpi/interfaces/spmd_ifront.F
284!|| spmd_initfi ../engine/source/mpi/interfaces/spmd_i7tool.F
285!|| spmd_int18_law151_pon ../engine/source/mpi/forces/spmd_int18_law151_pon.F
286!|| spmd_oldnumcd ../engine/source/mpi/interfaces/spmd_i7tool.F
287!|| spmd_rnum25 ../engine/source/mpi/interfaces/spmd_i7tool.F
288!|| spmd_rnum25_edge ../engine/source/mpi/interfaces/spmd_rnum25_edge.F
289!|| spmd_rnumcd ../engine/source/mpi/interfaces/spmd_i7tool.F
290!|| spmd_rnumcd10 ../engine/source/mpi/interfaces/spmd_i7tool.F
291!|| spmd_rnumcd11 ../engine/source/mpi/interfaces/spmd_i7tool.F
292!|| spmd_rnumcd20 ../engine/source/mpi/interfaces/spmd_i7tool.F
293!|| spmd_savefi ../engine/source/mpi/interfaces/spmd_i7tool.F
294!|| spmd_sd_stfa20 ../engine/source/mpi/interfaces/send_cand.F
295!|| spmd_sd_stfn ../engine/source/mpi/interfaces/send_cand.F
296!|| spmd_sd_stfn11 ../engine/source/mpi/interfaces/send_cand.F
297!|| spmd_sd_stfn20e ../engine/source/mpi/interfaces/send_cand.F
298!|| spmd_sd_stfn25 ../engine/source/mpi/interfaces/send_cand.F
299!|| spmd_sphvox ../engine/source/mpi/sph/spmd_sphvox.F
300!|| spmd_sphvox0 ../engine/source/mpi/elements/spmd_sph.F
301!|| spmd_tri10box ../engine/source/mpi/interfaces/spmd_int.F
302!|| spmd_tri10gat ../engine/source/mpi/interfaces/spmd_int.F
303!|| spmd_tri11gat ../engine/source/mpi/interfaces/spmd_int.F
304!|| spmd_tri11vox ../engine/source/mpi/interfaces/spmd_int.F
305!|| spmd_tri11vox0 ../engine/source/mpi/interfaces/spmd_int.F
306!|| spmd_tri17box ../engine/source/mpi/interfaces/spmd_tri17box.F
307!|| spmd_tri17gat ../engine/source/mpi/interfaces/spmd_i7crit.F
308!|| spmd_tri18_151vox ../engine/source/mpi/interfaces/spmd_int.F
309!|| spmd_tri20box ../engine/source/mpi/interfaces/spmd_tri20box.F
310!|| spmd_tri20boxe ../engine/source/mpi/interfaces/spmd_tri20boxe.F
311!|| spmd_tri20gat ../engine/source/mpi/interfaces/spmd_i7crit.F
312!|| spmd_tri20gate ../engine/source/mpi/interfaces/spmd_i7crit.F
313!|| spmd_tri22vox ../engine/source/mpi/interfaces/spmd_tri22vox.F
314!|| spmd_tri22vox0 ../engine/source/mpi/interfaces/spmd_tri22vox0.F
315!|| spmd_tri23vox0 ../engine/source/mpi/interfaces/spmd_int.F
316!|| spmd_tri24gat ../engine/source/mpi/interfaces/spmd_int.F
317!|| spmd_tri24vox ../engine/source/mpi/interfaces/spmd_int.F
318!|| spmd_tri24vox0 ../engine/source/mpi/interfaces/spmd_int.F
319!|| spmd_tri25egat ../engine/source/mpi/interfaces/spmd_tri25egat.F
320!|| spmd_tri25gat ../engine/source/mpi/interfaces/spmd_tri25gat.F
321!|| spmd_tri25vox ../engine/source/mpi/interfaces/spmd_tri25vox.F
322!|| spmd_tri25vox0 ../engine/source/mpi/interfaces/spmd_tri25vox0.F
323!|| spmd_tri25vox0_edge ../engine/source/mpi/interfaces/spmd_tri25vox0.F
324!|| spmd_tri7gat ../engine/source/mpi/interfaces/spmd_int.F
325!|| spmd_tri7vox ../engine/source/mpi/interfaces/spmd_int.F
326!|| spmd_tri7vox0 ../engine/source/mpi/interfaces/spmd_int.F
327!|| spmd_tri7vox_optimized ../engine/source/mpi/interfaces/spmd_tri7vox_optimized.F
328!|| spmd_wait_nb ../engine/source/mpi/interfaces/spmd_wait_nb.F
329!|| sptrivox ../engine/source/elements/sph/sptrivox.F
330!|| update_struct_int21 ../engine/source/interfaces/int21/update_struct_int21.F
331!|| upgrade_rem_2ry ../engine/source/mpi/interfaces/spmd_i7tool.F
332!||--- uses -----------------------------------------------------
333!|| pointerdef ../engine/share/modules/pointerdef_mod.F
334!||====================================================================
335 MODULE tri7box
336 USE pointerdef
337#include "my_real.inc"
338 my_real, DIMENSION(:,:), ALLOCATABLE :: xrem
339 INTEGER, DIMENSION(:,:), ALLOCATABLE :: irem
340C Temporary table send remote for type 7, 10, 11 or 20 interface
341C Double precision declare for integer transfer
342C XREM(1) : X(1)
343C XREM(2) : X(2)
344C XREM(3) : X(3)
345C IREM(1) : num local
346C XREM(4) : V(1)
347C XREM(5) : V(2)
348C XREM(6) : V(3)
349C XREM(7) : MS
350C XREM(8) : STFN
351C IREM(2): ITAB
352C IREM(3): KINET
353C Xrem (9): gap_s (optional)
354C Temporary table send remote for type 11 interface
355C IREM(1) : num local
356C XREM(1) : X1(1)
357C XREM(2) : X1(2)
358C XREM(3) : X1(3)
359C XREM(4) : V1(1)
360C XREM(5) : V1(2)
361C XREM(6) : V1(3)
362C XREM(7) : MS1
363C IREM(2): ITAB1
364C XREM(8) : X2(1)
365C XREM(9) : X2(2)
366C XREM(10) : X2(3)
367C XREM(11) : V2(1)
368C XREM(12) : V2(2)
369C XREM(13) : V2(3)
370C XREM(14) : MS2
371C IREM(2): ITAB2
372C XREM(15) : STFS
373C IGAP>0
374C XREM (16): GAP_S (optional)
375C IGAP=3
376C XREM (17): gap_s_l (optional)
377C INACTI=5 or 6
378C XREM (18): PENIS (1) (optional)
379C XREM (19): PENIS (2) (optional)
380C IDTMINS=2
381C IREM(4): NODNX_SMS(1) (optionnel)
382C IREM (5): N1 (optional)
383C IREM(6): NODNX_SMS(2) (optionnel)
384C IREM (7): N2 (optional)
385C IREM(4): NODNX_SMS(1) (optionnel)
386C IDTMINS_INT/=0
387C IREM (4): N1 (optional)
388C IREM (5): N2 (optional)
389C Temporary table send remote for type 17 interface
390C XREM(1) : EMINXS(1)
391C XREM(2) : EMINXS(2)
392C XREM(3) : EMINXS(3)
393C XREM(4) : EMINXS(4)
394C XREM(5) : EMINXS(5)
395C XREM(6) : EMINXS(6)
396C XREM(7) : num local element
397C XREM(8) : XFI17(1,1)
398C XREM(9): XFI17(2,1)
399C XREM(10) :XFI17(3,1)
400C XREM(11) :VFI17(1,1)
401C XREM(12) :VFI17(2,1)
402C XREM(13) :VFI17(3,1)
403C XREM(14) :...
404C XREM(98) : XFI17(1,16)
405C XREM(99) : XFI17(2,16)
406C XREM(100): XFI17(3,16)
407C XREM(101) :VFI17(1,16)
408C XREM(102): VFI17(2,16)
409C XREM(103): VFI17(3,16)
410C XREM(104): FROTSFI(1)
411C XREM(105): FROTSFI(2)
412C XREM(106): FROTSFI(3)
413C XREM(107): FROTSFI(4)
414C XREM(108): FROTSFI(5)
415C XREM(109): FROTSFI(6)
416C XREM(110): FROTSFI(7)
417C XREM(111): KSFI(1)
418C XREM(112): KSFI(2)
419
420 LOGICAL, DIMENSION(:), ALLOCATABLE :: to_trim, first_test
421C Pointer in XREM to the beginning of interface 24 & 25 values
422C On utlise PANE_OLD
424
425 INTEGER, DIMENSION(:), ALLOCATABLE :: current_nodfi
426 INTEGER, DIMENSION(:), ALLOCATABLE :: current_fi_size
427
428C buffer envoi/reception forces interfaces
429C pointer array NSVFI of size NINTER
430C indicating nodes list Remote to receive "proc main"
431 TYPE(int_pointer), DIMENSION(:), ALLOCATABLE :: nsvfi
432
433C Proc main of the secnd node. Assumes that only the main processor sends
434C secnds nodes
435 TYPE(int_pointer), DIMENSION(:), ALLOCATABLE :: pmainfi
436
437C pointer array NSNFI of size NINTER
438C indicating for each interface type7 the number of secondary nodes in NSVFI
439C per processor
440 TYPE(int_pointer), DIMENSION(:), ALLOCATABLE ::
443C tableau i20 specifique (flag nodal)
444 . nbinflfi,
446C Table I20 Part Edge
448C arrays front interfaces for MS, STFN, STIFN
449 TYPE(real_pointer), DIMENSION(:), ALLOCATABLE ::
450 . msfi, stifi, stnfi, gapfi,vscfi, FTHEFI, ftheskyfi,
452 . condnskyfi,
453C Table I20 Part Edge
455 . diag_smsfie,
456C tableau I18 Kine
458C interface boundary arrays for X, V A or FSKY
459 TYPE(real_pointer2), DIMENSION(:), ALLOCATABLE ::
462C Table I20 Part Edge
463 . xfie, vfie, afie, fskyfie, PENFIE, penfiae, daancfie,
464C NITSCHE METHOD
465 . FORNEQSFI
466C Tables front interfaces 17 for
467 TYPE(real_pointer2), DIMENSION(:), ALLOCATABLE ::
469C Tables Frontieres Interfaces 17 for XFI17, VFI17, AFI17
470 TYPE(real_pointer3), DIMENSION(:), ALLOCATABLE ::
471 . xfi17, VFI17, afi17
472C Tables boundary interfaces 20 for DXANC, DVANC
473 TYPE(real_pointer2), DIMENSION(:), ALLOCATABLE ::
475C Boundary Tables Interfaces 20 for DAANC6
476 TYPE(r8_pointer3), DIMENSION(:), ALLOCATABLE ::
478C pointer array ISKYFI of size NINTER indicating for each interface
479C the list of remote nodes associated with a force in FSKYI
480 TYPE(int_pointer), DIMENSION(:), ALLOCATABLE :: iskyfi,
481C Table I20 Part Edge
482 . iskyfie
483C pointer array NSVSI of size NINTER
484C Saying the noded list Remote to send to the "Prof Second"
485 TYPE(int_pointer), DIMENSION(:), ALLOCATABLE :: nsvsi,
486C Table I20 Part Edge
487 . nsvsie
488C pointer array NSNSI of size NINTER
489C indicating for each interface type7, 10, 11 the number of secondary nodes in NSVSI
490C per processor
491 TYPE(int_pointer), DIMENSION(:), ALLOCATABLE :: nsnsi,
492C Table I20 Part Edge
493 . nsnsie
494C pointer array NISUBSFI of size NINTER
495C indicating for each interface type7, 10 the number of elements in LISUBSFI
496C per processor
497 TYPE(int_pointer), DIMENSION(:), ALLOCATABLE :: nisubsfi
498C pointer array LISUBSFI of size NINTER
499C indicating for each interface type7, 10, 24, 25 and for each remote node of this interface
500C the list of sub-interfaces
501 TYPE(int_pointer), DIMENSION(:), ALLOCATABLE :: lisubsfi
502C pointer array INFLG_SUBSFI of size NINTER
503C indicating for each interface type25 and for each remote node of this interface
504C belonging to S1, S2, or Grnod
505 TYPE(int_pointer), DIMENSION(:), ALLOCATABLE :: inflg_subsfi ,tagncontfi
506C pointer array ADDSUBSFI of size NINTER
507C indicating for each interface type7, 10, 24, 25, and for each remote node of this interface
508C Its departure address in lisubsfi and inflg_subsfi (Table dimensioning a nsnr + 1 (Remote node + 1)
509 TYPE(int_pointer), DIMENSION(:), ALLOCATABLE :: addsubsfi
510 TYPE(real_pointer2), DIMENSION(:), ALLOCATABLE :: fnconti, ftconti
511 TYPE(real_pointer), DIMENSION(:), ALLOCATABLE :: efricfi, efricgfi
512 INTEGER , DIMENSION(:), ALLOCATABLE :: nlskyfi, nlskyfie
513C Temporary array for VOXEL SORTING
514 INTEGER , DIMENSION(:), ALLOCATABLE :: next_nod
515 INTEGER , DIMENSION(:), ALLOCATABLE :: chain_elem,CHAIN_NEXT
516 INTEGER , DIMENSION(:), ALLOCATABLE :: chain_last
517 INTEGER , DIMENSION(:), ALLOCATABLE :: prev_remote_number
518 INTEGER lvoxel
519 parameter(lvoxel = 8000000)
520 INTEGER inivoxel, voxel1(lvoxel)
521 DATA inivoxel /1/
523C NB do not oversize 31
524 parameter(lrvoxel = 31)
525 parameter(lrvoxelp = 8192)
526C NB do not oversize PARASIZ
527 INTEGER crvoxel(0:LRVOXEL,0:lrvoxel,lrvoxelp)
528C
529C Flag array to tag if NSNFI was frozen into NSNFI_SAV - Case INACTI + TSTART
530 INTEGER , DIMENSION(:), ALLOCATABLE :: nsnfi_flag
531C Type 24 & 25 Interface
532 TYPE(int_pointer), DIMENSION(:), ALLOCATABLE :: icont_i_fi
533 TYPE(int_pointer2) , DIMENSION(:), ALLOCATABLE :: irtlm_fi
534C T24 E2E
535 TYPE(int_pointer2) , DIMENSION(:), ALLOCATABLE :: irtse_fi
536 TYPE(int_pointer2) , DIMENSION(:), ALLOCATABLE :: is2se_fi
537 TYPE(int_pointer) , DIMENSION(:), ALLOCATABLE :: is2pt_fi
538 TYPE(int_pointer) , DIMENSION(:), ALLOCATABLE :: ispt2_fi
539 TYPE(int_pointer) , DIMENSION(:), ALLOCATABLE :: isegpt_fi
540 TYPE(int_pointer) , DIMENSION(:), ALLOCATABLE :: isedge_fi
541
542 TYPE(real_pointer), DIMENSION(:), ALLOCATABLE :: time_sfi
543 TYPE(real_pointer2), DIMENSION(:), ALLOCATABLE :: secnd_frfi
544 TYPE(real_pointer2), DIMENSION(:), ALLOCATABLE :: pene_oldfi
545 TYPE(real_pointer2), DIMENSION(:), ALLOCATABLE :: stif_oldfi
546C Type 25 Interface
547 TYPE(int_pointer2) , DIMENSION(:), ALLOCATABLE :: islide_fi
548 TYPE(int_pointer) , DIMENSION(:), ALLOCATABLE :: remnor_fi
549 TYPE(int_pointer) , DIMENSION(:), ALLOCATABLE :: kremnor_fi
550 TYPE(int_pointer) , DIMENSION(:), ALLOCATABLE :: iskew_fi
551 TYPE(int_pointer) , DIMENSION(:), ALLOCATABLE :: icodt_fi
552 TYPE(real_pointer), DIMENSION(:), ALLOCATABLE :: stif_msdt_fi
553 TYPE(real_pointer), DIMENSION(:), ALLOCATABLE :: stife_msdt_fi
554 TYPE(real_pointer), DIMENSION(:), ALLOCATABLE :: intareanfi
555
556C AMS TYPE2 + Contact
557 TYPE(real_pointer), DIMENSION(:), ALLOCATABLE :: t2fac_sms_fi
558 TYPE(int_pointer2) , DIMENSION(:), ALLOCATABLE :: t2main_sms_fi
559
560 TYPE(int_pointer), DIMENSION(:), ALLOCATABLE :: candf_si
561cc my_real
562cc . BGAPSMXG
563 END MODULE tri7box
#define my_real
Definition cppsort.cpp:32
type(int_pointer), dimension(:), allocatable ispt2_fi
Definition tri7box.F:538
type(real_pointer2), dimension(:), allocatable stif_oldfi
Definition tri7box.F:545
type(real_pointer2), dimension(:), allocatable dxancfi
Definition tri7box.F:473
type(real_pointer2), dimension(:), allocatable stnfi17
Definition tri7box.F:467
type(real_pointer), dimension(:), allocatable gapfie
Definition tri7box.F:449
type(real_pointer2), dimension(:), allocatable eminxfi
Definition tri7box.F:467
type(real_pointer2), dimension(:), allocatable secnd_frfi
Definition tri7box.F:543
type(real_pointer), dimension(:), allocatable stif_msdt_fi
Definition tri7box.F:552
type(real_pointer), dimension(:), allocatable condnfi
Definition tri7box.F:449
type(int_pointer), dimension(:), allocatable is2pt_fi
Definition tri7box.F:537
type(int_pointer), dimension(:), allocatable inflg_subsfi
Definition tri7box.F:505
integer, dimension(:), allocatable chain_elem
Definition tri7box.F:49
type(int_pointer), dimension(:), allocatable iskew_fi
Definition tri7box.F:550
type(real_pointer), dimension(:), allocatable ftheskyfi
Definition tri7box.F:449
type(int_pointer), dimension(:), allocatable isegpt_fi
Definition tri7box.F:539
type(real_pointer2), dimension(:), allocatable vfie
Definition tri7box.F:459
type(real_pointer), dimension(:), allocatable time_sfi
Definition tri7box.F:542
type(real_pointer3), dimension(:), allocatable afi17
Definition tri7box.F:470
type(real_pointer2), dimension(:), allocatable daancfi
Definition tri7box.F:459
type(real_pointer2), dimension(:), allocatable fskyfie
Definition tri7box.F:459
type(real_pointer2), dimension(:), allocatable i18kafi
Definition tri7box.F:459
type(real_pointer2), dimension(:), allocatable vfi
Definition tri7box.F:459
type(real_pointer2), dimension(:), allocatable fnconti
Definition tri7box.F:510
type(int_pointer2), dimension(:), allocatable irtlm_fi
Definition tri7box.F:533
integer, dimension(lvoxel) voxel1
Definition tri7box.F:53
type(real_pointer2), dimension(:), allocatable frotsfi
Definition tri7box.F:467
type(int_pointer), dimension(:), allocatable matsfi
Definition tri7box.F:440
type(int_pointer2), dimension(:), allocatable is2se_fi
Definition tri7box.F:536
integer, dimension(:), allocatable current_fi_size
Definition tri7box.F:426
type(int_pointer), dimension(:), allocatable ipartfric_fie
Definition tri7box.F:440
type(real_pointer), dimension(:), allocatable efricgfi
Definition tri7box.F:511
type(real_pointer2), dimension(:), allocatable dvancfi
Definition tri7box.F:473
type(real_pointer), dimension(:), allocatable tempfi
Definition tri7box.F:449
type(int_pointer), dimension(:), allocatable candf_si
Definition tri7box.F:560
type(real_pointer), dimension(:), allocatable stifi
Definition tri7box.F:449
type(real_pointer3), dimension(:), allocatable xfi17
Definition tri7box.F:470
type(real_pointer2), dimension(:), allocatable ksfi
Definition tri7box.F:467
type(int_pointer), dimension(:), allocatable nsvsi
Definition tri7box.F:485
type(real_pointer2), dimension(:), allocatable xfie
Definition tri7box.F:459
type(int_pointer), dimension(:), allocatable iskyfie
Definition tri7box.F:480
integer inivoxel
Definition tri7box.F:53
integer i24iremp
Definition tri7box.F:423
integer i24irempnsne
Definition tri7box.F:423
type(int_pointer), dimension(:), allocatable kremnor_fi
Definition tri7box.F:549
type(real_pointer), dimension(:), allocatable gap_lfi
Definition tri7box.F:449
integer, dimension(:), allocatable chain_last
Definition tri7box.F:50
type(int_pointer), dimension(:), allocatable nsnfie
Definition tri7box.F:440
type(real_pointer2), dimension(:), allocatable dvancfie
Definition tri7box.F:473
type(real_pointer2), dimension(:), allocatable mtfi_a
Definition tri7box.F:459
integer, dimension(0:lrvoxel, 0:lrvoxel) crvoxel
Definition tri7box.F:56
type(r8_pointer3), dimension(:), allocatable daanc6fi
Definition tri7box.F:476
type(real_pointer), dimension(:), allocatable condnskyfi
Definition tri7box.F:449
type(real_pointer2), dimension(:), allocatable penfi
Definition tri7box.F:459
type(int_pointer), dimension(:), allocatable nsnsie
Definition tri7box.F:491
type(real_pointer), dimension(:), allocatable alphakfi
Definition tri7box.F:449
type(real_pointer), dimension(:), allocatable stnfi
Definition tri7box.F:449
type(int_pointer), dimension(:), allocatable lisubsfi
Definition tri7box.F:501
type(int_pointer2), dimension(:), allocatable irtse_fi
Definition tri7box.F:535
type(real_pointer2), dimension(:), allocatable penfia
Definition tri7box.F:459
type(real_pointer2), dimension(:), allocatable afi
Definition tri7box.F:459
type(int_pointer), dimension(:), allocatable nsvsie
Definition tri7box.F:485
type(real_pointer), dimension(:), allocatable mtfi_pene
Definition tri7box.F:449
type(int_pointer), dimension(:), allocatable nodamsfi
Definition tri7box.F:440
type(int_pointer), dimension(:), allocatable nsnsi
Definition tri7box.F:491
type(real_pointer2), dimension(:), allocatable fskyfi
Definition tri7box.F:459
type(int_pointer), dimension(:), allocatable nisubsfi
Definition tri7box.F:497
type(int_pointer), dimension(:), allocatable remnor_fi
Definition tri7box.F:548
type(real_pointer), dimension(:), allocatable stifie
Definition tri7box.F:449
integer lrvoxelp
Definition tri7box.F:522
type(int_pointer), dimension(:), allocatable pmainfi
Definition tri7box.F:435
integer lvoxel
Definition tri7box.F:51
integer i24xremp
Definition tri7box.F:423
type(real_pointer), dimension(:), allocatable stnfie
Definition tri7box.F:449
logical, dimension(:), allocatable first_test
Definition tri7box.F:420
type(real_pointer), dimension(:), allocatable gapfi
Definition tri7box.F:449
type(int_pointer), dimension(:), allocatable procamsfie
Definition tri7box.F:440
type(int_pointer), dimension(:), allocatable nodnxfi
Definition tri7box.F:440
type(int_pointer), dimension(:), allocatable nodnxfie
Definition tri7box.F:440
type(int_pointer), dimension(:), allocatable nsvfi
Definition tri7box.F:431
type(real_pointer), dimension(:), allocatable intareanfi
Definition tri7box.F:554
type(real_pointer), dimension(:), allocatable areasfi
Definition tri7box.F:449
integer igapxremp
Definition tri7box.F:423
type(int_pointer), dimension(:), allocatable icodt_fi
Definition tri7box.F:551
type(int_pointer), dimension(:), allocatable iskyfi
Definition tri7box.F:480
type(int_pointer), dimension(:), allocatable isedge_fi
Definition tri7box.F:540
type(real_pointer2), dimension(:), allocatable afie
Definition tri7box.F:459
type(int_pointer), dimension(:), allocatable nbinflfi
Definition tri7box.F:440
type(int_pointer), dimension(:), allocatable nsnfi_sav
Definition tri7box.F:440
type(real_pointer), dimension(:), allocatable efricfi
Definition tri7box.F:511
integer, dimension(:), allocatable next_nod
Definition tri7box.F:48
logical, dimension(:), allocatable to_trim
Definition tri7box.F:420
type(real_pointer), dimension(:), allocatable msfi
Definition tri7box.F:449
integer, dimension(:), allocatable current_nodfi
Definition tri7box.F:425
type(real_pointer), dimension(:), allocatable diag_smsfi
Definition tri7box.F:449
type(real_pointer), dimension(:), allocatable vscfi
Definition tri7box.F:449
type(real_pointer2), dimension(:), allocatable mtfi_n
Definition tri7box.F:459
type(int_pointer), dimension(:), allocatable nsvfie
Definition tri7box.F:440
type(int_pointer), dimension(:), allocatable addsubsfi
Definition tri7box.F:509
type(int_pointer), dimension(:), allocatable ipartfricsfi
Definition tri7box.F:440
type(int_pointer), dimension(:), allocatable nodamsfie
Definition tri7box.F:440
type(real_pointer), dimension(:), allocatable t2fac_sms_fi
Definition tri7box.F:557
type(r8_pointer3), dimension(:), allocatable daanc6fie
Definition tri7box.F:476
type(real_pointer2), dimension(:), allocatable xfi
Definition tri7box.F:459
type(int_pointer), dimension(:), allocatable kinfi
Definition tri7box.F:440
integer, dimension(:), allocatable prev_remote_number
Definition tri7box.F:517
type(real_pointer), dimension(:), allocatable vscfie
Definition tri7box.F:449
type(real_pointer), dimension(:), allocatable diag_smsfie
Definition tri7box.F:449
type(real_pointer), dimension(:), allocatable alphakfie
Definition tri7box.F:449
type(int_pointer), dimension(:), allocatable itafie
Definition tri7box.F:440
integer, dimension(:), allocatable nlskyfie
Definition tri7box.F:512
integer, dimension(:), allocatable nsnfi_flag
Definition tri7box.F:530
type(real_pointer2), dimension(:), allocatable dxancfie
Definition tri7box.F:473
type(real_pointer), dimension(:), allocatable stife_msdt_fi
Definition tri7box.F:553
type(real_pointer), dimension(:), allocatable mtfi_penemin
Definition tri7box.F:449
integer, dimension(:), allocatable nlskyfi
Definition tri7box.F:512
type(real_pointer2), dimension(:), allocatable ftconti
Definition tri7box.F:510
type(int_pointer), dimension(:), allocatable procamsfi
Definition tri7box.F:440
type(int_pointer2), dimension(:), allocatable islide_fi
Definition tri7box.F:547
integer lrvoxel
Definition tri7box.F:54
type(real_pointer2), dimension(:), allocatable pene_oldfi
Definition tri7box.F:544
type(int_pointer), dimension(:), allocatable icont_i_fi
Definition tri7box.F:532
type(real_pointer2), dimension(:), allocatable mtfi_v
Definition tri7box.F:459
type(int_pointer), dimension(:), allocatable tagncontfi
Definition tri7box.F:505
type(int_pointer), dimension(:), allocatable nsnfi
Definition tri7box.F:440
type(int_pointer), dimension(:), allocatable if_adhfi
Definition tri7box.F:440
type(int_pointer2), dimension(:), allocatable t2main_sms_fi
Definition tri7box.F:558
integer, dimension(:,:), allocatable irem
Definition tri7box.F:339
type(real_pointer2), dimension(:), allocatable daancfie
Definition tri7box.F:459
type(real_pointer), dimension(:), allocatable msfie
Definition tri7box.F:449
type(int_pointer), dimension(:), allocatable itafi
Definition tri7box.F:440
type(real_pointer2), dimension(:), allocatable penfiae
Definition tri7box.F:459