!!****if* source/pathToUnits/MyUnit/MyUnitMain/Impl2/mu_localFoo2 !! !! NAME !! mu_localFoo2 !! !! SYNOPSIS !! mu_localFoo2(real(in) :: argument) !! !! DESCRIPTION !! !! Put the description of this implementation of mu_localFoo here. !! !! !! ARGUMENTS !! !! argument - explain argument !! !! NOTES !! !! This is a local function needed only by one or more of the public !! functions specific to Impl2. For all practical purposes !! its implementation is similar to the public functions like !! MyUnit_foo2.F90. However, unlike the public functions, it !! need not have an implementation in other incarnations of MyUnit. !! The "mu_" prefix stands for "MyUnit" !! !!*** subroutine mu_localFoo2(argument) use MyUnit_data, ONLY : list of data items real,intent(IN) :: argument calculate return end subroutine mu_localFoo2