code: def _newFortranRoutine(self, rname, filename):
      routine = FortranLibrary._newFortranRoutine(self, rname, filename)
      if "BLAS" in filename:
          routine.type = "blas"
      elif rname.startswith("z"):
          routine.type = "zlapack"
      else:
          routine.type = "dlapack"
      return routine
  
imports: import os
  import sys
  import clapack_scrub
  import fortran
label_desc: Use image node_id 1 for calling the LapackLibrary obj's underlying member method code with example usage: obj._newFortranRoutine(rname, filename) and returns: routine