inputreducermodule Module Reference

Module with subroutines for input and preprocessing of FE model data. More...

Functions/Subroutines
subroutine	readreducerdata (sam, sysK, sysM, mass, rotMass, tenc, medof, mlc, noMass, diagMass, lumpedMass, demoEdition, ipsw, lpu, ierr, directSolve)
	Administers data input and preprocessing for fedem_reducer. More...
subroutine	checklinearcouplings (mpmceq, mmceq, msc, ierr)
	Checks the dof status correctness for all linear couplings. More...
subroutine	checksingularnodes (nel, nnod, minex, mpmnpc, mmnpc, madof, msc, numSing)
	Checks that all nodes are connected to an element. More...
subroutine	subprin (LINK, MPAR, MPMNPC, MNPC, MEKN, MINEX, X, Y, Z, MADOF, MSC, MPMCEQ, MCEQ, COEFF, INODE, LPU)
	Prints out data for a substructure. More...

Detailed Description

Module with subroutines for input and preprocessing of FE model data.

Function/Subroutine Documentation

checklinearcouplings()

subroutine inputreducermodule::checklinearcouplings	(	integer, dimension(:), intent(in)	mpmceq,
		integer, dimension(:), intent(in)	mmceq,
		integer, dimension(:), intent(in)	msc,
		integer, intent(out)	ierr
	)

Checks the dof status correctness for all linear couplings.

Author

Bjorn Haugen

Here is the caller graph for this function:

checksingularnodes()

subroutine inputreducermodule::checksingularnodes	(	integer, intent(in)	nel,
		integer, intent(in)	nnod,
		integer, dimension(:), intent(in)	minex,
		integer, dimension(:), intent(in)	mpmnpc,
		integer, dimension(:), intent(in)	mmnpc,
		integer, dimension(:), intent(in)	madof,
		integer, dimension(:), intent(in)	msc,
		integer, intent(out)	numSing
	)

Checks that all nodes are connected to an element.

Author

Bjorn Haugen

Here is the caller graph for this function:

readreducerdata()

subroutine inputreducermodule::readreducerdata	(	type(samtype), intent(out)	sam,
		type(sysmatrixtype), intent(out)	sysK,
		type(sysmatrixtype), intent(out)	sysM,
		real(dp), intent(out)	mass,
		real(dp), intent(out)	rotMass,
		real(dp), dimension(:,:), pointer	tenc,
		integer, dimension(:), pointer	medof,
		integer, dimension(:), intent(out)	mlc,
		logical, intent(in)	noMass,
		logical, intent(in)	diagMass,
		logical, intent(in)	lumpedMass,
		logical, intent(in)	demoEdition,
		integer, intent(in)	ipsw,
		integer, intent(in)	lpu,
		integer, intent(out)	ierr,
		integer, intent(in), optional	directSolve
	)

Administers data input and preprocessing for fedem_reducer.

Parameters

[out]	sam	Data for managing system matrix assembly
[out]	sysK	System stiffness matrix
[out]	sysM	System mass matrix
[out]	mass	Total mass of the FE part
[out]	rotMass	Total rotational mass of the FE part
[out]	tenc	Table of External Node Coordinates
[out]	medof	Matrix of External DOFs
[out]	mlc	Matrix of Load Case identifiers
[in]	noMass	If .true., the system mass matrix is not needed
[in]	diagMass	If .true., use a diagonalized system mass matrix
[in]	lumpedMass	If .true., use a lumped mass matrix formulation
[in]	demoEdition	If .true., a demo license is used
[in]	ipsw	Print switch for debug output
[in]	lpu	File unit number for res-file output
[out]	ierr	Error flag
[in]	directSolve	If present, we are doing a direct linear solve

Author

Knut Morten Okstad

Date

20 Sep 2000

Here is the call graph for this function:

Here is the caller graph for this function:

subprin()

subroutine inputreducermodule::subprin	(	integer, intent(in)	LINK,
		integer, dimension(:), intent(in)	MPAR,
		integer, dimension(:), intent(in)	MPMNPC,
		integer, dimension(:), intent(in)	MNPC,
		integer, dimension(:), intent(in)	MEKN,
		integer, dimension(:), intent(in)	MINEX,
		real(dp), dimension(:), intent(in)	X,
		real(dp), dimension(:), intent(in)	Y,
		real(dp), dimension(:), intent(in)	Z,
		integer, dimension(:), intent(in)	MADOF,
		integer, dimension(:), intent(in)	MSC,
		integer, dimension(:), intent(in)	MPMCEQ,
		integer, dimension(:), intent(in)	MCEQ,
		real(dp), dimension(:), intent(in)	COEFF,
		integer, dimension(:), intent(in)	INODE,
		integer, intent(in)	LPU
	)

Prints out data for a substructure.

Author

Ketil Aamnes

Date

14 Oct 1988

Author

Knut Morten Okstad

Date

10 Sep 2002

Here is the caller graph for this function: