---------------------------------------------------------------- -- Модуль приложения -- Графический интерфейс (UI) -- Утилиты ГИП ---------------------------------------------------------------- module WebUI.Themes.UIThemeUtils ( thC_03 , thC_02 , thC_01 , thC_00 , thC_0 , thC_1 , thC_2 , thC_3 , thC_Yl , thC_Or , thC_Rd , thC_Mg , thC_Vl , thC_Bl , thC_Cn , thC_Gr , thC ) where -- Импорт модулей import WebUI.Themes.UIThemeTypes -- | Цвета thC_03 :: (CUITheme t) => t -> ThParam -> String thC_03 t p = rndTh t p thC_02 :: (CUITheme t) => t -> ThParam -> String thC_02 t p = rndTh t p thC_01 :: (CUITheme t) => t -> ThParam -> String thC_01 t p = rndTh t p thC_00 :: (CUITheme t) => t -> ThParam -> String thC_00 t p = rndTh t p thC_0 :: (CUITheme t) => t -> ThParam -> String thC_0 t p = rndTh t p thC_1 :: (CUITheme t) => t -> ThParam -> String thC_1 t p = rndTh t p thC_2 :: (CUITheme t) => t -> ThParam -> String thC_2 t p = rndTh t p thC_3 :: (CUITheme t) => t -> ThParam -> String thC_3 t p = rndTh t p thC_Yl :: (CUITheme t) => t -> ThParam -> String thC_Yl t p = rndTh t p thC_Or :: (CUITheme t) => t -> ThParam -> String thC_Or t p = rndTh t p thC_Rd :: (CUITheme t) => t -> ThParam -> String thC_Rd t p = rndTh t p thC_Mg :: (CUITheme t) => t -> ThParam -> String thC_Mg t p = rndTh t p thC_Vl :: (CUITheme t) => t -> ThParam -> String thC_Vl t p = rndTh t p thC_Bl :: (CUITheme t) => t -> ThParam -> String thC_Bl t p = rndTh t p thC_Cn :: (CUITheme t) => t -> ThParam -> String thC_Cn t p = rndTh t p thC_Gr :: (CUITheme t) => t -> ThParam -> String thC_Gr t p = rndTh t p thC :: (CUITheme t) => t -> ThParam -> String thC t p = rndTh t p