mirror of
https://github.com/paparazzi/paparazzi.git
synced 2026-05-21 20:04:09 +08:00
Pascal Brisset
26 lines
712 B
OCaml
26 lines
712 B
OCaml
(** Options for HITL and SITL simulators *)
|
|
val common_options : (string * Arg.spec * string) list
|
|
|
|
val ac_name : string ref
|
|
|
|
(** A complete aircraft with it mission *)
|
|
module type AIRCRAFT =
|
|
sig
|
|
val init : int -> GPack.box -> unit
|
|
val boot : Stdlib.value -> unit
|
|
val commands : Stdlib.pprz_t array -> unit
|
|
val infrared : float -> float -> float -> float -> unit
|
|
val gps : Gps.state -> unit
|
|
end
|
|
|
|
(** A simulated aircraft, without its conf *)
|
|
module type AIRCRAFT_ITL =
|
|
functor (A : Data.MISSION) -> functor (FM: FlightModel.SIG) -> AIRCRAFT
|
|
|
|
(** Functor to build the simulator *)
|
|
module Make :
|
|
functor (AircraftItl : AIRCRAFT_ITL) ->
|
|
sig
|
|
val main : unit -> unit
|
|
end
|