;;; Union, With Renamed Variant

module campaign is

  union VehicleClass of
    Car
    Boat as WaterCar
  end

end