diff --git a/.gitmodules b/.gitmodules new file mode 100644 index 0000000..5cac3e5 --- /dev/null +++ b/.gitmodules @@ -0,0 +1,3 @@ +[submodule "paper"] + path = paper + url = https://git@git.overleaf.com/65c0de00fe99eea78a9ac0df diff --git a/paper b/paper new file mode 160000 index 0000000..f69ec93 --- /dev/null +++ b/paper @@ -0,0 +1 @@ +Subproject commit f69ec93db93c2277168a64e0ecebfa22880cb6ee diff --git a/scratchpads/lists.tidal b/scratchpads/lists.tidal index fe56a0f..5e7e969 100644 --- a/scratchpads/lists.tidal +++ b/scratchpads/lists.tidal @@ -7,10 +7,13 @@ import BatteryData d1 $ s "bd" --- Yes, i know this is not optimal... -getFloat x = maybe 0.0 id (readMaybe x :: Maybe Float) +getNum value scalar = fromInteger $ round $ (maybe 0.0 id (readMaybe value :: Maybe Float)) * scalar +let temperatureScalar = 10 +d1 $ fast 10 $ n (fromList (map (\x -> getNum x 10) (map (\x -> snd x) (take 100 temperaturedata))) |- 120 ) # s "superpiano" --- Do something audible with the temperature data for the first time ever d1 $ fast 10 $ n (fromList (map (\x -> fromInteger (round ((getFloat x)*10))) (map (\x -> snd x) (take 100 temperaturedata)))) # s "jvbass" # room 0.5 # delay 0.7 -d2 $ fast 10 $ n (fromList (map (\x -> fromInteger (round ((getFloat x)*5))) (map (\x -> snd x) (take 100 humiditydata)))) # s "arpy" # room 0.5 # delay 0.7 \ No newline at end of file +d2 $ fast 10 $ n (fromList (map (\x -> fromInteger (round ((getFloat x)*5))) (map (\x -> snd x) (take 100 humiditydata)))) # s "arpy" # room 0.5 # delay 0.7 + + +:t map (\x -> getMaybeFloat (snd x)) (take 100 temperaturedata) \ No newline at end of file