Show newer

@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 Какая тебе разница? В роскомнадзоре радио-независимых господ пеленговали и обрабатывали ещё когда интернета не было и в проекте.

@darkcat09 Децентрализация уровня ICANN. Тем временем Mastodon требует HTTPS с доверенным сертификатом от товарища майора, так что через какой-нибудь Yggdrasil или другие децентрализованные сети работать не будет.

@itsfoss Every Debian user stands on the shoulders of Gentoo giants.

@Suiseiseki @SuperDicq It wasn't this cheap 40 years ago, where the coax ethernet belongs.

@mara Дизель сама производишь?

Рационально ли столько расходов для организации выживания в тайге, когда яхта дешевле, и её можно пригнать в тропики?

#? @rf
Как вы менеджите мелкооптовые закупки расходников? Нужно какое-то решение которое будет пинать меня когда у меня будут подходить к концу вещи типа витаминок, которые расходуются абсолютно предсказуемо, но заказывать нужно сильно заранее их исчерпания чтобы не возникло проблем из-за тормознутого магазина/почты/таможни/контрабандиста. Такое можно наговнякать за полчаса на любимом ЯП, но вдруг уже что-то готовое есть? Бонусные очки если оно умеет из истории реального расхода предсказывать когда запас иссякнет.

@mapto Ah, so issuing money and buying stuff with it is just a proxy for taking from your subjects directly. You can issue however many money, but the production capacity is limited, so whenever you spend, you make yourself richer and others using the currency poorer. Whether this is a problem more important than the other is the question for your political system control (whether the ruling party can attract votes with such and such policies for example). Or i didn't understand your question.

@dsalin @rf @Russia Купил немножко биткоинов, первой компьютерной валюты.

@mapto increasingly more money printed => money becomes less scarce => money becomes cheaper relative to scarcer things => people who are far from the printing press can't keep up with the increasing prices

@mapto @rf Yes, it's a red flag, although it doesn't provide anything contradicting to the things i knew from reference-enabled texts. It is an opinion piece, but still the most complete CVD prevention strategy i've yet seen. Apparently ApoB and inflammation stuff aren't yet accepted knowledge among health practitioners, and more likely to be wrong. TBH i'd add more about chronic inflammation side of atherosclerosis, but i got lost in papers when i tried to figure it out, and feel clueless facing the insane complexity of the immune system in general.

Show older
Qoto Mastodon

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