Move stockDataCycle to StockModel in haskell.