[Bug fortran/61420] New: type bound procedure with pass attribute, that returns a procedure pointer, fails to compile

["robert.rosenberg at nrl dot navy.mil" <gcc-bugzilla at gcc dot gnu dot org>]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=61420

            Bug ID: 61420
           Summary: type bound procedure with pass attribute, that returns
                    a procedure pointer, fails to compile
           Product: gcc
           Version: 4.9.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: robert.rosenberg at nrl dot navy.mil

Created attachment 32894
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=32894&action=edit
defines type bound procedure that returns a procedure pointer

I was writing some sample code that defines a function that returns a pointer
procedure. 

When I compile the code with Intel Ifort.14.x/15.x it complains saying that
this exact feature is not supported.

When I compile with GNU gfortran49, it compiles and runs fine. But when I
insert the statement, 'implicit none' at the beginning of the code, the code
fails to compile. If I then use an implicit procedure pointer interface, it
again runs fine. 

I include the code as an attachment