The function is part of the (uncommitted) draft patch for PR 50981.
Committed as Rev. 183675. Tobias
The patch fixes a build error. The function was accidentally added Rev.
183620 of 2012-01-27 for PR 52016.
- [Patch, Fortran, committed] PR 52038 - Remove unused, wrongl... Tobias Burnus
