Skip to content

Commit bd3269a

Browse files
author
mohdsaid497566
committed
removed duplicate type definition
1 parent ac48caa commit bd3269a

File tree

1 file changed

+0
-31
lines changed

1 file changed

+0
-31
lines changed

src/common/m_derived_types.fpp

Lines changed: 0 additions & 31 deletions
Original file line numberDiff line numberDiff line change
@@ -136,37 +136,6 @@ module m_derived_types
136136
integer, dimension(:, :, :), allocatable :: fullmom !< Moment indices for qbmm
137137
end type bub_bounds_info
138138

139-
140-
!> @name Annotations of the structure of the state and flux vectors in terms of the
141-
!! size and the configuration of the system of equations to which they belong
142-
!> @{
143-
type system_of_equations
144-
type(int_bounds_info) :: cont !< Indexes of first & last continuity eqns.
145-
type(int_bounds_info) :: mom !< Indexes of first & last momentum eqns.
146-
integer :: E !< Index of energy equation
147-
integer :: n !< Index of number density
148-
type(int_bounds_info) :: adv !< Indexes of first & last advection eqns.
149-
type(int_bounds_info) :: internalEnergies !< Indexes of first & last internal energy eqns.
150-
type(bub_bounds_info) :: bub !< Indexes of first & last bubble variable eqns.
151-
integer :: alf !< Index of void fraction
152-
integer :: gamma !< Index of specific heat ratio func. eqn.
153-
integer :: pi_inf !< Index of liquid stiffness func. eqn.
154-
type(int_bounds_info) :: B !< Indexes of first and last magnetic field eqns.
155-
type(int_bounds_info) :: stress !< Indexes of first and last shear stress eqns.
156-
type(int_bounds_info) :: xi !< Indexes of first and last reference map eqns.
157-
integer :: b_size !< Number of elements in the symmetric b tensor, plus one
158-
integer :: tensor_size !< Number of elements in the full tensor plus one
159-
type(int_bounds_info) :: species !< Indexes of first & last concentration eqns.
160-
integer :: c !< Index of color function
161-
integer :: damage !< Index of damage state variable (D) for continuum damage model
162-
integer, dimension(3) :: dir
163-
real(wp), dimension(3) :: dir_flg
164-
integer, dimension(3) :: dir_tau !!used for hypoelasticity=true
165-
integer, dimension(2) :: Re_size
166-
integer, allocatable, dimension(:, :) :: Re
167-
end type system_of_equations
168-
!> @}
169-
170139
!> @name Annotations of the structure of the state and flux vectors in terms of the
171140
!! size and the configuration of the system of equations to which they belong
172141
!> @{

0 commit comments

Comments
 (0)