Copy link
@ViralBShah

ViralBShah Aug 7, 2013

Member

Looking at the zgesdd docs, it seems like this should just be:

  rwork = Array($relty, job == 'N' ? 5*minmn : minmn*(5*minmn+7)