This is a new site that's currently running on alpha code. There are going to be bugs. If you discover any, please report them on the site's issues page (GitHub account required). Thanks.

**Warning:** Many URLs *are* going to change. Refer to the README file to discover which library project's documentation has been completed.

**Project:** Fractions

**Unit:** *DelphiDabbler.Lib.Fractions*

**Record:** *TFraction*

**Applies to:** ~>0.1

```
function Reciprocal: TFraction;
```

This method returns the reciprocal of the fraction. The fraction must not be zero, i.e. it must have a non-zero numerator.

The reciprocal of fraction `X/Y`

is `Y/X`

, where `X<>0`

.

Because the reciprocal of any non-zero number `N`

is defined as `1/N`

, applying *Reciprocal* to a fraction is the same as dividing the fraction into 1. I.e. if *F* is any *TFraction* instance with a non-zero numerator,

```
F.Reciprocal = 1/F;
```

```
var
F, G, H: TFraction;
begin
F := TFraction.Create(5, 12);
G := F.Reciprocal;
H := 1 / F; // see Note
Assert(G = H);
Assert((G.Numerator = F.Denominator) and (G.Denominator = F.Numerator));
end;
```

*Divide*operator overload