| Line 59... |
Line 59... |
# in this case, the real name represents both versions
|
# in this case, the real name represents both versions
|
namesubst = {'unghr':'orghr', 'heevr':'syevr', 'hegvd':'sygvd', 'unmlq':'ormlq', 'ungqr':'orgqr'}
|
namesubst = {'unghr':'orghr', 'heevr':'syevr', 'hegvd':'sygvd', 'unmlq':'ormlq', 'ungqr':'orgqr'}
|
|
|
# LAPACK functions which are always used in real version
|
# LAPACK functions which are always used in real version
|
if petscconf.PRECISION == 'single':
|
if petscconf.PRECISION == 'single':
|
functions += ['sstevr','sbdsdc','slamch','slag2','slasv2']
|
functions += ['sstevr','sbdsdc','slamch','slag2','slasv2','slartg']
|
elif petscconf.PRECISION == '__float128':
|
elif petscconf.PRECISION == '__float128':
|
functions += ['qstevr','qbdsdc','qlamch','qlag2','qlasv2']
|
functions += ['qstevr','qbdsdc','qlamch','qlag2','qlasv2','qlartg']
|
else:
|
else:
|
functions += ['dstevr','dbdsdc','dlamch','dlag2','dlasv2']
|
functions += ['dstevr','dbdsdc','dlamch','dlag2','dlasv2','dlartg']
|
|
|
# check for all functions at once
|
# check for all functions at once
|
all = []
|
all = []
|
for i in functions:
|
for i in functions:
|
f = '#if defined(PETSC_BLASLAPACK_UNDERSCORE)\n'
|
f = '#if defined(PETSC_BLASLAPACK_UNDERSCORE)\n'
|