No change require, but I'd use something like

```ocaml
let head_dir = _tlf_dir in
Tlc2.make_tlc2 _dir_name _tlf_dir head_dir ...
```

for clarity.