GetColumn

Get the column entries of matrix field.

Calling example:

• GetColumn(obj, globalnode, ivar, idof, value(:), nodefieldval, scale, addcontribution
• GetColumn(obj, globalnode, ivar, spacecompo, timecompo, value(:), nodefieldval, scale, addcontribution
• GetColumn(obj, globalnode, ivar, spacecompo, timecompo(:), value(:), nodefieldval, scale, addcontribution
• GetColumn(obj, globalnode, ivar, spacecompo(:), timecompo, value(:), nodefieldval, scale, addcontribution
• GetColumn(obj, globalnode(:), ivar, spacecompo, timecompo(:), value(:), nodefieldval, scale, addcontribution
• GetColumn(obj, globalnode(:), ivar, spacecompo(:), timecompo, value(:), nodefieldval, scale, addcontribution

Interface 1

܀ See Interface

INTERFACE
  SUBROUTINE getColumn(obj, globalNode, ivar, idof, &
      & VALUE, nodeFieldVal, scale, addContribution)
    CLASS(BlockMatrixField_), INTENT(IN) :: obj
    INTEGER(I4B), INTENT(IN) :: globalNode
    INTEGER(I4B), INTENT(IN) :: ivar
    INTEGER(I4B), INTENT(IN) :: idof
    REAL(DFP), OPTIONAL, INTENT(INOUT) :: VALUE(:)
    CLASS(AbstractNodeField_), OPTIONAL, INTENT(INOUT) :: nodeFieldVal
    REAL(DFP), OPTIONAL, INTENT(IN) :: scale
    LOGICAL(LGT), OPTIONAL, INTENT(IN) :: addContribution
  END SUBROUTINE getColumn
END INTERFACE

This routine returns the column of a sparse matrix. The column index is calculated using the globalNode, ivar, idof.

• globalNode is the global node number
• ivar is the physical variable number
• idof is the degree of freedom number of the physical variable

If value is present then the vector is returned inside the rank 1 vector

If nodeFieldVal is present then the column is returned inside the node field

↢

Interface 2

܀ See Interface

INTERFACE
  SUBROUTINE getColumn(obj, globalNode, ivar, spacecompo, &
    & timecompo, VALUE, nodeFieldVal, scale, addContribution)
    CLASS(BlockMatrixField_), INTENT(IN) :: obj
    INTEGER(I4B), INTENT(IN) :: globalNode
    INTEGER(I4B), INTENT(IN) :: ivar
    INTEGER(I4B), INTENT(IN) :: spacecompo
    INTEGER(I4B), INTENT(IN) :: timecompo
    REAL(DFP), OPTIONAL, INTENT(INOUT) :: VALUE(:)
    CLASS(AbstractNodeField_), OPTIONAL, INTENT(INOUT) :: nodeFieldVal
    REAL(DFP), OPTIONAL, INTENT(IN) :: scale
    LOGICAL(LGT), OPTIONAL, INTENT(IN) :: addContribution
  END SUBROUTINE getColumn
END INTERFACE

This routine returns the column of a sparse matrix. The column index is calculated using the globalNode, ivar, spacecompo, timecompo.

• globalNode is the global node number
• ivar is the physical variable number
• spacecompo is the spatial component of the physical variable
• timecompo is the temporal component of the physical variable

If value is present then the vector is returned inside the rank 1 vector

If nodeFieldVal is present then the column is returned inside the node field

↢

Interface 3

܀ See Interface

INTERFACE
  SUBROUTINE getColumn(obj, globalNode, ivar, spacecompo, &
    & timecompo, VALUE, nodeFieldVal, scale, addContribution)
    CLASS(BlockMatrixField_), INTENT(IN) :: obj
    INTEGER(I4B), INTENT(IN) :: globalNode
    INTEGER(I4B), INTENT(IN) :: ivar
    INTEGER(I4B), INTENT(IN) :: spacecompo
    INTEGER(I4B), INTENT(IN) :: timecompo(:)
    REAL(DFP), OPTIONAL, INTENT(INOUT) :: VALUE(:)
    CLASS(AbstractNodeField_), OPTIONAL, INTENT(INOUT) :: nodeFieldVal
    REAL(DFP), OPTIONAL, INTENT(IN) :: scale
    LOGICAL(LGT), OPTIONAL, INTENT(IN) :: addContribution
  END SUBROUTINE getColumn
END INTERFACE

This routine returns the column of a sparse matrix. The column index is calculated using the globalNode, ivar, spacecompo, timecompo.

• globalNode is the global node number
• ivar is the physical variable number
• spacecompo is the spatial component of the physical variable
• timecompo is the temporal component of the physical variable

If value is present then the vector is returned inside the rank 1 vector

If nodeFieldVal is present then the column is returned inside the node field

↢

Interface 4

܀ See Interface

INTERFACE
  SUBROUTINE getColumn(obj, globalNode, ivar, spacecompo, &
    & timecompo, VALUE, nodeFieldVal, scale, addContribution)
    CLASS(BlockMatrixField_), INTENT(IN) :: obj
    INTEGER(I4B), INTENT(IN) :: globalNode
    INTEGER(I4B), INTENT(IN) :: ivar
    INTEGER(I4B), INTENT(IN) :: spacecompo(:)
    INTEGER(I4B), INTENT(IN) :: timecompo
    REAL(DFP), OPTIONAL, INTENT(INOUT) :: VALUE(:)
    CLASS(AbstractNodeField_), OPTIONAL, INTENT(INOUT) :: nodeFieldVal
    REAL(DFP), OPTIONAL, INTENT(IN) :: scale
    LOGICAL(LGT), OPTIONAL, INTENT(IN) :: addContribution
  END SUBROUTINE getColumn
END INTERFACE

This routine returns the column of a sparse matrix. The column index is calculated using the globalNode, ivar, spacecompo, timecompo.

• globalNode is the global node number
• ivar is the physical variable number
• spacecompo is the spatial component of the physical variable
• timecompo is the temporal component of the physical variable

If value is present then the vector is returned inside the rank 1 vector

If nodeFieldVal is present then the column is returned inside the node field

↢

Interface 5

܀ See Interface

INTERFACE
  SUBROUTINE getColumn(obj, globalNode, ivar, spacecompo, &
    & timecompo, VALUE, nodeFieldVal, scale, addContribution)
    CLASS(BlockMatrixField_), INTENT(IN) :: obj
    INTEGER(I4B), INTENT(IN) :: globalNode(:)
    INTEGER(I4B), INTENT(IN) :: ivar
    INTEGER(I4B), INTENT(IN) :: spacecompo
    INTEGER(I4B), INTENT(IN) :: timecompo(:)
    REAL(DFP), OPTIONAL, INTENT(INOUT) :: VALUE(:)
    CLASS(AbstractNodeField_), OPTIONAL, INTENT(INOUT) :: nodeFieldVal
    REAL(DFP), OPTIONAL, INTENT(IN) :: scale
    LOGICAL(LGT), OPTIONAL, INTENT(IN) :: addContribution
  END SUBROUTINE getColumn
END INTERFACE

This routine returns the column of a sparse matrix. The column index is calculated using the globalNode, ivar, spacecompo, timecompo.

• globalNode is the global node number
• ivar is the physical variable number
• spacecompo is the spatial component of the physical variable
• timecompo is the temporal component of the physical variable

If value is present then the vector is returned inside the rank 1 vector

If nodeFieldVal is present then the column is returned inside the node field

↢

Interface 6

܀ See Interface

INTERFACE
  SUBROUTINE getColumn(obj, globalNode, ivar, spacecompo, &
    & timecompo, VALUE, nodeFieldVal, scale, addContribution)
    CLASS(BlockMatrixField_), INTENT(IN) :: obj
    INTEGER(I4B), INTENT(IN) :: globalNode(:)
    INTEGER(I4B), INTENT(IN) :: ivar
    INTEGER(I4B), INTENT(IN) :: spacecompo(:)
    INTEGER(I4B), INTENT(IN) :: timecompo
    REAL(DFP), OPTIONAL, INTENT(INOUT) :: VALUE(:)
    CLASS(AbstractNodeField_), OPTIONAL, INTENT(INOUT) :: nodeFieldVal
    REAL(DFP), OPTIONAL, INTENT(IN) :: scale
    LOGICAL(LGT), OPTIONAL, INTENT(IN) :: addContribution
  END SUBROUTINE getColumn
END INTERFACE

This routine returns the column of a sparse matrix. The column index is calculated using the globalNode, ivar, spacecompo, timecompo.

• globalNode is the global node number
• ivar is the physical variable number
• spacecompo is the spatial component of the physical variable
• timecompo is the temporal component of the physical variable

If value is present then the vector is returned inside the rank 1 vector

If nodeFieldVal is present then the column is returned inside the node field

↢