SetUnits_Metadata Subroutine

public subroutine SetUnits_Metadata(mtd, units)

Arguments

TypeIntentOptionalAttributesName
class(Metadata), intent(inout) :: mtd
character, intent(in) :: units

Contents

Source Code


Source Code

  subroutine SetUnits_Metadata(mtd,units)
    implicit none
    class(Metadata),intent(inout) :: mtd
    character(*),intent(in) :: units

    mtd%units = units

  endsubroutine SetUnits_Metadata