Can not compile with function name including "TYPE&quot

hello, when compiling i have this error

Copyright (c) 2017, NVIDIA CORPORATION.  All rights reserved.
PGF90-S-0034-Syntax error at or near identifier def_proc (/...../modlinktomodel.f90: 70)
  0 inform,   0 warnings,   1 severes, 0 fatal for agrif_link

modlinktomodel.f90: 70

!
    end interface

    procedure(alloc_proc)   :: Agrif_Allocationcalls
    procedure(typedef_proc) :: Agrif_probdim_modtype_def
!
end module Agrif_Link

I think that compiler identificate “type” in name like special word from fortran language. Need your help to solve this problem.

VChe,

Please send complete source that generates the error, and not fragments. Context is everything, so we need to recreate in context.
That includes any modfiles or other included files.

dave

There is the example

module mod
  procedure(type) a
contains
  function type()
  end function
end



PGF90-S-0034-Syntax error at or near ) (test.f90: 2)