Show newer

@akamar @rf Как в hledger сделать прогноз срока исчерпания запасов?

@kirill На всякий случай скажу что жарка - это превращение еды в яд.

@drq @amicalucis @lnkr Ох уж эти имперцы, всегда у них свой особый чёткий культурно-государственный контекст который уметь надо чтобы с ними общаться.

L29Ah boosted

Ran into a problem in prod?
Just generate a fake cloudflare error page and blame it on them - gives you time to fix.

github.com/donlon/cloudflare-e

#foss #devops #cloudflare #infosec

@lnkr @drq @amicalucis Я сейчас на коленке прикинул, оценив население Азии и наличие свастик в публичных местах, в первую очередь на картах и постройках, а также похуизм в отношении Европы среди населения остальной планеты. Как контраргумент к заявке в которой нет вообще никаких подсчётов ни в каком виде сойдёт, а на истину в последней инстанции я не претендую.

@drq @amicalucis @lnkr Подавляющее большинство людей любит свастику, особенно азиаты; ебанулись конкретно европейцы.

L29Ah boosted

@amicalucis @rf Думаю лучше не жить там где набутыливают за edgy значок на одежде.

@hcf @lenka @rf @msfconsole Я в курсе, иначе бы не эмигрировал. Но в целом не факт что вообще какое-либо общество устойчиво перед тоталитарными структурами карающими за низовую организацию.

@rf Наговнякал по-быстрому:

#!/usr/bin/runhaskell
import Data.Maybe
import Data.Time.Calendar.OrdinalDate
import Data.Time.Format.ISO8601

data Stock = Stock
{ name :: String
, perDay :: Double
, startingDay :: Day
, stockItems :: Word
} deriving (Show)

dayOut :: Stock -> Day
dayOut s = toEnum (fromEnum (startingDay s) + floor ((fromIntegral $ stockItems s) / (perDay s)))

runsOut :: Stock -> String
runsOut s = name s ++ " runs out at " ++ show (dayOut s)

vitA = Stock
"Vitamin A"
(1 / 3.5) -- twice a week (10kIU capsules)
(fromJust $ iso8601ParseM "2025-12-22")
(floor $ 81 / 0.6) -- 600mg brutto per capsule

vitB = Stock
"Vitamin B"
(1 / 3.5)
(fromJust $ iso8601ParseM "2025-12-22")
73

vitK = Stock
"Vitamin K"
(4 / 7) -- about once every two days (200μg tablets MK-7)
(fromJust $ iso8601ParseM "2025-12-24")
(floor $ 27 / 0.108)

main = putStr $ unlines $ map runsOut [vitA, vitB, vitK]

Show thread

@stanislavv заходишь в интернет - "впереди опять всё перекопали"

@admin @rf Если решил таким заниматься, то лучше рассмотри оптический диапазон, инфракрасный желательно.

@admin @rf Какая тебе разница? В роскомнадзоре радио-независимых господ пеленговали и обрабатывали ещё когда интернета не было и в проекте.

Show older
Qoto Mastodon

QOTO: Question Others to Teach Ourselves
An inclusive, Academic Freedom, instance
All cultures welcome.
Hate speech and harassment strictly forbidden.