(defisland
  ()
  (let
    ((price (def-store "demo-price" (fn () (signal 19.99)))))
    (div
      (~tw :tokens "rounded-lg border border-emerald-200 bg-emerald-50 p-4")
      (div
        (~tw :tokens "flex items-center justify-between")
        (div
          (~tw :tokens "flex items-center gap-2")
          (span
            (~tw :tokens "text-sm font-semibold text-emerald-800")
            "Island B: Product Display")
          (span
            (~tw :tokens "text-xs bg-emerald-200 text-emerald-700 px-1.5 py-0.5 rounded font-mono")
            "use-store"))
        (div
          (~tw :tokens "flex items-center gap-2")
          (span (~tw :tokens "text-stone-600") "Current price:")
          (span (~tw :tokens "text-2xl font-bold text-stone-800") "$" (deref price))))
      (p
        (~tw :tokens "text-xs text-emerald-600 mt-2")
        "Separate island, reads the same store. Signal changes propagate instantly across island boundaries."))))
