reactive-fieldtrip 0.0.5 → 0.0.7

raw patch · 2 files changed

+5/−5 lines, 2 filesdep +InfixApplicativedep ~reactive

Dependencies added: InfixApplicative

Dependency ranges changed: reactive

Files

• reactive-fieldtrip.cabal +2/−2
• src/Test.hs +3/−3

@@ -1,5 +1,5 @@ Name:                reactive-fieldtrip-Version:             0.0.5+Version:             0.0.7 Cabal-Version:       >= 1.2 Synopsis:            Connect Reactive and FieldTrip Category:            Graphics, FRP@@ -23,7 +23,7 @@ Library   hs-Source-Dirs:      src   Extensions:-  Build-Depends:       base, reactive >= 0.9.5, reactive-glut >= 0.0.4, FieldTrip >= 0.2.1, vector-space+  Build-Depends:       base, reactive >= 0.10.1, reactive-glut >= 0.0.4, FieldTrip >= 0.2.1, vector-space, InfixApplicative   Exposed-Modules:                             FRP.Reactive.FieldTrip                        FRP.Reactive.FieldTrip.Adapter

@@ -100,7 +100,7 @@  -- Drop a ball on each event occurrence drops' :: Event (Vector3 Double) -> Event () -> Behavior Geometry3-drops' starts tick = monoidB (g <$> (starts `snapRemainderE` tick))+drops' starts tick = monoidB (g <$> (tick `snapRemainderE` starts))  where    g0              = uscale3 (0.3 :: R) *% torusPair    g (start,tick') = f <$> integral tick' (integral tick' acc)@@ -110,7 +110,7 @@  -- Drop a ball from the mouse on each left button press. ldrops :: Anim3-ldrops = liftA2 drops' (liftA2 snapshot_ leftButtonPressed mouseMotion)+ldrops = liftA2 drops' (liftA2 snapshot_ mouseMotion leftButtonPressed)                        framePass  -- ldrops ui =@@ -125,7 +125,7 @@  -- Drop a ball from the mouse on each left button press. lplace :: Anim3-lplace = place <$> liftA2 snapshot_ leftButtonPressed mouseMotion+lplace = place <$> liftA2 snapshot_ mouseMotion leftButtonPressed  -- lplace ui = place (leftButtonPressed ui `snapshot_` mouseMotion ui)