2012-08-25 17:16:36 +05:30
|
|
|
!--------------------------------------------------------------------------------------------------
|
|
|
|
|
!> @author Franz Roters, Max-Planck-Institut für Eisenforschung GmbH
|
2020-01-25 13:42:09 +05:30
|
|
|
!> @author Philip Eisenlohr, Max-Planck-Institut für Eisenforschung GmbH
|
|
|
|
|
!> @brief global variables for flow control
|
2012-08-25 17:16:36 +05:30
|
|
|
!--------------------------------------------------------------------------------------------------
|
2012-03-09 01:55:28 +05:30
|
|
|
module FEsolving
|
2020-03-29 23:34:51 +05:30
|
|
|
|
2019-06-11 19:46:10 +05:30
|
|
|
implicit none
|
2020-01-29 19:22:09 +05:30
|
|
|
public
|
|
|
|
|
|
2020-01-25 13:54:42 +05:30
|
|
|
integer, dimension(2) :: &
|
|
|
|
|
FEsolving_execElem, & !< for ping-pong scheme always whole range, otherwise one specific element
|
2019-06-11 19:46:10 +05:30
|
|
|
FEsolving_execIP !< for ping-pong scheme always range to max IP, otherwise one specific IP
|
2008-03-15 03:02:57 +05:30
|
|
|
|
2012-03-09 01:55:28 +05:30
|
|
|
end module FEsolving
|
