1open Wonka_types; 2 3type observableT('a); 4 5let fromObservable: (observableT('a), sinkT('a)) => unit; 6let toObservable: sourceT('a) => observableT('a);