ReMotion.re

module ReMotionConfig = {
type state = | Open | Closed;
  
  let animateForState = fun | Open => [opacity(1)] | Closed => [opacity(0)];
};

module Motion = ReMotion.Make(ReMotionConfig);

<Motion state=Closed>
 ...(({ style, setState, state, transitioning }) => {
   <Modal visible=(switch(state, transitioning) => { (Closed, false) => false | _ => true }) onRequestClose=(() => setState(Closed))>
    <Animated.View style=Style.combine(Styles.wrapper, style)>
    <Animated.View>
   </Modal>
 })
</Motion>