From 892d5b45849ee14470cffae2477b79b6e87202dd Mon Sep 17 00:00:00 2001 From: v1j4y Date: Mon, 16 Mar 2020 14:26:14 +0100 Subject: [PATCH] Added missing mpiid provider. --- src/provide_mpiid.irp.f | 7 +++++++ 1 file changed, 7 insertions(+) create mode 100644 src/provide_mpiid.irp.f diff --git a/src/provide_mpiid.irp.f b/src/provide_mpiid.irp.f new file mode 100644 index 0000000..8786ff4 --- /dev/null +++ b/src/provide_mpiid.irp.f @@ -0,0 +1,7 @@ +use iso_c_binding +BEGIN_PROVIDER [integer(C_SIZE_T), mpiid] + BEGIN_DOC + ! simply store the mpiid for pinting + END_DOC +END_PROVIDER +