set_vnmult Subroutine

public subroutine set_vnmult(vnmult_in)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in),		dimension(2)	::	vnmult_in

Contents

Source Code

set_vnmult

Source Code

  subroutine set_vnmult(vnmult_in)
    real, dimension(2), intent(in) :: vnmult_in
    vnmult = vnmult_in
  end subroutine set_vnmult