rainLinear :: (Sample a) => TRANSFORM.Transformed a -> Guesswork Linear
trainLinear (TRANSFORM.OnlyTrain train op trace) = do
    let solution = trainLinear' train
    return $ Linear solution op (trace ++ ",R=linear")

trainLinear :: (Sample a) => TRANSFORM.Transformed a -> Guesswork Linear
trainLinear (TRANSFORM.OnlyTrain train op trace) = do
    let solution = trainLinear' train
    return $ Linear solution op (trace ++ ",R=linear")
trainLinear (TRANSFORM.OnlyTrain train op trace) = do
    let solution = trainLinear' train
    return $ Linear solution op (trace ++ ",R=linear")