Universeval big_bang :
'w ->
to_draw:('w -> Bigbang.image) ->
?on_tick:('w -> 'w package) ->
?tick_rate:Playground.number ->
?on_key:('w -> string -> 'w package) ->
?on_mouse:
('w -> Playground.number -> Playground.number -> string -> 'w package) ->
?on_receive:('w -> string -> 'w package) ->
?stop_when:('w -> bool) ->
?register:string ->
?port:int ->
network:< Cap.network.. > ->
unit ->
('w world Playground.game, Playground.msg) Playground.app