classdef Vector < handle 

  properties 
    origin
    target
  end 

  methods

    function obj = Vector(origin, target)
      obj.origin = origin;
      obj.target = target;
    end

    function set.origin(obj, value)
      assert(isequal(size(value),[1,3]),"Origin must be a 1x3 double array")
      obj.origin = value;
    end

    function set.target(obj, value)
      assert(isequal(size(value),[1,3]),"Target must be a 1x3 double array")
      obj.target = value;
    end

    function output = points(obj)
      output = [obj.origin; obj.target];
    end

    function output = vector(obj)
      output = obj.target - obj.origin;
    end

    function output = norm(obj)
      output = norm(obj.vector);
    end

    function output = direction(obj)
      output = obj.vector / obj.norm;
    end

    function output = uminus(obj)
      output = Vector(obj.target, obj.origin);
    end

    function output = plus(obj, addedVector)
      if isequal(class(addedVector),"Vector")
        output = Vector(obj.origin, obj.target + addedVector.vector);
      elseif isequal(size(addedVector),[1,3])
        output = Vector(obj.origin, obj.target + addedVector);
      end
    end
    
    function output = minus(obj, substractedVector)
      if isequal(class(substractedVector),"Vector")
        output = obj + -substractedVector;
      elseif isequal(size(substractedVector),[1,3])
        output = Vector(obj.origin, obj.origin - substractedVector);
      end
    end

    function output = mtimes(left,right)
      if isequal(class(left),"Vector")
        vectorObject = left;
        coefficient = right;
      else
        vectorObject = right;
        coefficient = left;
      end
      output = Vector(vectorObject.origin, vectorObject.origin + coefficient*vectorObject.vector);
    end

  end

end