Split internal and external modules

Author: lcrippa

pyproject.toml

@@ -1,6 +1,6 @@
 [project]
 name = 'sphinxfortran_ng'
-version = '0.4.5'
+version = '0.4.6'
 authors = [{name = "Lorenzo Crippa", email="[email protected]"}]
 description = "An improved version of the sphinx-fortran python module"
 readme = "README.md"

src/sphinxfortran_ng/fortran_autodoc.py

@@ -1106,12 +1106,14 @@ def format_use(self, block, indent=0, short=False):
             if short:
                 use = ':use: '
             else:
-                use = self.format_subsection('Used modules', indent=indent)
+                use_internal = self.format_subsection('Used modules', indent=indent)
+                use_external = self.format_subsection('External modules', indent=indent)
             lines = []
             shortlines = []
             funclines=[]
+            is_internal ={}
             for mname, monly in list(block['use'].items()):
-
+                is_internal[mname] = mname in self.modules
                 # Reference to the module
                 line = (self.indent(indent) if not short else '') + \
                     ':f:mod:`%s`' % mname
@@ -1143,6 +1145,7 @@ def format_use(self, block, indent=0, short=False):
                 # Append
                 shortlines.append(shortline)
                 lines.append([line])
+
             if short:
                 use += ', '.join(shortlines)
                 use = self.format_lines(use, indent)
@@ -1152,7 +1155,17 @@ def format_use(self, block, indent=0, short=False):
                         subln = None
                     else:
                         subln = funclines[i]
-                    use += self.format_lines(lines[i], indent, bullet='-',sublines=subln) + '\n'
+                    try:
+                        mname=re.search(r':f:mod:`([^`]+)`', lines[i][0]).group(1)
+                        isint = is_internal[mname]
+                    except:
+                        isint = True
+                    if isint:
+                        use_internal += self.format_lines(lines[i], indent, bullet='-',sublines=subln) + '\n'
+                    else:
+                        use_external += self.format_lines(lines[i], indent, bullet='-',sublines=subln) + '\n'
+                use += use_internal*(use_internal != self.format_subsection('Used modules', indent=indent)) 
+                use += use_external*(use_external != self.format_subsection('External modules', indent=indent))
             del lines
         return use