definition module Shares.mTaskShare

import iTasks

:: MTaskShare = {
		initValue :: Int,
		withTask :: String,
		identifier :: Int,
		realShare :: String
	}

instance zero MTaskShare

manageShares :: [MTaskShare] -> Task ()