Calc Swede

{
  "acetowhiteness": 2,
  "citation": {
    "authors": "Strander B, Ellström-Andersson A, Franzén S, Milsom I, Rådberg T",
    "doi": "10.1111/j.0001-6349.2005.00895.x",
    "id": "strander-2005",
    "pmid": "16181155",
    "source": "Acta Obstet Gynecol Scand. 2005;84(10):1013-1017",
    "title": "The performance of a new scoring system for colposcopy in detecting high-grade dysplasia in the uterine cervix"
  },
  "components": [
    {
      "factor": "acetowhiteness",
      "points": 2,
      "present": true,
      "value": 2
    },
    {
      "factor": "margins_surface",
      "points": 2,
      "present": true,
      "value": 2
    },
    {
      "factor": "vessels",
      "points": 1,
      "present": true,
      "value": 1
    },
    {
      "factor": "lesion_size",
      "points": 1,
      "present": true,
      "value": 1
    },
    {
      "factor": "iodine",
      "points": 2,
      "present": true,
      "value": 2
    }
  ],
  "disclaimer": "Not a medical device. Deterministic published-formula or published-code output for autonomous agents. A licensed clinician remains responsible for patient care and billing submissions.",
  "formula": "swede",
  "formula_expression": "Swede = acetowhiteness + margins_surface + vessels + lesion_size + iodine; each caller-assigned 0-2 (Strander 2005 Table I final rounded weights); max 10; bands <5, 5-7, >=8",
  "iodine": 2,
  "lesion_size": 1,
  "margins_surface": 2,
  "max_score": 10,
  "score": 8,
  "swede_band": ">=8",
  "vessels": 1
}

# bash or zsh: see the payment challenge. Nothing is charged.
curl -sS -g -i 'https://api.magentlab.com/api/calc/swede?acetowhiteness=2&iodine=2&lesion_size=1&margins_surface=2&vessels=1'

# x402 v2 sends the challenge base64-encoded in the PAYMENT-REQUIRED header (v1 sends it in the body).
# To read the header:
curl -sS -g -o /dev/null -D - 'https://api.magentlab.com/api/calc/swede?acetowhiteness=2&iodine=2&lesion_size=1&margins_surface=2&vessels=1' \
  | grep -i '^payment-required:' | cut -d' ' -f2 | tr -d '\r' | base64 --decode

// npm i @x402/fetch @x402/evm viem
import { wrapFetchWithPayment, x402Client } from "@x402/fetch";
import { registerExactEvmScheme } from "@x402/evm/exact/client";
import { privateKeyToAccount } from "viem/accounts";

// Pays at most $0.005 per call.
const client = new x402Client().setSpendControls({ maxAmountPerPayment: "$0.005" });
registerExactEvmScheme(client, { signer: privateKeyToAccount(process.env.EVM_PRIVATE_KEY) });
const pay = wrapFetchWithPayment(fetch, client);

// Not sure it's safe to pay? ToolVet checks it first for $0.005. Pay for that from a separate
// client: this one is capped at $0.005 per payment. GET https://toolvet.app/api/v1/check?url=https%3A%2F%2Fapi.magentlab.com%2Fapi%2Fcalc%2Fswede
const res = await pay("https://api.magentlab.com/api/calc/swede?acetowhiteness=2&iodine=2&lesion_size=1&margins_surface=2&vessels=1");
console.log(res.status, await res.text());

# pip install "x402[requests,evm]"
import os
from eth_account import Account
from x402 import x402ClientSync
from x402.http.clients import x402_requests
from x402.mechanisms.evm import EthAccountSigner
from x402.mechanisms.evm.exact.register import register_exact_evm_client

# Pays at most $0.005 per call.
client = x402ClientSync().set_spend_controls({"max_amount_per_payment": "$0.005"})
register_exact_evm_client(client, EthAccountSigner(Account.from_key(os.environ["EVM_PRIVATE_KEY"])))

with x402_requests(client) as session:
    res = session.get("https://api.magentlab.com/api/calc/swede?acetowhiteness=2&iodine=2&lesion_size=1&margins_surface=2&vessels=1")
    print(res.status_code, res.text)