scale_element_line Module Reference

module FElib / Element / line More...

Data Types
type	lineelement
	Derived type representing a line element. More...

Functions/Subroutines
subroutine	lineelement_init (elem, elemorder, lumpedmassmatflag)
	Initialize an object to manage a line element.

Detailed Description

module FElib / Element / line

Description

A module for a line finite element

Author

Yuta Kawai, Team SCALE

Function/Subroutine Documentation

lineelement_init()

subroutine scale_element_line::lineelement_init	(	class(lineelement), intent(inout)	elem,
		integer, intent(in)	elemorder,
		logical, intent(in)	lumpedmassmatflag )

Initialize an object to manage a line element.

Parameters

elem	Object of finite element
elemOrder	Polynomial order
LumpedMassMatFlag	Flag whether mass lumping is considered

Definition at line 53 of file scale_element_line.F90.

    
    implicit none
 
    class(LineElement), intent(inout) :: elem
    integer, intent(in) :: elemOrder
    logical, intent(in) :: LumpedMassMatFlag
 
    !-----------------------------------------------------------------------------
    
    elem%PolyOrder = elemorder
    elem%Nv = 2
    elem%Np = elemorder + 1
    elem%Nfp = 1
    elem%Nfaces = 2
    elem%NfpTot = elem%Nfp*elem%Nfaces
       
    call elementbase1d_init(elem, lumpedmassmatflag)
    call construct_element(elem)
 
    return

References scale_element_base::elementbase1d_final(), scale_element_base::elementbase1d_init(), scale_element_base::elementbase_construct_liftmat(), scale_element_base::elementbase_construct_massmat(), scale_element_base::elementbase_construct_stiffmat(), scale_linalgebra::linalgebra_inv(), scale_polynomial::polynomial_gendlagrangepoly_lglpt(), scale_polynomial::polynomial_gendlegendrepoly(), scale_polynomial::polynomial_gengausslegendrept(), scale_polynomial::polynomial_gengausslegendreptintweight(), scale_polynomial::polynomial_gengausslobattopt(), scale_polynomial::polynomial_gengausslobattoptintweight(), scale_polynomial::polynomial_genlagrangepoly(), and scale_polynomial::polynomial_genlegendrepoly().