parameters: (filename)
return_statement: return routines
docstring: For a Fortran source file, return a list of routines declared as EXTERNAL
      in it.
docstring_summary: For a Fortran source file, return a list of routines declared as EXTERNAL
      in it.
docstring_tokens: For a Fortran source file return a list of routines declared as EXTERNAL in it .
function: def getDependencies(filename):
      """For a Fortran source file, return a list of routines declared as EXTERNAL
      in it.
      """
      external_pat = re.compile(r'^\s*EXTERNAL\s', re.I)
      routines = []
      with open(filename) as fo:
          for lineno, line in fortranSourceLines(fo):
              m = external_pat.match(line)
              if m:
                  names = line = line[m.end():].strip().split(',')
                  names = [n.strip().lower() for n in names]
                  names = [n for n in names if n]
                  routines.extend(names)
      return routines
function_tokens: def getDependencies ( filename ) : external_pat = re . compile ( r'^\s*EXTERNAL\s' , re . I ) routines = [ ] with open ( filename ) as fo : for lineno , line in fortranSourceLines ( fo ) : m = external_pat . match ( line ) if m : names = line = line [ m . end ( ) : ] . strip ( ) . split ( ',' ) names = [ n . strip ( ) . lower ( ) for n in names ] names = [ n for n in names if n ] routines . extend ( names ) return routines