Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
type(FEMDomain_), | public, | pointer | :: | femdomain | |||
type(LinearSolver_), | public | :: | solver | ||||
real(kind=real64), | public, | allocatable | :: | m(:) | |||
real(kind=real64), | public, | allocatable | :: | c(:) | |||
real(kind=real64), | public, | allocatable | :: | k(:) | |||
real(kind=real64), | public, | allocatable | :: | f(:) | |||
real(kind=real64), | public, | allocatable | :: | u(:) | |||
real(kind=real64), | public, | allocatable | :: | v(:) | |||
real(kind=real64), | public, | allocatable | :: | a(:) | |||
real(kind=real64), | public | :: | Newmark_beta | = | 0.25d0 | ||
real(kind=real64), | public | :: | Newmark_gamma | = | 0.50d0 | ||
integer(kind=int32), | public | :: | itr | = | 0 |
procedure, public :: init => initmultiDOFsystem | |
procedure, public :: solve => solvemultiDOFsystem |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(multiDOFsystem_), | intent(inout) | :: | obj | |||
type(FEMDomain_), | target | :: | femdomain |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(multiDOFsystem_), | intent(inout) | :: | obj | |||
real(kind=real64), | intent(in) | :: | dt | |||
integer(kind=int32), | intent(in) | :: | FixNodeId | |||
real(kind=real64), | intent(in) | :: | displacement | |||
character(len=*), | intent(in) | :: | Solver | |||
logical, | intent(in), | optional | :: | powerSpectre |