!!****f* source/pathToUnits/MyUnit/MyUnit_foo1 !! !! NAME !! MyUnit_foo1 !! !! SYNOPSIS !! MyUnit_foo1(integer(in) :: exampleDummyArg, !! real(out) :: anotherDummyArg) !! !! DESCRIPTION !! !! Put the description of the MyUnit_foo1 here. !! !! !! ARGUMENTS !! !! exampleDummyArg - explain argument !! anotherDummyArg - explain argument !! !! EXAMPLE !! give examples of function usage !! !! NOTES !! !! In this case, MyUnit_foo1 is just a stub, meaning !! that it is an empty implementation and does nothing. !! !!*** subroutine MyUnit_foo1 (exampleDummyArg, anotherDummyArg) integer, intent(in) :: exampleDummyArg real, intent(out) :: anotherDummyArg anotherDummyArg = someValidValue end subroutine MyUnit_foo1