!!****if* source/pathToUnits/MyUnit/MyUnitMain/Impl2/mu_localFoo1 !! !! NAME !! mu_localFoo1 !! !! SYNOPSIS !! mu_localFoo1(integer(in) :: argument) !! !! DESCRIPTION !! !! Put the description of this implementation of mu_localFoo here. !! !! !! ARGUMENTS !! !! argument - explain argument !! !! NOTES !! !! This is one of the local functions 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 is an abbreviation for "MyUnit" !! !!*** subroutine mu_localFoo1(argument) use MyUnit_data, ONLY : list of data items integer, intent(IN) :: argument !!calculate return end subroutine mu_localFoo1