dbcsr_scalar_set_type Subroutine

public elemental subroutine dbcsr_scalar_set_type(scalar, data_type)

Sets data type of a scalar

Arguments

Type IntentOptional Attributes Name
type(dbcsr_scalar_type), intent(inout) :: scalar

scalar
integer, intent(in) :: data_type

Source Code

   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