assembleElementalMatrix2D_c Subroutine

  1. mod_assembly_c.f90
  2. mod_assembly_c
  3. assembleElementalMatrix2D_c

private subroutine assembleElementalMatrix2D_c(N, d1, d2, xy, Ie) bind(c, name="0")

Arguments

Type IntentOptional AttributesName
integer(kind=c_int), intent(in), value:: N
integer(kind=c_int), intent(in), value:: d1
integer(kind=c_int), intent(in), value:: d2
real(kind=c_double), intent(in) :: xy(N,2)
real(kind=c_double), intent(inout) :: Ie(N,N)

Calls

proc~~assembleelementalmatrix2d_c~~CallsGraph proc~assembleelementalmatrix2d_c assembleElementalMatrix2D_c interface~assembleelementalmatrix assembleElementalMatrix proc~assembleelementalmatrix2d_c->interface~assembleelementalmatrix

Contents

Source Code

assembleElementalMatrix2D_c

Source Code

    subroutine assembleElementalMatrix2D_c( &
            N, d1, d2, xy, Ie) &
            bind(c, name='assembleElementalMatrix2D_c')
        integer(c_int), intent(in), value :: N, d1, d2
        real(c_double), intent(in)        :: xy(N, 2)
        real(c_double), intent(inout)     :: Ie(N,N)

        integer :: ii

        Ie = assembleElementalMatrix(N, d1, d2, xy)

        return
    end subroutine assembleElementalMatrix2D_c