BinderScriptScript

Furnace: Differentiable Tensor Programming Made Simple

Furnace is a tensor library with support for differentiable programming. It is designed for use in machine learning, probabilistic programming, optimization and other domains.

Key Features

🗹 Nested and mixed-mode differentiation

🗹 Common optimizers, model elements, differentiable probability distributions

🗹 F# for robust functional programming

🗹 PyTorch familiar naming and idioms, efficient LibTorch CUDA/C++ tensors with GPU support

🗹 Linux, macOS, Windows supported

🗹 Use interactive notebooks in Jupyter and Visual Studio Code

🗹 100% open source

Differentiable Programming

Furnace provides world-leading automatic differentiation capabilities for tensor code, including composable gradients, Hessians, Jacobians, directional derivatives, and matrix-free Hessian- and Jacobian-vector products over arbitrary user code. This goes beyond conventional tensor libraries such as PyTorch and TensorFlow, allowing the use of nested forward and reverse differentiation up to any level.

With Furnace, you can compute higher-order derivatives efficiently and differentiate functions that are internally making use of differentiation and gradient-based optimization.


Practical, Familiar and Efficient

Furnace comes with a LibTorch backend, using the same C++ and CUDA implementations for tensor computations that power PyTorch. On top of these raw tensors (LibTorch's ATen, excluding autograd), Furnace implements its own computation graph and differentiation capabilities. It is tested on Linux, macOS, and Windows, and it supports CUDA and GPUs.

The Furnace API is designed to be similar to the PyTorch Python API through very similar naming and idioms, and where elements have similar names the PyTorch documentation can generally be used as a guide.

Furnace uses the incredible F# programming language for tensor programming. F# code is generally faster and more robust than equivalent Python code, while still being succinct and compact like Python, making it an ideal modern AI and machine learning implementation language. This allows fluent and productive code for tensor programming.


Interactive Notebooks

All documentation pages in this website are interactive notebooks which you can execute directly in your browser without installing anything in your local machine.

Using the Binder on the top of each page, you can execute the page as an interactive notebook running on cloud servers provided by Google Colab.

Using the buttons Script Script you can also download a page as a script or an interactive notebook, which you can execute locally in Jupyter or Visual Studio Code using dotnet interactive.

Example

Define and add two tensors:

open Furnace

let t1 = FurnaceImage.tensor [ 0.0 ..0.2.. 1.0 ] // Gives [0., 0.2, 0.4, 0.6, 0.8, 1.]
let t2 = FurnaceImage.tensor [ 1, 2, 3, 4, 5, 6 ]

t1 + t2
No value returned by any evaluator

Compute a convolution:

let t3 = FurnaceImage.tensor [[[[0.0 .. 10.0]]]]
let t4 = FurnaceImage.tensor [[[[0.0 ..0.1.. 1.0]]]]

t3.conv2d(t4)
No value returned by any evaluator

Take the gradient of a vector-to-scalar function:

let f (x: Tensor) = x.exp().sum()

FurnaceImage.grad f (FurnaceImage.tensor([1.8, 2.5]))
No value returned by any evaluator

Compute a nested derivative (checking for perturbation confusion):

let x0 = FurnaceImage.tensor(1.)
let y0 = FurnaceImage.tensor(2.)
FurnaceImage.diff (fun x -> x * FurnaceImage.diff (fun y -> x * y) y0) x0
No value returned by any evaluator

Define a model and optimize it:

open Furnace
open Furnace.Data
open Furnace.Model
open Furnace.Compose
open Furnace.Util
open Furnace.Optim

let epochs = 2
let batchSize = 32
let numBatches = 5

let trainSet = MNIST("../data", train=true, transform=id)
let trainLoader = trainSet.loader(batchSize=batchSize, shuffle=true)

let validSet = MNIST("../data", train=false, transform=id)
let validLoader = validSet.loader(batchSize=batchSize, shuffle=false)

let encoder =
    Conv2d(1, 32, 4, 2)
    --> FurnaceImage.relu
    --> Conv2d(32, 64, 4, 2)
    --> FurnaceImage.relu
    --> Conv2d(64, 128, 4, 2)
    --> FurnaceImage.flatten(1)

let decoder =
    FurnaceImage.unflatten(1, [128;1;1])
    --> ConvTranspose2d(128, 64, 4, 2)
    --> FurnaceImage.relu
    --> ConvTranspose2d(64, 32, 4, 3)
    --> FurnaceImage.relu
    --> ConvTranspose2d(32, 1, 4, 2)
    --> FurnaceImage.sigmoid

let model = VAE([1;28;28], 64, encoder, decoder)

let lr = FurnaceImage.tensor(0.001)
let optimizer = Adam(model, lr=lr)

for epoch = 1 to epochs do
    let batches = trainLoader.epoch(numBatches)
    for i, x, _ in batches do
        model.reverseDiff()
        let l = model.loss(x)
        l.reverse()
        optimizer.step()
        print $"Epoch: {epoch} minibatch: {i} loss: {l}" 

let validLoss = 
    validLoader.epoch() 
    |> Seq.sumBy (fun (_, x, _) -> model.loss(x, normalize=false))
print $"Validation loss: {validLoss/validSet.length}"

Numerous other model definition, differentiation, and training patterns are supported. See the tutorials in the left-hand menu and examples on GitHub.

More Information

Furnace is developed by Atılım Güneş Baydin, Don Syme and other contributors, having started as a project supervised by the automatic differentiation wizards Barak Pearlmutter and Jeffrey Siskind.

Please join us on GitHub!

namespace Furnace
type FurnaceImage = static member abs: input: Tensor -> Tensor static member acos: input: Tensor -> Tensor static member add: a: Tensor * b: Tensor -> Tensor static member arange: endVal: float * ?startVal: float * ?step: float * ?device: Device * ?dtype: Dtype * ?backend: Backend -> Tensor + 1 overload static member arangeLike: input: Tensor * endVal: float * ?startVal: float * ?step: float * ?device: Device * ?dtype: Dtype * ?backend: Backend -> Tensor + 1 overload static member argmax: input: Tensor -> int array + 1 overload static member argmin: input: Tensor -> int array + 1 overload static member asin: input: Tensor -> Tensor static member atan: input: Tensor -> Tensor static member backends: unit -> Backend list ...
<summary> Tensor operations </summary>
static member FurnaceImage.config: unit -> Device * Dtype * Backend * Printer
static member FurnaceImage.config: configuration: (Device * Dtype * Backend * Printer) -> unit
static member FurnaceImage.config: ?device: Device * ?dtype: Dtype * ?backend: Backend * ?printer: Printer -> unit
Multiple items
module Backend from Furnace
<summary> Contains functions and settings related to backend specifications. </summary>

--------------------
type Backend = | Reference | Torch | Other of name: string * code: int override ToString: unit -> string member Name: string
<summary> Represents a backend for Furnace tensors </summary>
union case Backend.Reference: Backend
<summary> The reference backend </summary>
static member FurnaceImage.seed: ?seed: int -> unit
val t1: Tensor
static member FurnaceImage.tensor: value: obj * ?device: Device * ?dtype: Dtype * ?backend: Backend -> Tensor
val t2: Tensor
val t3: Tensor
val t4: Tensor
val f: x: Tensor -> Tensor
val x: Tensor
type Tensor = private | TensorC of primalRaw: RawTensor | TensorF of primal: Tensor * derivative: Tensor * nestingTag: uint32 | TensorR of primal: Tensor * derivative: Tensor ref * parentOp: TensorOp * fanout: uint32 ref * nestingTag: uint32 interface IConvertible interface IComparable override Equals: other: obj -> bool override GetHashCode: unit -> int member GetSlice: bounds: int array2d -> Tensor override ToString: unit -> string member abs: unit -> Tensor member acos: unit -> Tensor member add: b: Tensor -> Tensor + 1 overload member addSlice: location: int seq * b: Tensor -> Tensor ...
<summary> Represents a multi-dimensional data type containing elements of a single data type. </summary>
<example> A tensor can be constructed from a list or sequence using <see cref="M:Furnace.FurnaceImage.tensor(System.Object)" /><code> let t = FurnaceImage.tensor([[1.; -1.]; [1.; -1.]]) </code></example>
static member FurnaceImage.grad: f: (Tensor -> Tensor) -> x: Tensor -> Tensor
val x0: Tensor
val y0: Tensor
static member FurnaceImage.diff: f: (Tensor -> Tensor) -> x: Tensor -> Tensor
val y: Tensor
namespace Furnace.Data
namespace Furnace.Model
module Compose from Furnace
namespace Furnace.Util
namespace Furnace.Optim
val epochs: int
val batchSize: int
val numBatches: int
val trainSet: MNIST
Multiple items
type MNIST = inherit Dataset new: path: string * ?urls: string seq * ?train: bool * ?transform: (Tensor -> Tensor) * ?targetTransform: (Tensor -> Tensor) * ?n: int -> MNIST override item: i: int -> Tensor * Tensor member classNames: string array member classes: int override length: int

--------------------
new: path: string * ?urls: string seq * ?train: bool * ?transform: (Tensor -> Tensor) * ?targetTransform: (Tensor -> Tensor) * ?n: int -> MNIST
val id: x: 'T -> 'T
val trainLoader: DataLoader
member Dataset.loader: batchSize: int * ?shuffle: bool * ?dropLast: bool * ?device: Device * ?dtype: Dtype * ?backend: Backend * ?targetDevice: Device * ?targetDtype: Dtype * ?targetBackend: Backend -> DataLoader
val validSet: MNIST
val validLoader: DataLoader
val encoder: Model<Tensor,Tensor>
Multiple items
type Conv2d = inherit Model new: inChannels: int * outChannels: int * ?kernelSize: int * ?stride: int * ?padding: int * ?dilation: int * ?kernelSizes: int seq * ?strides: int seq * ?paddings: int seq * ?dilations: int seq * ?bias: bool -> Conv2d override ToString: unit -> string override forward: value: Tensor -> Tensor member bias: Tensor with get, set member weight: Tensor with get, set
<summary>A model that applies a 2D convolution over an input signal composed of several input planes</summary>

--------------------
new: inChannels: int * outChannels: int * ?kernelSize: int * ?stride: int * ?padding: int * ?dilation: int * ?kernelSizes: int seq * ?strides: int seq * ?paddings: int seq * ?dilations: int seq * ?bias: bool -> Conv2d
static member FurnaceImage.relu: input: Tensor -> Tensor
static member FurnaceImage.flatten: startDim: int * ?endDim: int -> (Tensor -> Tensor)
static member FurnaceImage.flatten: input: Tensor * ?startDim: int * ?endDim: int -> Tensor
val decoder: Model<Tensor,Tensor>
static member FurnaceImage.unflatten: dim: int * unflattenedShape: int seq -> (Tensor -> Tensor)
static member FurnaceImage.unflatten: input: Tensor * dim: int * unflattenedShape: int seq -> Tensor
Multiple items
type ConvTranspose2d = inherit Model new: inChannels: int * outChannels: int * ?kernelSize: int * ?stride: int * ?padding: int * ?dilation: int * ?kernelSizes: int seq * ?strides: int seq * ?paddings: int seq * ?dilations: int seq * ?bias: bool -> ConvTranspose2d override ToString: unit -> string override forward: value: Tensor -> Tensor member bias: Tensor with get, set member weight: Tensor with get, set
<summary>A model that applies a 2D transposed convolution operator over an input image composed of several input planes.</summary>

--------------------
new: inChannels: int * outChannels: int * ?kernelSize: int * ?stride: int * ?padding: int * ?dilation: int * ?kernelSizes: int seq * ?strides: int seq * ?paddings: int seq * ?dilations: int seq * ?bias: bool -> ConvTranspose2d
static member FurnaceImage.sigmoid: input: Tensor -> Tensor
val model: VAE
Multiple items
type VAE = inherit VAEBase new: xShape: int seq * zDim: int * encoder: Model * decoder: Model -> VAE override ToString: unit -> string override decode: z: Tensor -> Tensor override encode: x: Tensor -> Tensor * Tensor
<summary>Variational auto-encoder</summary>

--------------------
new: xShape: int seq * zDim: int * encoder: Model * decoder: Model -> VAE
val lr: Tensor
static member FurnaceImage.tensor: ?device: Device * ?dtype: Dtype * ?backend: Backend -> ('a -> Tensor)
static member FurnaceImage.tensor: value: obj * ?device: Device * ?dtype: Dtype * ?backend: Backend -> Tensor
val optimizer: Adam
Multiple items
type Adam = inherit Optimizer new: model: Model * ?lr: Tensor * ?beta1: Tensor * ?beta2: Tensor * ?eps: Tensor * ?weightDecay: Tensor * ?reversible: bool -> Adam override updateRule: name: string -> t: Tensor -> Tensor
<summary>TBD</summary>

--------------------
new: model: Model * ?lr: Tensor * ?beta1: Tensor * ?beta2: Tensor * ?eps: Tensor * ?weightDecay: Tensor * ?reversible: bool -> Adam
val epoch: int
val batches: (int * Tensor * Tensor) seq
member DataLoader.epoch: ?numBatches: int -> (int * Tensor * Tensor) seq
val i: int
member ModelBase.reverseDiff: ?nestingTag: uint32 -> unit
val l: Tensor
member VAEBase.loss: x: Tensor * ?normalize: bool -> Tensor
member Optimizer.step: unit -> unit
val print: x: 'a -> unit
<summary> Print the given value to the console using the '%A' printf format specifier </summary>
val validLoss: Tensor
Multiple items
module Seq from Furnace.Util
<summary> Contains extensions to the F# Seq module. </summary>

--------------------
module Seq from Microsoft.FSharp.Collections
val sumBy: projection: ('T -> 'U) -> source: 'T seq -> 'U (requires member (+) and member Zero)
property MNIST.length: int with get

© Copyright 2025, Furnace Contributors.