So, I took some measurements with calipers, just listening for when the switch clicked (shown below.)

meas <- read.csv('../COTS/ZFswitches/switchStats.csv')

sdMargin <- 8
peapodSlop <- 1.1
flight.free <- mean(meas$t) + sdMargin*sd(meas$t) 
flight.flushSlop <- mean(meas$t) - sdMargin*sd(meas$t)
flight.flush <- flight.flushSlop-1.1
 
flight.free <-  round(flight.free, 1)
flight.flushSlop <-  round(flight.flushSlop, 1)
flight.flush <- round(flight.flush, 1)

It seems like the spread between the relevant positions is large enough compared to the standard deviation that we don’t really need to worry about the statistics of switch production. I set this to give us a comfy \(8\sigma\) margin around the switch trigger.

If you need to shrink that interval, try to keep it centered around 12.33.