diff options
Diffstat (limited to 'src/Example.hs')
| -rw-r--r-- | src/Example.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/Example.hs b/src/Example.hs index 795229c..6ce542e 100644 --- a/src/Example.hs +++ b/src/Example.hs @@ -18,7 +18,6 @@ import Language import Simplify import Debug.Trace -import Example.Format import Example.Types @@ -187,5 +186,5 @@ neuralGo = (primal', (((((), Just dlay1_1'), Just dlay2_1'), dlay3_1'), dinput_1')) -> (primal', dlay1_1', dlay2_1', dlay3_1', dinput_1') _ -> undefined (Value dinput_2 `SCons` Value dlay3_2 `SCons` Value dlay2_2 `SCons` Value dlay1_2 `SCons` SNil) = drevByFwd knownEnv neural argument 1.0 - in trace (formatter (ppExpr knownEnv revderiv)) $ + in trace (ppExpr knownEnv revderiv) $ (primal, (dlay1_1, dlay2_1, dlay3_1, dinput_1), (dlay1_2, dlay2_2, dlay3_2, dinput_2)) |