| 173 | return todo |
| 174 | |
| 175 | class LapackLibrary(FortranLibrary): |
| 176 | def _newFortranRoutine(self, rname, filename): |
| 177 | routine = FortranLibrary._newFortranRoutine(self, rname, filename) |
| 178 | if 'blas' in filename.lower(): |
| 179 | routine.type = 'blas' |
| 180 | elif 'install' in filename.lower(): |
| 181 | routine.type = 'config' |
| 182 | elif rname.startswith('z'): |
| 183 | routine.type = 'z_lapack' |
| 184 | elif rname.startswith('c'): |
| 185 | routine.type = 'c_lapack' |
| 186 | elif rname.startswith('s'): |
| 187 | routine.type = 's_lapack' |
| 188 | elif rname.startswith('d'): |
| 189 | routine.type = 'd_lapack' |
| 190 | else: |
| 191 | routine.type = 'lapack' |
| 192 | return routine |
| 193 | |
| 194 | def allRoutinesByType(self, typename): |
| 195 | routines = sorted((r.name, r) for r in self.allRoutines() if r.type == typename) |
| 196 | return [a[1] for a in routines] |
| 197 | |
| 198 | def printRoutineNames(desc, routines): |
| 199 | print(desc) |