Added missing mpiid provider.

This commit is contained in:
v1j4y 2020-03-16 14:26:14 +01:00
parent 0e49542e85
commit 892d5b4584
1 changed files with 7 additions and 0 deletions

7
src/provide_mpiid.irp.f Normal file
View File

@ -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