solve
Type | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|
type(FEMDomain_), | target | :: | cube(3) | |||
type(FEMDomainp_) | :: | cube_p(3) | ||||
type(FEMSolver_) | :: | solver | ||||
integer(kind=int32), | allocatable | :: | FixBoundary(:) | |||
integer(kind=int32), | allocatable | :: | Overset_Elements(:,:) | |||
integer(kind=int32) | :: | ElementID | ||||
integer(kind=int32) | :: | DomainID | ||||
integer(kind=int32) | :: | i | ||||
type(IO_) | :: | f | ||||
type(MPI_) | :: | mpid | ||||
integer(kind=int32), | allocatable | :: | row(:) | |||
integer(kind=int32), | allocatable | :: | col(:) | |||
real(kind=real64), | allocatable | :: | val(:) | |||
real(kind=real64), | allocatable | :: | all_disp(:) | |||
integer(kind=int32) | :: | nn | = | 1000000.0 |