Skip to content

Commit

Permalink
:go-pos-unsafe for kinematic simulation
Browse files Browse the repository at this point in the history
  • Loading branch information
knorth55 committed Nov 22, 2022
1 parent ee8662b commit 934b47a
Showing 1 changed file with 6 additions and 0 deletions.
6 changes: 6 additions & 0 deletions jsk_fetch_robot/fetcheus/fetch-interface.l
Original file line number Diff line number Diff line change
Expand Up @@ -415,18 +415,24 @@ Example: (send self :gripper :position) => 0.00"
t)
(:go-pos-unsafe
(x y d &rest args) ;; [m] [m] [degree]
(if (send self :simulation-modep)
(return-from :go-pos-unsafe (send-super* :go-pos-unsafe x y d args)))
(send self :put :go-pos-unsafe-no-wait-goal (float-vector x y d))
(send* self :go-pos-unsafe-wait args)
t)
(:go-pos-unsafe-no-wait
(x y &optional (d 0)) ;; [m] [m] [degree]
(if (send self :simulation-modep)
(return-from :go-pos-unsafe-no-wait (send-super :go-pos-unsafe-no-wait x y d)))
(ros::ros-warn ":go-pos-unsafe-no-wait is not supported for this robot.")
(send self :put :go-pos-unsafe-no-wait-goal (float-vector x y d))
t)
(:go-pos-unsafe-wait
(&key (translation-threshold 0.05) (rotation-threshold (deg2rad 5))
(translation-gain 1.0) (rotation-gain 1.0)
(min-translation-abs-vel 0.3) (min-rotation-abs-vel 0.8))
(if (send self :simulation-modep)
(return-from :go-pos-unsafe-wait (send-super :go-pos-unsafe-wait)))
(unless (send self :get :go-pos-unsafe-no-wait-goal)
(ros::ros-error ":go-pos-unsafe-wait is called without goal")
(return-from :go-pos-unsafe-wait nil))
Expand Down

0 comments on commit 934b47a

Please sign in to comment.