From 08e59877d03365a6217865682f89869b5e9fcc0f Mon Sep 17 00:00:00 2001
From: Anthony Scemama <scemama@irsamc.ups-tlse.fr>
Date: Sun, 27 Jun 2021 15:53:27 +0200
Subject: [PATCH] Forgot file

---
 devel/trexio/trexio_file.irp.f | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100644 devel/trexio/trexio_file.irp.f

diff --git a/devel/trexio/trexio_file.irp.f b/devel/trexio/trexio_file.irp.f
new file mode 100644
index 0000000..c989774
--- /dev/null
+++ b/devel/trexio/trexio_file.irp.f
@@ -0,0 +1,20 @@
+BEGIN_PROVIDER [ character*(1024), trexio_filename ]
+ implicit none
+ BEGIN_DOC
+ ! Name of the TREXIO file
+ END_DOC
+ character*(1024) :: prefix
+
+ trexio_filename = trexio_file
+
+ if (trexio_file == 'None') then
+    prefix = trim(ezfio_work_dir)//trim(ezfio_filename)
+    if (backend == 0) then
+      trexio_filename = trim(prefix)//'.h5'
+    else if (backend == 1) then
+      trexio_filename = trim(prefix)
+    endif
+ endif
+END_PROVIDER
+
+