How to make an overloaded operator public in a private module

1

Hi,

I have a module that defines a derived type and overloads assignment, addition, etc amongst other things. The module must be private, but I’d like to make public the derived type and overloaded operator.
How do I do this?
For instance:

module Vect2d_mod
   private
   public :: Vect2D

   Type :: Vect2D
      real          :: X
      real          :: Y
   End Type Vect2D

   Interface Operator (+)
      Module Procedure SumVect2D
   End Interface
end module

As it is, if I import vect2d_mod, I can declare variable with type Vect2D, but I cannot use the overloaded addition, which I would very much want…

2 
public :: Vect2D
public :: operator (+)
3

I believe (but don’t quote me) that its just

public :: vect2d, operator(+)

4

Thank you so much…

5

There will sill be issues if the module is USEd with the ONLY clause.

A better approach, if your compiler supports it, is to use generic TBPs:

module Vect2d_mod
   private
   public :: Vect2D

   Type :: Vect2D
      real          :: X
      real          :: Y
   Contains
      Generic :: Operator(+) => SumVect2D
      Procedure :: SumVect2D
   End Type Vect2D
end module