module Json_command: Deriving_Json.Json with type a = command
Deriving_Json.Json
with type a = command