SetColumn

Set column of matrix field.

Calling example

• SetColumn(obj, globalnode, ivar, idof, scalarval, vecval(:), nodefieldval)
• SetColumn(obj, globalnode, ivar, spacecompo, timecompo, scalarval, vecval(:), nodefieldval)
• SetColumn(obj, globalnode, ivar, spacecompo, timecompo(:), scalarval, vecval(:), nodefieldval)
• SetColumn(obj, globalnode, ivar, spacecompo(:), timecompo, scalarval, vecval(:), nodefieldval)
• SetColumn(obj, globalnode(:), ivar, spacecompo, timecompo(:), scalarval, vecval(:), nodefieldval)
• SetColumn(obj, globalnode(:), ivar, spacecompo(:), timecompo, scalarval, vecval(:), nodefieldval)

Interface 1

܀ See Interface

INTERFACE
  SUBROUTINE setColumn(obj, globalNode, ivar, idof, &
    & scalarVal, vecVal, nodeFieldVal)
    CLASS(BlockMatrixField_), INTENT(INOUT) :: obj
    INTEGER(I4B), INTENT(IN) :: globalNode
    INTEGER(I4B), INTENT(IN) :: ivar
    INTEGER(I4B), INTENT(IN) :: idof
    REAL(DFP), OPTIONAL, INTENT(IN) :: scalarVal
    REAL(DFP), OPTIONAL, INTENT(IN) :: vecVal(:)
    CLASS(AbstractNodeField_), OPTIONAL, INTENT(IN) :: nodeFieldVal
  END SUBROUTINE setColumn
END INTERFACE

This routine sets the col of a sparse matrix. The col index is calculated by using the globalNode, ivar and idof.

• globalNode is global node number.
• ivar is the physical variable number.
• idof is the degree of freedom number.
• scalarVal is the scalar value, if present then the col will be Set to this scalar value
• vectorVal is the vector value, if present then the col will be Set to this vector value
• nodeFieldVal is the field of nodal values.

↢

Interface 2

܀ See Interface

INTERFACE
  SUBROUTINE setColumn(obj, globalNode, ivar, spacecompo, &
    & timecompo, scalarVal, vecVal, nodeFieldVal)
    CLASS(BlockMatrixField_), INTENT(INOUT) :: 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(IN) :: scalarVal
    REAL(DFP), OPTIONAL, INTENT(IN) :: vecVal(:)
    CLASS(AbstractNodeField_), OPTIONAL, INTENT(IN) :: nodeFieldVal
  END SUBROUTINE setColumn
END INTERFACE

This routine sets the col of a sparse matrix. The col index is calculated by using the globalNode, ivar and spacecompo, timecompo.

• globalNode is global node number.
• ivar is the physical variable number.
• spacecompo is the space component number.
• timecompo is the time component number.
• scalarVal is the scalar value, if present then the col will be Set to this scalar value
• vectorVal is the vector value, if present then the col will be Set to this vector value
• nodeFieldVal is the field of nodal values.

↢

Interface 3

܀ See Interface

INTERFACE
  SUBROUTINE setColumn(obj, globalNode, ivar, spacecompo, &
    & timecompo, scalarVal, vecVal, nodeFieldVal)
    CLASS(BlockMatrixField_), INTENT(INOUT) :: 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(IN) :: scalarVal
    REAL(DFP), OPTIONAL, INTENT(IN) :: vecVal(:)
    CLASS(AbstractNodeField_), OPTIONAL, INTENT(IN) :: nodeFieldVal
  END SUBROUTINE setColumn
END INTERFACE

This routine sets the col of a sparse matrix. The col index is calculated by using the globalNode, ivar and spacecompo, timecompo.

• globalNode is global node number.
• ivar is the physical variable number.
• spacecompo is the space component number.
• timecompo is the time component number.
• scalarVal is the scalar value, if present then the col will be Set to this scalar value
• vectorVal is the vector value, if present then the col will be Set to this vector value
• nodeFieldVal is the field of nodal values.

↢

Interface 4

܀ See Interface

INTERFACE
  SUBROUTINE setColumn(obj, globalNode, ivar, spacecompo, &
    & timecompo, scalarVal, vecVal, nodeFieldVal)
    CLASS(BlockMatrixField_), INTENT(INOUT) :: 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(IN) :: scalarVal
    REAL(DFP), OPTIONAL, INTENT(IN) :: vecVal(:)
    CLASS(AbstractNodeField_), OPTIONAL, INTENT(IN) :: nodeFieldVal
  END SUBROUTINE setColumn
END INTERFACE

This routine sets the col of a sparse matrix. The col index is calculated by using the globalNode, ivar and spacecompo, timecompo.

• globalNode is global node number.
• ivar is the physical variable number.
• spacecompo is the space component number.
• timecompo is the time component number.
• scalarVal is the scalar value, if present then the col will be Set to this scalar value
• vectorVal is the vector value, if present then the col will be Set to this vector value
• nodeFieldVal is the field of nodal values.

↢

Interface 5

܀ See Interface

INTERFACE
  SUBROUTINE setColumn(obj, globalNode, ivar, spacecompo, &
    & timecompo, scalarVal, vecVal, nodeFieldVal)
    CLASS(BlockMatrixField_), INTENT(INOUT) :: 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(IN) :: scalarVal
    REAL(DFP), OPTIONAL, INTENT(IN) :: vecVal(:)
    CLASS(AbstractNodeField_), OPTIONAL, INTENT(IN) :: nodeFieldVal
  END SUBROUTINE setColumn
END INTERFACE

This routine sets the col of a sparse matrix. The col index is calculated by using the globalNode, ivar and spacecompo, timecompo.

• globalNode is global node number.
• ivar is the physical variable number.
• spacecompo is the space component number.
• timecompo is the time component number.
• scalarVal is the scalar value, if present then the col will be Set to this scalar value
• vectorVal is the vector value, if present then the col will be Set to this vector value
• nodeFieldVal is the field of nodal values.

↢

Interface 6

܀ See Interface

INTERFACE
  SUBROUTINE setColumn(obj, globalNode, ivar, spacecompo, &
    & timecompo, scalarVal, vecVal, nodeFieldVal)
    CLASS(BlockMatrixField_), INTENT(INOUT) :: 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(IN) :: scalarVal
    REAL(DFP), OPTIONAL, INTENT(IN) :: vecVal(:)
    CLASS(AbstractNodeField_), OPTIONAL, INTENT(IN) :: nodeFieldVal
  END SUBROUTINE setColumn
END INTERFACE

This routine sets the col of a sparse matrix. The col index is calculated by using the globalNode, ivar and spacecompo, timecompo.

• globalNode is global node number.
• ivar is the physical variable number.
• spacecompo is the space component number.
• timecompo is the time component number.
• scalarVal is the scalar value, if present then the col will be Set to this scalar value
• vectorVal is the vector value, if present then the col will be Set to this vector value
• nodeFieldVal is the field of nodal values.

↢