 ;;; --- Generated by genom 3.1. Do not edit ------------------------------

(

;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_saturation|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_saturation|
    :invocation (! (uavpos_set_saturation $mod $input))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_saturation
		   $input
		   $RqstId))
              (^ (FR $mod set_saturation $RqstId $report $output))
              (IF (? (~ (EQUAL $report OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in set_saturation: %d\n" $report)))
               ELSE
	         (=> (FR-OUTPUT $mod set_saturation $RqstId $output))
                 (~> (IR $mod set_saturation $RqstId $ACTID))
		 (~> (FR $mod set_saturation $RqstId $report $data))
                 (! (PRINTIF "RS: set_saturation reply OK\n"))
              )
            ELSE
              (! (PRINTIF "RS: Fail send set_saturation to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_saturation  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_saturation_input (sat (t_uavpos_ids_servo_s_sat_s (x $float_0) (v $float_1) (ix $float_2))))
or a VarArg of the form (VarArg  (sat.x <double>) (sat.v <double>) (sat.ix <double>))
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_saturation report|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_saturation report|
    :invocation (! (uavpos_set_saturation_report $mod $input $report))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_saturation
		   $input
		   $RqstId))
              (^ (FR $mod set_saturation $RqstId $report1 $output))
              (IF (? (~ (EQUAL $report1 OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in set_saturation: %d\n" $report1)))
               ELSE
	         (=> (FR-OUTPUT $mod set_saturation $RqstId $output))
                 (~> (IR $mod set_saturation $RqstId $ACTID))
		 (~> (FR $mod set_saturation $RqstId $report1 $data))
                 (! (PRINTIF "RS: set_saturation reply OK\n"))
		 )
	       (! (== $report $report1))
            ELSE
              (! (PRINTIF "RS: Fail send set_saturation to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_saturation  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_saturation_input (sat (t_uavpos_ids_servo_s_sat_s (x $float_0) (v $float_1) (ix $float_2))))
or a VarArg of the form (VarArg  (sat.x <double>) (sat.v <double>) (sat.ix <double>))
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_saturation async|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_saturation async|
    :invocation (! (uavpos_set_saturation_async $mod $input $RqstId))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_saturation
		   $input
		   $RqstId))
            ELSE
              (! (PRINTIF "RS: Fail send set_saturation to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_saturation $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_saturation_input (sat (t_uavpos_ids_servo_s_sat_s (x $float_0) (v $float_1) (ix $float_2))))
or a VarArg of the form (VarArg  (sat.x <double>) (sat.v <double>) (sat.ix <double>))
return nil"
)

;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_servo_gain|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_servo_gain|
    :invocation (! (uavpos_set_servo_gain $mod $input))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_servo_gain
		   $input
		   $RqstId))
              (^ (FR $mod set_servo_gain $RqstId $report $output))
              (IF (? (~ (EQUAL $report OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in set_servo_gain: %d\n" $report)))
               ELSE
	         (=> (FR-OUTPUT $mod set_servo_gain $RqstId $output))
                 (~> (IR $mod set_servo_gain $RqstId $ACTID))
		 (~> (FR $mod set_servo_gain $RqstId $report $data))
                 (! (PRINTIF "RS: set_servo_gain reply OK\n"))
              )
            ELSE
              (! (PRINTIF "RS: Fail send set_servo_gain to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_servo_gain  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_servo_gain_input (gain (t_uavpos_ids_servo_s_gain_s (Kpxy $float_0) (Kpz $float_1) (Kvxy $float_2) (Kvz $float_3) (Kixy $float_4) (Kiz $float_5))))
or a VarArg of the form (VarArg  (gain.Kpxy <double>) (gain.Kpz <double>) (gain.Kvxy <double>) (gain.Kvz <double>) (gain.Kixy <double>) (gain.Kiz <double>))
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_servo_gain report|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_servo_gain report|
    :invocation (! (uavpos_set_servo_gain_report $mod $input $report))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_servo_gain
		   $input
		   $RqstId))
              (^ (FR $mod set_servo_gain $RqstId $report1 $output))
              (IF (? (~ (EQUAL $report1 OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in set_servo_gain: %d\n" $report1)))
               ELSE
	         (=> (FR-OUTPUT $mod set_servo_gain $RqstId $output))
                 (~> (IR $mod set_servo_gain $RqstId $ACTID))
		 (~> (FR $mod set_servo_gain $RqstId $report1 $data))
                 (! (PRINTIF "RS: set_servo_gain reply OK\n"))
		 )
	       (! (== $report $report1))
            ELSE
              (! (PRINTIF "RS: Fail send set_servo_gain to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_servo_gain  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_servo_gain_input (gain (t_uavpos_ids_servo_s_gain_s (Kpxy $float_0) (Kpz $float_1) (Kvxy $float_2) (Kvz $float_3) (Kixy $float_4) (Kiz $float_5))))
or a VarArg of the form (VarArg  (gain.Kpxy <double>) (gain.Kpz <double>) (gain.Kvxy <double>) (gain.Kvz <double>) (gain.Kixy <double>) (gain.Kiz <double>))
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_servo_gain async|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_servo_gain async|
    :invocation (! (uavpos_set_servo_gain_async $mod $input $RqstId))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_servo_gain
		   $input
		   $RqstId))
            ELSE
              (! (PRINTIF "RS: Fail send set_servo_gain to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_servo_gain $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_servo_gain_input (gain (t_uavpos_ids_servo_s_gain_s (Kpxy $float_0) (Kpz $float_1) (Kvxy $float_2) (Kvz $float_3) (Kixy $float_4) (Kiz $float_5))))
or a VarArg of the form (VarArg  (gain.Kpxy <double>) (gain.Kpz <double>) (gain.Kvxy <double>) (gain.Kvz <double>) (gain.Kixy <double>) (gain.Kiz <double>))
return nil"
)

;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_mass|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_mass|
    :invocation (! (uavpos_set_mass $mod $input))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_mass
		   $input
		   $RqstId))
              (^ (FR $mod set_mass $RqstId $report $output))
              (IF (? (~ (EQUAL $report OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in set_mass: %d\n" $report)))
               ELSE
	         (=> (FR-OUTPUT $mod set_mass $RqstId $output))
                 (~> (IR $mod set_mass $RqstId $ACTID))
		 (~> (FR $mod set_mass $RqstId $report $data))
                 (! (PRINTIF "RS: set_mass reply OK\n"))
              )
            ELSE
              (! (PRINTIF "RS: Fail send set_mass to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_mass  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_mass_input (mass $float_0))
or a VarArg of the form (VarArg  (mass <double>))
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_mass report|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_mass report|
    :invocation (! (uavpos_set_mass_report $mod $input $report))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_mass
		   $input
		   $RqstId))
              (^ (FR $mod set_mass $RqstId $report1 $output))
              (IF (? (~ (EQUAL $report1 OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in set_mass: %d\n" $report1)))
               ELSE
	         (=> (FR-OUTPUT $mod set_mass $RqstId $output))
                 (~> (IR $mod set_mass $RqstId $ACTID))
		 (~> (FR $mod set_mass $RqstId $report1 $data))
                 (! (PRINTIF "RS: set_mass reply OK\n"))
		 )
	       (! (== $report $report1))
            ELSE
              (! (PRINTIF "RS: Fail send set_mass to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_mass  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_mass_input (mass $float_0))
or a VarArg of the form (VarArg  (mass <double>))
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_mass async|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_mass async|
    :invocation (! (uavpos_set_mass_async $mod $input $RqstId))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_mass
		   $input
		   $RqstId))
            ELSE
              (! (PRINTIF "RS: Fail send set_mass to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_mass $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_mass_input (mass $float_0))
or a VarArg of the form (VarArg  (mass <double>))
return nil"
)

;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_xyradius|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_xyradius|
    :invocation (! (uavpos_set_xyradius $mod $input))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_xyradius
		   $input
		   $RqstId))
              (^ (FR $mod set_xyradius $RqstId $report $output))
              (IF (? (~ (EQUAL $report OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in set_xyradius: %d\n" $report)))
               ELSE
	         (=> (FR-OUTPUT $mod set_xyradius $RqstId $output))
                 (~> (IR $mod set_xyradius $RqstId $ACTID))
		 (~> (FR $mod set_xyradius $RqstId $report $data))
                 (! (PRINTIF "RS: set_xyradius reply OK\n"))
              )
            ELSE
              (! (PRINTIF "RS: Fail send set_xyradius to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_xyradius  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_xyradius_input (rxy $float_0))
or a VarArg of the form (VarArg  (rxy <double>))
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_xyradius report|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_xyradius report|
    :invocation (! (uavpos_set_xyradius_report $mod $input $report))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_xyradius
		   $input
		   $RqstId))
              (^ (FR $mod set_xyradius $RqstId $report1 $output))
              (IF (? (~ (EQUAL $report1 OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in set_xyradius: %d\n" $report1)))
               ELSE
	         (=> (FR-OUTPUT $mod set_xyradius $RqstId $output))
                 (~> (IR $mod set_xyradius $RqstId $ACTID))
		 (~> (FR $mod set_xyradius $RqstId $report1 $data))
                 (! (PRINTIF "RS: set_xyradius reply OK\n"))
		 )
	       (! (== $report $report1))
            ELSE
              (! (PRINTIF "RS: Fail send set_xyradius to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_xyradius  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_xyradius_input (rxy $float_0))
or a VarArg of the form (VarArg  (rxy <double>))
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_xyradius async|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_xyradius async|
    :invocation (! (uavpos_set_xyradius_async $mod $input $RqstId))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_xyradius
		   $input
		   $RqstId))
            ELSE
              (! (PRINTIF "RS: Fail send set_xyradius to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_xyradius $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_xyradius_input (rxy $float_0))
or a VarArg of the form (VarArg  (rxy <double>))
return nil"
)

;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_emerg|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_emerg|
    :invocation (! (uavpos_set_emerg $mod $input))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_emerg
		   $input
		   $RqstId))
              (^ (FR $mod set_emerg $RqstId $report $output))
              (IF (? (~ (EQUAL $report OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in set_emerg: %d\n" $report)))
               ELSE
	         (=> (FR-OUTPUT $mod set_emerg $RqstId $output))
                 (~> (IR $mod set_emerg $RqstId $ACTID))
		 (~> (FR $mod set_emerg $RqstId $report $data))
                 (! (PRINTIF "RS: set_emerg reply OK\n"))
              )
            ELSE
              (! (PRINTIF "RS: Fail send set_emerg to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_emerg  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_emerg_input (emerg (t_uavpos_ids_servo_s_emerg_s (descent $float_0) (dx $float_1) (dv $float_2))))
or a VarArg of the form (VarArg  (emerg.descent <double>) (emerg.dx <double>) (emerg.dv <double>))
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_emerg report|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_emerg report|
    :invocation (! (uavpos_set_emerg_report $mod $input $report))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_emerg
		   $input
		   $RqstId))
              (^ (FR $mod set_emerg $RqstId $report1 $output))
              (IF (? (~ (EQUAL $report1 OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in set_emerg: %d\n" $report1)))
               ELSE
	         (=> (FR-OUTPUT $mod set_emerg $RqstId $output))
                 (~> (IR $mod set_emerg $RqstId $ACTID))
		 (~> (FR $mod set_emerg $RqstId $report1 $data))
                 (! (PRINTIF "RS: set_emerg reply OK\n"))
		 )
	       (! (== $report $report1))
            ELSE
              (! (PRINTIF "RS: Fail send set_emerg to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_emerg  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_emerg_input (emerg (t_uavpos_ids_servo_s_emerg_s (descent $float_0) (dx $float_1) (dv $float_2))))
or a VarArg of the form (VarArg  (emerg.descent <double>) (emerg.dx <double>) (emerg.dv <double>))
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_emerg async|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_emerg async|
    :invocation (! (uavpos_set_emerg_async $mod $input $RqstId))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_emerg
		   $input
		   $RqstId))
            ELSE
              (! (PRINTIF "RS: Fail send set_emerg to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_emerg $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_emerg_input (emerg (t_uavpos_ids_servo_s_emerg_s (descent $float_0) (dx $float_1) (dv $float_2))))
or a VarArg of the form (VarArg  (emerg.descent <double>) (emerg.dx <double>) (emerg.dv <double>))
return nil"
)

;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos get_servo_parameters|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos get_servo_parameters|
    :invocation (! (uavpos_get_servo_parameters $mod ))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod get_servo_parameters
		   $input
		   $RqstId))
              (^ (FR $mod get_servo_parameters $RqstId $report $output))
              (IF (? (~ (EQUAL $report OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in get_servo_parameters: %d\n" $report)))
               ELSE
	         (=> (FR-OUTPUT $mod get_servo_parameters $RqstId $output))
                 (~> (IR $mod get_servo_parameters $RqstId $ACTID))
		 (~> (FR $mod get_servo_parameters $RqstId $report $data))
                 (! (PRINTIF "RS: get_servo_parameters reply OK\n"))
              )
            ELSE
              (! (PRINTIF "RS: Fail send get_servo_parameters to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod get_servo_parameters  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return (uavpos_get_servo_parameters_output (servo (t_uavpos_ids_servo_s (sat (t_uavpos_ids_servo_s_sat_s (x $float_0) (v $float_1) (ix $float_2))) (gain (t_uavpos_ids_servo_s_gain_s (Kpxy $float_4) (Kpz $float_5) (Kvxy $float_6) (Kvz $float_7) (Kixy $float_8) (Kiz $float_9))) (emerg (t_uavpos_ids_servo_s_emerg_s (descent $float_11) (dx $float_12) (dv $float_13))))))"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos get_servo_parameters report|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos get_servo_parameters report|
    :invocation (! (uavpos_get_servo_parameters_report $mod  $report))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod get_servo_parameters
		   $input
		   $RqstId))
              (^ (FR $mod get_servo_parameters $RqstId $report1 $output))
              (IF (? (~ (EQUAL $report1 OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in get_servo_parameters: %d\n" $report1)))
               ELSE
	         (=> (FR-OUTPUT $mod get_servo_parameters $RqstId $output))
                 (~> (IR $mod get_servo_parameters $RqstId $ACTID))
		 (~> (FR $mod get_servo_parameters $RqstId $report1 $data))
                 (! (PRINTIF "RS: get_servo_parameters reply OK\n"))
		 )
	       (! (== $report $report1))
            ELSE
              (! (PRINTIF "RS: Fail send get_servo_parameters to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod get_servo_parameters  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return (uavpos_get_servo_parameters_output (servo (t_uavpos_ids_servo_s (sat (t_uavpos_ids_servo_s_sat_s (x $float_0) (v $float_1) (ix $float_2))) (gain (t_uavpos_ids_servo_s_gain_s (Kpxy $float_4) (Kpz $float_5) (Kvxy $float_6) (Kvz $float_7) (Kixy $float_8) (Kiz $float_9))) (emerg (t_uavpos_ids_servo_s_emerg_s (descent $float_11) (dx $float_12) (dv $float_13))))))"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos get_servo_parameters async|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos get_servo_parameters async|
    :invocation (! (uavpos_get_servo_parameters_async $mod  $RqstId))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod get_servo_parameters
		   $input
		   $RqstId))
            ELSE
              (! (PRINTIF "RS: Fail send get_servo_parameters to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod get_servo_parameters $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return (uavpos_get_servo_parameters_output (servo (t_uavpos_ids_servo_s (sat (t_uavpos_ids_servo_s_sat_s (x $float_0) (v $float_1) (ix $float_2))) (gain (t_uavpos_ids_servo_s_gain_s (Kpxy $float_4) (Kpz $float_5) (Kvxy $float_6) (Kvz $float_7) (Kixy $float_8) (Kiz $float_9))) (emerg (t_uavpos_ids_servo_s_emerg_s (descent $float_11) (dx $float_12) (dv $float_13))))))"
)

;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos get_body_parameters|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos get_body_parameters|
    :invocation (! (uavpos_get_body_parameters $mod ))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod get_body_parameters
		   $input
		   $RqstId))
              (^ (FR $mod get_body_parameters $RqstId $report $output))
              (IF (? (~ (EQUAL $report OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in get_body_parameters: %d\n" $report)))
               ELSE
	         (=> (FR-OUTPUT $mod get_body_parameters $RqstId $output))
                 (~> (IR $mod get_body_parameters $RqstId $ACTID))
		 (~> (FR $mod get_body_parameters $RqstId $report $data))
                 (! (PRINTIF "RS: get_body_parameters reply OK\n"))
              )
            ELSE
              (! (PRINTIF "RS: Fail send get_body_parameters to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod get_body_parameters  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return (uavpos_get_body_parameters_output (body (t_uavpos_ids_body_s (mass $float_0) (rxy $float_1))))"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos get_body_parameters report|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos get_body_parameters report|
    :invocation (! (uavpos_get_body_parameters_report $mod  $report))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod get_body_parameters
		   $input
		   $RqstId))
              (^ (FR $mod get_body_parameters $RqstId $report1 $output))
              (IF (? (~ (EQUAL $report1 OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in get_body_parameters: %d\n" $report1)))
               ELSE
	         (=> (FR-OUTPUT $mod get_body_parameters $RqstId $output))
                 (~> (IR $mod get_body_parameters $RqstId $ACTID))
		 (~> (FR $mod get_body_parameters $RqstId $report1 $data))
                 (! (PRINTIF "RS: get_body_parameters reply OK\n"))
		 )
	       (! (== $report $report1))
            ELSE
              (! (PRINTIF "RS: Fail send get_body_parameters to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod get_body_parameters  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return (uavpos_get_body_parameters_output (body (t_uavpos_ids_body_s (mass $float_0) (rxy $float_1))))"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos get_body_parameters async|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos get_body_parameters async|
    :invocation (! (uavpos_get_body_parameters_async $mod  $RqstId))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod get_body_parameters
		   $input
		   $RqstId))
            ELSE
              (! (PRINTIF "RS: Fail send get_body_parameters to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod get_body_parameters $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return (uavpos_get_body_parameters_output (body (t_uavpos_ids_body_s (mass $float_0) (rxy $float_1))))"
)

;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos get_reference|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos get_reference|
    :invocation (! (uavpos_get_reference $mod ))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod get_reference
		   $input
		   $RqstId))
              (^ (FR $mod get_reference $RqstId $report $output))
              (IF (? (~ (EQUAL $report OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in get_reference: %d\n" $report)))
               ELSE
	         (=> (FR-OUTPUT $mod get_reference $RqstId $output))
                 (~> (IR $mod get_reference $RqstId $ACTID))
		 (~> (FR $mod get_reference $RqstId $report $data))
                 (! (PRINTIF "RS: get_reference reply OK\n"))
              )
            ELSE
              (! (PRINTIF "RS: Fail send get_reference to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod get_reference  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return (uavpos_get_reference_output (reference (t_or_rigid_body_state (ts (t_or_time_ts (sec $long_0) (nsec $long_1))) (intrinsic $bool_3) (pos $optional_4) (att $optional_5) (vel $optional_6) (avel $optional_7) (acc $optional_8) (aacc $optional_9) (jerk $optional_10) (snap $optional_11))))"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos get_reference report|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos get_reference report|
    :invocation (! (uavpos_get_reference_report $mod  $report))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod get_reference
		   $input
		   $RqstId))
              (^ (FR $mod get_reference $RqstId $report1 $output))
              (IF (? (~ (EQUAL $report1 OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in get_reference: %d\n" $report1)))
               ELSE
	         (=> (FR-OUTPUT $mod get_reference $RqstId $output))
                 (~> (IR $mod get_reference $RqstId $ACTID))
		 (~> (FR $mod get_reference $RqstId $report1 $data))
                 (! (PRINTIF "RS: get_reference reply OK\n"))
		 )
	       (! (== $report $report1))
            ELSE
              (! (PRINTIF "RS: Fail send get_reference to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod get_reference  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return (uavpos_get_reference_output (reference (t_or_rigid_body_state (ts (t_or_time_ts (sec $long_0) (nsec $long_1))) (intrinsic $bool_3) (pos $optional_4) (att $optional_5) (vel $optional_6) (avel $optional_7) (acc $optional_8) (aacc $optional_9) (jerk $optional_10) (snap $optional_11))))"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos get_reference async|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos get_reference async|
    :invocation (! (uavpos_get_reference_async $mod  $RqstId))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod get_reference
		   $input
		   $RqstId))
            ELSE
              (! (PRINTIF "RS: Fail send get_reference to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod get_reference $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return (uavpos_get_reference_output (reference (t_or_rigid_body_state (ts (t_or_time_ts (sec $long_0) (nsec $long_1))) (intrinsic $bool_3) (pos $optional_4) (att $optional_5) (vel $optional_6) (avel $optional_7) (acc $optional_8) (aacc $optional_9) (jerk $optional_10) (snap $optional_11))))"
)

;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos servo|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos servo|
    :invocation (! (uavpos_servo $mod ))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod servo
		   $input
		   $RqstId))
              (^ (FR $mod servo $RqstId $report $output))
              (IF (? (~ (EQUAL $report OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in servo: %d\n" $report)))
               ELSE
	         (=> (FR-OUTPUT $mod servo $RqstId $output))
                 (~> (IR $mod servo $RqstId $ACTID))
		 (~> (FR $mod servo $RqstId $report $data))
                 (! (PRINTIF "RS: servo reply OK\n"))
              )
            ELSE
              (! (PRINTIF "RS: Fail send servo to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod servo  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos servo report|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos servo report|
    :invocation (! (uavpos_servo_report $mod  $report))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod servo
		   $input
		   $RqstId))
              (^ (FR $mod servo $RqstId $report1 $output))
              (IF (? (~ (EQUAL $report1 OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in servo: %d\n" $report1)))
               ELSE
	         (=> (FR-OUTPUT $mod servo $RqstId $output))
                 (~> (IR $mod servo $RqstId $ACTID))
		 (~> (FR $mod servo $RqstId $report1 $data))
                 (! (PRINTIF "RS: servo reply OK\n"))
		 )
	       (! (== $report $report1))
            ELSE
              (! (PRINTIF "RS: Fail send servo to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod servo  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos servo async|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos servo async|
    :invocation (! (uavpos_servo_async $mod  $RqstId))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod servo
		   $input
		   $RqstId))
            ELSE
              (! (PRINTIF "RS: Fail send servo to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod servo $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return nil"
)

;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_state|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_state|
    :invocation (! (uavpos_set_state $mod $input))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_state
		   $input
		   $RqstId))
              (^ (FR $mod set_state $RqstId $report $output))
              (IF (? (~ (EQUAL $report OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in set_state: %d\n" $report)))
               ELSE
	         (=> (FR-OUTPUT $mod set_state $RqstId $output))
                 (~> (IR $mod set_state $RqstId $ACTID))
		 (~> (FR $mod set_state $RqstId $report $data))
                 (! (PRINTIF "RS: set_state reply OK\n"))
              )
            ELSE
              (! (PRINTIF "RS: Fail send set_state to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_state  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_state_input (pos (t_or_t3d_pos (x $float_0) (y $float_1) (z $float_2))) (att (t_or_t3d_att (qw $float_4) (qx $float_5) (qy $float_6) (qz $float_7))) (vel (t_or_t3d_vel (vx $float_9) (vy $float_10) (vz $float_11))) (avel (t_or_t3d_avel (wx $float_13) (wy $float_14) (wz $float_15))) (acc (t_or_t3d_acc (ax $float_17) (ay $float_18) (az $float_19))) (aacc (t_or_t3d_aacc (awx $float_21) (awy $float_22) (awz $float_23))) (jerk (t_or_t3d_jerk (jx $float_25) (jy $float_26) (jz $float_27))) (snap (t_or_t3d_snap (sx $float_29) (sy $float_30) (sz $float_31))))
or a VarArg of the form (VarArg  (pos.x <double>) (pos.y <double>) (pos.z <double>) (att.qw <double>) (att.qx <double>) (att.qy <double>) (att.qz <double>) (vel.vx <double>) (vel.vy <double>) (vel.vz <double>) (avel.wx <double>) (avel.wy <double>) (avel.wz <double>) (acc.ax <double>) (acc.ay <double>) (acc.az <double>) (aacc.awx <double>) (aacc.awy <double>) (aacc.awz <double>) (jerk.jx <double>) (jerk.jy <double>) (jerk.jz <double>) (snap.sx <double>) (snap.sy <double>) (snap.sz <double>))
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_state report|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_state report|
    :invocation (! (uavpos_set_state_report $mod $input $report))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_state
		   $input
		   $RqstId))
              (^ (FR $mod set_state $RqstId $report1 $output))
              (IF (? (~ (EQUAL $report1 OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in set_state: %d\n" $report1)))
               ELSE
	         (=> (FR-OUTPUT $mod set_state $RqstId $output))
                 (~> (IR $mod set_state $RqstId $ACTID))
		 (~> (FR $mod set_state $RqstId $report1 $data))
                 (! (PRINTIF "RS: set_state reply OK\n"))
		 )
	       (! (== $report $report1))
            ELSE
              (! (PRINTIF "RS: Fail send set_state to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_state  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_state_input (pos (t_or_t3d_pos (x $float_0) (y $float_1) (z $float_2))) (att (t_or_t3d_att (qw $float_4) (qx $float_5) (qy $float_6) (qz $float_7))) (vel (t_or_t3d_vel (vx $float_9) (vy $float_10) (vz $float_11))) (avel (t_or_t3d_avel (wx $float_13) (wy $float_14) (wz $float_15))) (acc (t_or_t3d_acc (ax $float_17) (ay $float_18) (az $float_19))) (aacc (t_or_t3d_aacc (awx $float_21) (awy $float_22) (awz $float_23))) (jerk (t_or_t3d_jerk (jx $float_25) (jy $float_26) (jz $float_27))) (snap (t_or_t3d_snap (sx $float_29) (sy $float_30) (sz $float_31))))
or a VarArg of the form (VarArg  (pos.x <double>) (pos.y <double>) (pos.z <double>) (att.qw <double>) (att.qx <double>) (att.qy <double>) (att.qz <double>) (vel.vx <double>) (vel.vy <double>) (vel.vz <double>) (avel.wx <double>) (avel.wy <double>) (avel.wz <double>) (acc.ax <double>) (acc.ay <double>) (acc.az <double>) (aacc.awx <double>) (aacc.awy <double>) (aacc.awz <double>) (jerk.jx <double>) (jerk.jy <double>) (jerk.jz <double>) (snap.sx <double>) (snap.sy <double>) (snap.sz <double>))
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_state async|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_state async|
    :invocation (! (uavpos_set_state_async $mod $input $RqstId))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_state
		   $input
		   $RqstId))
            ELSE
              (! (PRINTIF "RS: Fail send set_state to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_state $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_state_input (pos (t_or_t3d_pos (x $float_0) (y $float_1) (z $float_2))) (att (t_or_t3d_att (qw $float_4) (qx $float_5) (qy $float_6) (qz $float_7))) (vel (t_or_t3d_vel (vx $float_9) (vy $float_10) (vz $float_11))) (avel (t_or_t3d_avel (wx $float_13) (wy $float_14) (wz $float_15))) (acc (t_or_t3d_acc (ax $float_17) (ay $float_18) (az $float_19))) (aacc (t_or_t3d_aacc (awx $float_21) (awy $float_22) (awz $float_23))) (jerk (t_or_t3d_jerk (jx $float_25) (jy $float_26) (jz $float_27))) (snap (t_or_t3d_snap (sx $float_29) (sy $float_30) (sz $float_31))))
or a VarArg of the form (VarArg  (pos.x <double>) (pos.y <double>) (pos.z <double>) (att.qw <double>) (att.qx <double>) (att.qy <double>) (att.qz <double>) (vel.vx <double>) (vel.vy <double>) (vel.vz <double>) (avel.wx <double>) (avel.wy <double>) (avel.wz <double>) (acc.ax <double>) (acc.ay <double>) (acc.az <double>) (aacc.awx <double>) (aacc.awy <double>) (aacc.awz <double>) (jerk.jx <double>) (jerk.jy <double>) (jerk.jz <double>) (snap.sx <double>) (snap.sy <double>) (snap.sz <double>))
return nil"
)

;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_position|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_position|
    :invocation (! (uavpos_set_position $mod $input))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_position
		   $input
		   $RqstId))
              (^ (FR $mod set_position $RqstId $report $output))
              (IF (? (~ (EQUAL $report OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in set_position: %d\n" $report)))
               ELSE
	         (=> (FR-OUTPUT $mod set_position $RqstId $output))
                 (~> (IR $mod set_position $RqstId $ACTID))
		 (~> (FR $mod set_position $RqstId $report $data))
                 (! (PRINTIF "RS: set_position reply OK\n"))
              )
            ELSE
              (! (PRINTIF "RS: Fail send set_position to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_position  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_position_input (x $float_0) (y $float_1) (z $float_2) (yaw $float_3))
or a VarArg of the form (VarArg  (x <double>) (y <double>) (z <double>) (yaw <double>))
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_position report|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_position report|
    :invocation (! (uavpos_set_position_report $mod $input $report))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_position
		   $input
		   $RqstId))
              (^ (FR $mod set_position $RqstId $report1 $output))
              (IF (? (~ (EQUAL $report1 OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in set_position: %d\n" $report1)))
               ELSE
	         (=> (FR-OUTPUT $mod set_position $RqstId $output))
                 (~> (IR $mod set_position $RqstId $ACTID))
		 (~> (FR $mod set_position $RqstId $report1 $data))
                 (! (PRINTIF "RS: set_position reply OK\n"))
		 )
	       (! (== $report $report1))
            ELSE
              (! (PRINTIF "RS: Fail send set_position to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_position  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_position_input (x $float_0) (y $float_1) (z $float_2) (yaw $float_3))
or a VarArg of the form (VarArg  (x <double>) (y <double>) (z <double>) (yaw <double>))
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_position async|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_position async|
    :invocation (! (uavpos_set_position_async $mod $input $RqstId))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_position
		   $input
		   $RqstId))
            ELSE
              (! (PRINTIF "RS: Fail send set_position to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_position $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_position_input (x $float_0) (y $float_1) (z $float_2) (yaw $float_3))
or a VarArg of the form (VarArg  (x <double>) (y <double>) (z <double>) (yaw <double>))
return nil"
)

;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_current_position|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_current_position|
    :invocation (! (uavpos_set_current_position $mod ))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_current_position
		   $input
		   $RqstId))
              (^ (FR $mod set_current_position $RqstId $report $output))
              (IF (? (~ (EQUAL $report OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in set_current_position: %d\n" $report)))
               ELSE
	         (=> (FR-OUTPUT $mod set_current_position $RqstId $output))
                 (~> (IR $mod set_current_position $RqstId $ACTID))
		 (~> (FR $mod set_current_position $RqstId $report $data))
                 (! (PRINTIF "RS: set_current_position reply OK\n"))
              )
            ELSE
              (! (PRINTIF "RS: Fail send set_current_position to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_current_position  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_current_position report|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_current_position report|
    :invocation (! (uavpos_set_current_position_report $mod  $report))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_current_position
		   $input
		   $RqstId))
              (^ (FR $mod set_current_position $RqstId $report1 $output))
              (IF (? (~ (EQUAL $report1 OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in set_current_position: %d\n" $report1)))
               ELSE
	         (=> (FR-OUTPUT $mod set_current_position $RqstId $output))
                 (~> (IR $mod set_current_position $RqstId $ACTID))
		 (~> (FR $mod set_current_position $RqstId $report1 $data))
                 (! (PRINTIF "RS: set_current_position reply OK\n"))
		 )
	       (! (== $report $report1))
            ELSE
              (! (PRINTIF "RS: Fail send set_current_position to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_current_position  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_current_position async|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_current_position async|
    :invocation (! (uavpos_set_current_position_async $mod  $RqstId))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_current_position
		   $input
		   $RqstId))
            ELSE
              (! (PRINTIF "RS: Fail send set_current_position to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_current_position $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return nil"
)

;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_velocity|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_velocity|
    :invocation (! (uavpos_set_velocity $mod $input))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_velocity
		   $input
		   $RqstId))
              (^ (FR $mod set_velocity $RqstId $report $output))
              (IF (? (~ (EQUAL $report OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in set_velocity: %d\n" $report)))
               ELSE
	         (=> (FR-OUTPUT $mod set_velocity $RqstId $output))
                 (~> (IR $mod set_velocity $RqstId $ACTID))
		 (~> (FR $mod set_velocity $RqstId $report $data))
                 (! (PRINTIF "RS: set_velocity reply OK\n"))
              )
            ELSE
              (! (PRINTIF "RS: Fail send set_velocity to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_velocity  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_velocity_input (x $float_0) (y $float_1) (z $float_2) (yaw $float_3))
or a VarArg of the form (VarArg  (x <double>) (y <double>) (z <double>) (yaw <double>))
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_velocity report|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_velocity report|
    :invocation (! (uavpos_set_velocity_report $mod $input $report))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_velocity
		   $input
		   $RqstId))
              (^ (FR $mod set_velocity $RqstId $report1 $output))
              (IF (? (~ (EQUAL $report1 OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in set_velocity: %d\n" $report1)))
               ELSE
	         (=> (FR-OUTPUT $mod set_velocity $RqstId $output))
                 (~> (IR $mod set_velocity $RqstId $ACTID))
		 (~> (FR $mod set_velocity $RqstId $report1 $data))
                 (! (PRINTIF "RS: set_velocity reply OK\n"))
		 )
	       (! (== $report $report1))
            ELSE
              (! (PRINTIF "RS: Fail send set_velocity to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_velocity  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_velocity_input (x $float_0) (y $float_1) (z $float_2) (yaw $float_3))
or a VarArg of the form (VarArg  (x <double>) (y <double>) (z <double>) (yaw <double>))
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos set_velocity async|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos set_velocity async|
    :invocation (! (uavpos_set_velocity_async $mod $input $RqstId))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod set_velocity
		   $input
		   $RqstId))
            ELSE
              (! (PRINTIF "RS: Fail send set_velocity to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod set_velocity $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_set_velocity_input (x $float_0) (y $float_1) (z $float_2) (yaw $float_3))
or a VarArg of the form (VarArg  (x <double>) (y <double>) (z <double>) (yaw <double>))
return nil"
)

;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos hover|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos hover|
    :invocation (! (uavpos_hover $mod ))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod hover
		   $input
		   $RqstId))
              (^ (FR $mod hover $RqstId $report $output))
              (IF (? (~ (EQUAL $report OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in hover: %d\n" $report)))
               ELSE
	         (=> (FR-OUTPUT $mod hover $RqstId $output))
                 (~> (IR $mod hover $RqstId $ACTID))
		 (~> (FR $mod hover $RqstId $report $data))
                 (! (PRINTIF "RS: hover reply OK\n"))
              )
            ELSE
              (! (PRINTIF "RS: Fail send hover to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod hover  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos hover report|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos hover report|
    :invocation (! (uavpos_hover_report $mod  $report))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod hover
		   $input
		   $RqstId))
              (^ (FR $mod hover $RqstId $report1 $output))
              (IF (? (~ (EQUAL $report1 OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in hover: %d\n" $report1)))
               ELSE
	         (=> (FR-OUTPUT $mod hover $RqstId $output))
                 (~> (IR $mod hover $RqstId $ACTID))
		 (~> (FR $mod hover $RqstId $report1 $data))
                 (! (PRINTIF "RS: hover reply OK\n"))
		 )
	       (! (== $report $report1))
            ELSE
              (! (PRINTIF "RS: Fail send hover to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod hover  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos hover async|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos hover async|
    :invocation (! (uavpos_hover_async $mod  $RqstId))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod hover
		   $input
		   $RqstId))
            ELSE
              (! (PRINTIF "RS: Fail send hover to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod hover $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return nil"
)

;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos reset|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos reset|
    :invocation (! (uavpos_reset $mod ))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod reset
		   $input
		   $RqstId))
              (^ (FR $mod reset $RqstId $report $output))
              (IF (? (~ (EQUAL $report OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in reset: %d\n" $report)))
               ELSE
	         (=> (FR-OUTPUT $mod reset $RqstId $output))
                 (~> (IR $mod reset $RqstId $ACTID))
		 (~> (FR $mod reset $RqstId $report $data))
                 (! (PRINTIF "RS: reset reply OK\n"))
              )
            ELSE
              (! (PRINTIF "RS: Fail send reset to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod reset  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos reset report|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos reset report|
    :invocation (! (uavpos_reset_report $mod  $report))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod reset
		   $input
		   $RqstId))
              (^ (FR $mod reset $RqstId $report1 $output))
              (IF (? (~ (EQUAL $report1 OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in reset: %d\n" $report1)))
               ELSE
	         (=> (FR-OUTPUT $mod reset $RqstId $output))
                 (~> (IR $mod reset $RqstId $ACTID))
		 (~> (FR $mod reset $RqstId $report1 $data))
                 (! (PRINTIF "RS: reset reply OK\n"))
		 )
	       (! (== $report $report1))
            ELSE
              (! (PRINTIF "RS: Fail send reset to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod reset  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos reset async|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos reset async|
    :invocation (! (uavpos_reset_async $mod  $RqstId))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod reset
		   $input
		   $RqstId))
            ELSE
              (! (PRINTIF "RS: Fail send reset to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod reset $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return nil"
)

;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos log|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos log|
    :invocation (! (uavpos_log $mod $input))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod log
		   $input
		   $RqstId))
              (^ (FR $mod log $RqstId $report $output))
              (IF (? (~ (EQUAL $report OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in log: %d\n" $report)))
               ELSE
	         (=> (FR-OUTPUT $mod log $RqstId $output))
                 (~> (IR $mod log $RqstId $ACTID))
		 (~> (FR $mod log $RqstId $report $data))
                 (! (PRINTIF "RS: log reply OK\n"))
              )
            ELSE
              (! (PRINTIF "RS: Fail send log to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod log  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_log_input (path $string64_0) (decimation $ulong_1))
or a VarArg of the form (VarArg  (path <string64>) (decimation <unsigned_long>))
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos log report|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos log report|
    :invocation (! (uavpos_log_report $mod $input $report))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod log
		   $input
		   $RqstId))
              (^ (FR $mod log $RqstId $report1 $output))
              (IF (? (~ (EQUAL $report1 OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in log: %d\n" $report1)))
               ELSE
	         (=> (FR-OUTPUT $mod log $RqstId $output))
                 (~> (IR $mod log $RqstId $ACTID))
		 (~> (FR $mod log $RqstId $report1 $data))
                 (! (PRINTIF "RS: log reply OK\n"))
		 )
	       (! (== $report $report1))
            ELSE
              (! (PRINTIF "RS: Fail send log to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod log  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_log_input (path $string64_0) (decimation $ulong_1))
or a VarArg of the form (VarArg  (path <string64>) (decimation <unsigned_long>))
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos log async|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos log async|
    :invocation (! (uavpos_log_async $mod $input $RqstId))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod log
		   $input
		   $RqstId))
            ELSE
              (! (PRINTIF "RS: Fail send log to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod log $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect (uavpos_log_input (path $string64_0) (decimation $ulong_1))
or a VarArg of the form (VarArg  (path <string64>) (decimation <unsigned_long>))
return nil"
)

;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos log_stop|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos log_stop|
    :invocation (! (uavpos_log_stop $mod ))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod log_stop
		   $input
		   $RqstId))
              (^ (FR $mod log_stop $RqstId $report $output))
              (IF (? (~ (EQUAL $report OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in log_stop: %d\n" $report)))
               ELSE
	         (=> (FR-OUTPUT $mod log_stop $RqstId $output))
                 (~> (IR $mod log_stop $RqstId $ACTID))
		 (~> (FR $mod log_stop $RqstId $report $data))
                 (! (PRINTIF "RS: log_stop reply OK\n"))
              )
            ELSE
              (! (PRINTIF "RS: Fail send log_stop to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod log_stop  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos log_stop report|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos log_stop report|
    :invocation (! (uavpos_log_stop_report $mod  $report))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod log_stop
		   $input
		   $RqstId))
              (^ (FR $mod log_stop $RqstId $report1 $output))
              (IF (? (~ (EQUAL $report1 OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in log_stop: %d\n" $report1)))
               ELSE
	         (=> (FR-OUTPUT $mod log_stop $RqstId $output))
                 (~> (IR $mod log_stop $RqstId $ACTID))
		 (~> (FR $mod log_stop $RqstId $report1 $data))
                 (! (PRINTIF "RS: log_stop reply OK\n"))
		 )
	       (! (== $report $report1))
            ELSE
              (! (PRINTIF "RS: Fail send log_stop to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod log_stop  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return nil"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos log_stop async|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos log_stop async|
    :invocation (! (uavpos_log_stop_async $mod  $RqstId))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod log_stop
		   $input
		   $RqstId))
            ELSE
              (! (PRINTIF "RS: Fail send log_stop to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod log_stop $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return nil"
)

;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos log_info|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos log_info|
    :invocation (! (uavpos_log_info $mod ))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod log_info
		   $input
		   $RqstId))
              (^ (FR $mod log_info $RqstId $report $output))
              (IF (? (~ (EQUAL $report OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in log_info: %d\n" $report)))
               ELSE
	         (=> (FR-OUTPUT $mod log_info $RqstId $output))
                 (~> (IR $mod log_info $RqstId $ACTID))
		 (~> (FR $mod log_info $RqstId $report $data))
                 (! (PRINTIF "RS: log_info reply OK\n"))
              )
            ELSE
              (! (PRINTIF "RS: Fail send log_info to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod log_info  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return (uavpos_log_info_output (miss $ulong_0) (total $ulong_1))"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos log_info report|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos log_info report|
    :invocation (! (uavpos_log_info_report $mod  $report))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod log_info
		   $input
		   $RqstId))
              (^ (FR $mod log_info $RqstId $report1 $output))
              (IF (? (~ (EQUAL $report1 OK)))
                 (! (PRINTIFF (FORMAT "RS: BAD report in log_info: %d\n" $report1)))
               ELSE
	         (=> (FR-OUTPUT $mod log_info $RqstId $output))
                 (~> (IR $mod log_info $RqstId $ACTID))
		 (~> (FR $mod log_info $RqstId $report1 $data))
                 (! (PRINTIF "RS: log_info reply OK\n"))
		 )
	       (! (== $report $report1))
            ELSE
              (! (PRINTIF "RS: Fail send log_info to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod log_info  $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return (uavpos_log_info_output (miss $ulong_0) (total $ulong_1))"
)
;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos log_info async|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos log_info async|
    :invocation (! (uavpos_log_info_async $mod  $RqstId))
    :body ((IF (! (RS-SEND-G3-REQUEST $mod log_info
		   $input
		   $RqstId))
            ELSE
              (! (PRINTIF "RS: Fail send log_info to $mod\n"))
	      (=> (RS-SEND-G3-REQUEST-ERROR $mod log_info $input $RqstId))
	      (! (FAILED))
           )
          )
  :documentation "Expect nil
or a VarArg of the form (VarArg )
return (uavpos_log_info_output (miss $ulong_0) (total $ulong_1))"
)


;;;;;;;;;;;;;;;;;;;;;;;;;
;;; |uavpos uav_input|
;;;;;;;;;;;;;;;;;;;;;;;;;
(defop |uavpos uav_input|
    :invocation (! (read_uavpos_uav_input $mod))
    :body ((IF (! (READ-PORT-INTERNAL $mod uav_input $data))
	      (=> (uavpos_uav_input $mod $data))    	     
            ELSE  
              (! (PRINTIF "RS: Fail reading port uav_input from $mod\n"))
	      (! (FAILED))
           ))
 :documentation "Read uav_input and store (uavpos_uav_input uavpos (uavpos_uav_input (t_or_uav_input (ts (t_or_time_ts (sec $long_0) (nsec $long_1))) (intrinsic $bool_3) (thrust $optional_4) (att $optional_5) (avel $optional_6) (aacc $optional_7))))"
)


(defop |Make New uavpos Module| 
:invocation (! (Make_New_uavpos_Module $MOD-NAME))
:action (MAKE-NEW-UAVPOS-MODULE $MOD-NAME)
:documentation "This action will create a new instance of a uavpos module named $MOD-NAME."
)
)
