(defNew [&prop :Void->Void action &prop :ArrowDir dir] (super))