Models by ozziegooen

// Golden Rice Counterfactual Model
// Estimates lives saved if Golden Rice had been approved globally in 2005

// Forked from https://squigglehub.org/models/Abi/goldenrice

import "hub:ozziegooen/sTest" as sTest
// == Model Parameters ==

// == Model Parameters ==

/*
Generated by Squiggle AI. Workflow ID: 168d0158-1934-49d1-9972-32851ae39b32
*/
import "hub:ozziegooen/sTest" as sTest

// Democracy Preservation vs. AI Safety Funding Analysis
// This model examines the relative cost-effectiveness of funding
// democratic election interventions vs. AI safety interventions

// == Core Parameters ==

/*
Generated by Squiggle AI. Workflow ID: 99576ba5-db94-4528-b1ec-233b5c8520f7
*/
// Model to estimate impact of $5k/year UBI on US labor supply

import "hub:ozziegooen/sTest" as sTest



@name("Key Model Inputs")

/*
Describe your code here
*/

a = normal(2, 5)
b = a + 10
c = 10 to 30

/*
Generated by Squiggle AI. Workflow ID: d1a02066-595f-4d9c-94cc-8f286037eb9d
*/
import "hub:ozziegooen/sTest" as sTest

// == Model Inputs ==
inputs = {
  @name("🏭 Industry Adaptation Costs (€)")
  @doc(
    "Investment costs for switching to tethered caps, based on industry estimates"

import "hub:ozziegooen/sTest" as sTest

@name("Workshop Cost-Benefit Analysis")
inputs = {
  @name("Number of attendees")
  @doc("Fixed at 10 people per requirements")
  attendees = 10

  @name("Workshop duration (hours)")
  @doc("Fixed at 1 hour per requirements")

/*
How long does it take to read different books?
How much does that cost, in counterfactual value, assuming that reading time is counterfactually valuable?

This is a very simple table of estimates. Inspired by a previous Guesstimate model.
*/
@hide
cost(wpm, valuePerHour, words) = {
  wordsPerHour = wpm * 120
  words * (valuePerHour / wordsPerHour)

import "hub:ozziegooen/helpers" as helpers
/*
Repurposed from this Guesstimate model:
https://www.getguesstimate.com/models/187

Different dangerous activities feature different expected chances of dying.
It's hard to estimate exactly how bad dying is, but one metric we can use is to
instead consider how many hours in expectation risky events will cost you.

For instance, something that has a 1/4 chance of killing you, can be

// Model to estimate QALYs saved from autonomous vehicles
import "hub:ozziegooen/sTest" as sTest

// == Model Inputs ==
@name("Key Model Parameters")
inputs = {
  @doc(
    "Annual driving hours in US (2019). Highly uncertain due to:
    - COVID/remote work changes
    - Different measurement methodologies

// Note: Most of this was AI-generated, using Squiggle AI
// Cost-benefit analysis of AI vs. human driving

import "hub:ozziegooen/sTest" as sTest

@name("🚗 Key Input Parameters")
inputs = {
  // Safety parameters
  currentDeathsPer100kDrivers = 10 to 12
  aiSafetyImprovement = mx([0.9 to 0.99, 0.5 to 0.9], [0.9, 0.1]) // Main estimate with skeptical prior

import "hub:ozziegooen/sTest" as sTest
@hide
test = sTest.test
@hide
expect = sTest.expect
@hide
describe = sTest.describe

@hide
styleSquiggleCode(code) = "

/*
Optimized Squiggle Code
*/

ss(t) = SampleSet.fromDist(t) // SampleSet function for distributions

// Animal Module Definition
animalModule = {
  // Sentient Welfare Parameters
  average_qaly_per_year = ss(0.7 to 0.9)

@startOpen
@name("Documentation")
documentation = "
# SquiggleJest Testing Library

SquiggleJest is a simple testing library for Squiggle, inspired by Jest for JavaScript. It provides a way to write and run tests for your Squiggle models and functions.

## How to Use

1. Import the library (assuming it's in a file named 'squiggleJest.squiggle'):

binomialSample(trials, probability) = trials == 0 ? 0 : List(
  trials,
  {|| sample(Sym.bernoulli(sample(Dist(probability))))}
)
  -> sum

_mxChoose(fns, prob) = fns[mx(List.upTo(0, List.length(fns) - 1), prob)
  -> sample
  -> round]

@name("Charging Efficiency % (A Constant)")
chargingEfficiency = 0.7 to 0.9

@name("Fn: Cost to Charge Battery Once")
costToCharge(batteryCapacity, electricityRate, chargingEfficiency) = {
  loadInkWh = batteryCapacity / 1000
  chargeCost = loadInkWh * electricityRate / chargingEfficiency
  chargeCost
}

wordsPerMinute = 110 to 150

// cost per person
// cost per event
// cost per person per word
// cost per event per word

event(numberOfPeople, costPerHour, hours, hoursofPrep) = numberOfPeople *
  costPerHour *
  (hours + hoursofPrep)

/*
Describe your code here
*/

f(t) = t * 20

import "hub:ozziegooen/sTest" as sTest
// This is me messing around with AI-generated Squiggle code. This likely has severe problems!
// Cost-Benefit Analysis for a New Factory Construction Project

// Helper function to calculate net present value
npv(cashFlows, discountRate) = List.reduceWhile(
  cashFlows,
  { value: 0, year: 0 },
  {
    |acc, flow|

export examples = [
  "ozziegooen/virus-model",
  "ozziegooen/meeting-cost-calculator",
  "ozziegooen/laptop-battery-cost",
  "ozziegooen/wells-riley-model",
  "ozziegooen/shapley-values",
  "ozziegooen/AI-safety-company-factors",
  "ozziegooen/ev-agi-to-individuals",
  "ozziegooen/costs-of-computer-use",
  "ozziegooen/costs-of-sfo-to-uk-flight-claude",

@name("Charging efficiency")
@doc("Power lost when charging")
chargingEfficiency = 0.7 to 0.9

// Calculate cost
@hide
costToCharge(batteryCapacity, electricityRate, chargingEfficiency) = {
  loadInkWh = batteryCapacity / 1000
  costPerkWh = electricityRate
  chargeCost = loadInkWh * costPerkWh / chargingEfficiency