Sets data type of a scalar
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(dbcsr_scalar_type), | intent(inout) | :: | scalar |
scalar |
||
integer, | intent(in) | :: | data_type |
ELEMENTAL SUBROUTINE dbcsr_scalar_set_type(scalar, data_type)
!! Sets data type of a scalar
TYPE(dbcsr_scalar_type), INTENT(INOUT) :: scalar
!! scalar
INTEGER, INTENT(IN) :: data_type
scalar%data_type = data_type
END SUBROUTINE dbcsr_scalar_set_type