SetMetadata_LinearEuler3D_t Subroutine

  subroutine SetMetadata_LinearEuler3D_t(this)
    implicit none
    class(LinearEuler3D_t),intent(inout) :: this

    call this%solution%SetName(1,"u") ! x-velocity component
    call this%solution%SetUnits(1,"m⋅s⁻¹")

    call this%solution%SetName(2,"v") ! y-velocity component
    call this%solution%SetUnits(2,"m⋅s⁻¹")

    call this%solution%SetName(3,"w") ! z-velocity component
    call this%solution%SetUnits(3,"m⋅s⁻¹")

    call this%solution%SetName(4,"P") ! Pressure
    call this%solution%SetUnits(4,"kg⋅m⁻¹⋅s⁻²")

    call this%solution%SetName(5,"c") ! Sound speed (static; possibly heterogeneous)
    call this%solution%SetUnits(5,"m⋅s⁻¹")

    call this%solution%SetName(6,"rho0") ! Background density (static; possibly heterogeneous)
    call this%solution%SetUnits(6,"kg⋅m⁻³")

  endsubroutine SetMetadata_LinearEuler3D_t