timalObjectiveMatrixOfOneState, optimalEtaMatrixOfOneState ::
  (Vec.Walker varVec, Vec.Storage varVec a, Arith.Constant a,
   Ord a, Vec.Storage varVec (Maybe (Result a)), Vec.FromList varVec) =>
  Type.OptimalSolutionOfOneState node a ->
  Sig.PSignal2 Vector varVec a
optimalObjectiveMatrixOfOneState = optimalMatrixOfOneState ModUt.fst4
o
optimalObjectiveMatrixOfOneState, optimalEtaMatrixOfOneState ::
  (Vec.Walker varVec, Vec.Storage varVec a, Arith.Constant a,
   Ord a, Vec.Storage varVec (Maybe (Result a)), Vec.FromList varVec) =>
  Type.OptimalSolutionOfOneState node a ->
  Sig.PSignal2 Vector varVec a
optimalObjectiveMatrixOfOneState = optimalMatrixOfOneState ModUt.fst4
optimalObjectiveMatrixOfOneState = optimalMatrixOfOneState ModUt.fst4