25.07.2011 16:46, reseacher2011 пишет:
>
> Вот она — красота <http://www.netlib.org/clapack/faq.html>
>
> /* Subroutine int dgesvd_(char *jobu, char *jobvt, integer *m, integer *n,
> doublereal *a, integer *lda, doublereal *s, doublereal *u, integer *
> ldu, doublereal *vt, integer *ldvt, doublereal *work, integer *lwork,
> integer *info)
> */
>
> dgesvd_(&JOBU,&JOBVT,&M,&N, a,&LDA, s, uu,
> &LDU, vt,&LDVT, wk,&LWORK,&INFO);
>
Вот когда будешь одним из создателей Лапака, тогда и будешь
выпендриваться. А сейчас тебе следовало бы поучиться у тех, кто тебе
советует.
З.Ы. Сначала осознай, почему в лапаке такие функции.
Posted via RSDN NNTP Server 2.1 beta