OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
metric_mod Module Reference

Data Types

type  metric_struct_

Functions/Subroutines

subroutine int_printime (this)
subroutine int_flushtime (this)

Variables

integer, parameter algo_voxel = 1
integer, parameter algo_bucket = 2
integer, parameter try_algo_voxel =-1
integer, parameter try_algo_bucket = 0
integer, parameter i_main_crit_tri = 1
integer, parameter i_main_tri = 2
integer, parameter i_main_opt_tri = 3
integer, parameter i_main_forces = 4
integer, parameter i_noint = 5
integer, parameter i_multimp = 6
integer, parameter i_nsn = 7
integer, parameter i_nsnr = 8
integer, parameter i_ncont = 9
integer, parameter size_timer = 4
integer, parameter size_metric = 9
integer, parameter file_id = 4999
integer global_interface_sorting_algo

Function/Subroutine Documentation

◆ int_flushtime()

subroutine metric_mod::int_flushtime ( type(metric_struct_) this)

Definition at line 122 of file metric_mod.F.

123C-----------------------------------------------
124C I m p l i c i t T y p e s
125C-----------------------------------------------
126#include "implicit_f.inc"
127C-----------------------------------------------
128C D u m m y A r g u m e n t s
129C-----------------------------------------------
130 TYPE(METRIC_STRUCT_) :: THIS
131
132 this%TIME(1:size_timer,1:2) = 0.0d0
133 RETURN

◆ int_printime()

subroutine metric_mod::int_printime ( type(metric_struct_) this)

Definition at line 88 of file metric_mod.F.

89C-----------------------------------------------
90C I m p l i c i t T y p e s
91C-----------------------------------------------
92#include "implicit_f.inc"
93C-----------------------------------------------
94C D u m m y A r g u m e n t s
95C-----------------------------------------------
96 TYPE(METRIC_STRUCT_) :: THIS
97C-----------------------------------------------
98C L o c a l V a r i a b l e s
99C-----------------------------------------------
100 WRITE(4999,'(6I10,4F12.5)')
101 . this%NOINT,
102 . this%CYCLE0,
103 . this%NCONT,
104 . this%IMPACT,
105 . this%MULTIMP,
106 . this%NSNR,
107 . this%TIME(i_main_crit_tri,1),
108c . THIS%TIME(I_COMMCRIT,1),
109c . THIS%TIME(I_GFRONT,1),
110 . this%TIME(i_main_tri,1),
111 . this%TIME(i_main_opt_tri,1)
112c CALL INT_FLUSHTIME(THIS)
113 RETURN

Variable Documentation

◆ algo_bucket

integer, parameter metric_mod::algo_bucket = 2

Definition at line 48 of file metric_mod.F.

48 INTEGER, PARAMETER :: ALGO_BUCKET = 2

◆ algo_voxel

integer, parameter metric_mod::algo_voxel = 1

Definition at line 47 of file metric_mod.F.

47 INTEGER, PARAMETER :: ALGO_VOXEL = 1

◆ file_id

integer, parameter metric_mod::file_id = 4999

Definition at line 67 of file metric_mod.F.

67 INTEGER, PARAMETER :: FILE_ID= 4999

◆ global_interface_sorting_algo

integer metric_mod::global_interface_sorting_algo

Definition at line 69 of file metric_mod.F.

69 INTEGER :: GLOBAL_INTERFACE_SORTING_ALGO

◆ i_main_crit_tri

integer, parameter metric_mod::i_main_crit_tri = 1

Definition at line 53 of file metric_mod.F.

53 INTEGER, PARAMETER :: I_MAIN_CRIT_TRI = 1

◆ i_main_forces

integer, parameter metric_mod::i_main_forces = 4

Definition at line 56 of file metric_mod.F.

56 INTEGER, PARAMETER :: I_MAIN_FORCES = 4

◆ i_main_opt_tri

integer, parameter metric_mod::i_main_opt_tri = 3

Definition at line 55 of file metric_mod.F.

55 INTEGER, PARAMETER :: I_MAIN_OPT_TRI = 3

◆ i_main_tri

integer, parameter metric_mod::i_main_tri = 2

Definition at line 54 of file metric_mod.F.

54 INTEGER, PARAMETER :: I_MAIN_TRI = 2

◆ i_multimp

integer, parameter metric_mod::i_multimp = 6

Definition at line 58 of file metric_mod.F.

58 INTEGER, PARAMETER :: I_MULTIMP = 6

◆ i_ncont

integer, parameter metric_mod::i_ncont = 9

Definition at line 61 of file metric_mod.F.

61 INTEGER, PARAMETER :: I_NCONT = 9

◆ i_noint

integer, parameter metric_mod::i_noint = 5

Definition at line 57 of file metric_mod.F.

57 INTEGER, PARAMETER :: I_NOINT = 5

◆ i_nsn

integer, parameter metric_mod::i_nsn = 7

Definition at line 59 of file metric_mod.F.

59 INTEGER, PARAMETER :: I_NSN = 7

◆ i_nsnr

integer, parameter metric_mod::i_nsnr = 8

Definition at line 60 of file metric_mod.F.

60 INTEGER, PARAMETER :: I_NSNR = 8

◆ size_metric

integer, parameter metric_mod::size_metric = 9

Definition at line 64 of file metric_mod.F.

64 INTEGER, PARAMETER :: SIZE_METRIC = 9

◆ size_timer

integer, parameter metric_mod::size_timer = 4

Definition at line 63 of file metric_mod.F.

63 INTEGER, PARAMETER :: SIZE_TIMER = 4

◆ try_algo_bucket

integer, parameter metric_mod::try_algo_bucket = 0

Definition at line 50 of file metric_mod.F.

50 INTEGER, PARAMETER :: TRY_ALGO_BUCKET = 0

◆ try_algo_voxel

integer, parameter metric_mod::try_algo_voxel =-1

Definition at line 49 of file metric_mod.F.

49 INTEGER, PARAMETER :: TRY_ALGO_VOXEL =-1