Update src/fpm/cmd/new.f90

Co-authored-by: Sebastian Ehlert <[email protected]>

Author: freevryheid

src/fpm/cmd/new.f90

@@ -576,7 +576,6 @@ subroutine cmd_new(settings)
 contains
 
 function default_user(what) result(user)
-  implicit none
   character(len=*), intent(in) :: what
   character(len=:), allocatable :: user
   if (what=="uname") then