Main Page   Groups   Namespace List   Class Hierarchy   Alphabetical List   Compound List   File List   Namespace Members   Compound Members   File Members   Concepts

itpack.h

Go to the documentation of this file.
00001 /*=========================================================================
00002 
00003   Program:   Insight Segmentation & Registration Toolkit
00004   Module:    $RCSfile: itpack.h,v $
00005   Language:  C++
00006   Date:      $Date: 2002/05/17 18:54:07 $
00007   Version:   $Revision: 1.8 $
00008 
00009   Copyright (c) 2002 Insight Consortium. All rights reserved.
00010   See ITKCopyright.txt or http://www.itk.org/HTML/Copyright.htm for details.
00011 
00012      This software is distributed WITHOUT ANY WARRANTY; without even 
00013      the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR 
00014      PURPOSE.  See the above copyright notices for more information.
00015 
00016 =========================================================================*/
00017 
00018 #ifndef __itpack_h
00019 #define __itpack_h
00020 
00021 #include "itpack_f2c.h"
00022 
00023 namespace itk {
00024 namespace fem {
00025 namespace itpack {
00026 
00027 
00077 extern int jcg_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *rhs, doublereal *u, integer *iwksp, integer *nw, doublereal *wksp, integer *iparm, doublereal *rparm, integer *ierr);
00078 
00079 
00096 extern int jsi_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *rhs, doublereal *u, integer *iwksp, integer *nw, doublereal *wksp, integer *iparm, doublereal *rparm, integer *ierr);
00097 
00098 
00115 extern int sor_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *rhs, doublereal *u, integer *iwksp, integer *nw, doublereal *wksp, integer *iparm, doublereal *rparm, integer *ierr);
00116 
00117 
00134 extern int ssorcg_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *rhs, doublereal *u, integer *iwksp, integer *nw, doublereal *wksp, integer *iparm, doublereal *rparm, integer *ierr);
00135 
00136 
00153 extern int ssorsi_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *rhs, doublereal *u, integer *iwksp, integer *nw, doublereal *wksp, integer *iparm, doublereal *rparm, integer *ierr);
00154 
00155 
00172 extern int rscg_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *rhs, doublereal *u, integer *iwksp, integer *nw, doublereal *wksp, integer *iparm, doublereal *rparm, integer *ierr);
00173 
00174 
00191 extern int rssi_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *rhs, doublereal *u, integer *iwksp, integer *nw, doublereal *wksp, integer *iparm, doublereal *rparm, integer *ierr);
00192 
00193 
00207 extern int itjcg_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *u, doublereal *u1, doublereal *d__, doublereal *d1, doublereal *dtwd, doublereal *tri);
00208 
00221 extern int itjsi_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *rhs, doublereal *u, doublereal *u1, doublereal *d__, integer *icnt);
00222 
00223 
00234 extern int itsor_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *rhs, doublereal *u, doublereal *wk);
00235 
00236 
00253 extern int itsrcg_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *rhs, doublereal *u, doublereal *u1, doublereal *c__, doublereal *c1, doublereal *d__, doublereal *dl, doublereal *wk, doublereal *tri);
00254 
00255 
00270 extern int itsrsi_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *rhs, doublereal *u, doublereal *u1, doublereal *c__, doublereal *d__, doublereal *ctwd, doublereal *wk);
00271 
00272 
00287 extern int itrscg_(integer *n, integer *nnb, integer *ia, integer *ja, doublereal *a, doublereal *ub, doublereal *ub1, doublereal *db, doublereal *db1, doublereal *wb, doublereal *tri);
00288 
00289 
00302 extern int itrssi_(integer *n, integer *nnb, integer *ia, integer *ja, doublereal *a, doublereal *rhs, doublereal *ub, doublereal *ub1, doublereal *db);
00303 
00304 
00313 extern integer bisrch_(integer *n, integer *k, integer *l);
00314 
00315 
00325 extern doublereal cheby_(doublereal *qa, doublereal *qt, doublereal *rrr, integer *ip, doublereal *cme, doublereal *sme);
00326 
00327 
00338 extern int chgcon_(doublereal *tri, doublereal *gamold, doublereal *rhoold, integer *ibmth);
00339 
00340 
00349 extern int chgsi_(doublereal *dtnrm, integer *ibmth);
00350 
00351 
00358 extern logical chgsme_(doublereal *oldnrm, integer *icnt);
00359 
00360 
00370 extern int daxpy_(integer *n, doublereal *da, doublereal *dx, integer *incx, doublereal *dy, integer *incy);
00371 
00372 
00381 extern int dcopy_(integer *n, doublereal *dx, integer *incx, doublereal *dy, integer *incy);
00382 
00383 
00392 extern doublereal ddot_(integer *n, doublereal *dx, integer *incx, doublereal *dy, integer *incy);
00393 
00394 
00402 extern doublereal determ_(integer *n, doublereal *tri, doublereal *xlmda);
00403 
00404 
00410 extern int dfault_(integer *iparm, doublereal *rparm);
00411 
00426 extern int echall_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *rhs, integer *iparm, doublereal *rparm, integer *icall);
00427 
00428 
00442 extern int echout_(integer *iparm, doublereal *rparm, integer *imthd);
00443 
00444 
00454 extern doublereal eigvns_(integer *n, doublereal *tri, doublereal *d__, doublereal *e2, integer *ier);
00455 
00456 
00467 extern doublereal eigvss_(integer *n, doublereal *tri, doublereal *start, doublereal *zeta, integer *itmax, integer *ier);
00468 
00469 
00480 extern int eqrt1s_(doublereal *d__, doublereal *e2, integer *nn, integer *m, integer *isw, integer *ierr);
00481 
00482 
00488 extern integer ipstr_(doublereal *omega);
00489 
00490 
00507 extern int iterm_(integer *nn, doublereal *a, doublereal *u, doublereal *wk, integer *imthdd);
00508 
00515 extern int ivfill_(integer *n, integer *iv, integer *ival);
00516 
00517 
00518 /*
00519  * FIXME: add doc
00520  */
00521 extern int omeg_(doublereal *dnrm, integer *iflag);
00522 
00523 
00524 /*
00525  * FIXME: add doc
00526  */
00527 extern logical omgchg_(integer *ndummy);
00528 
00529 
00530 /*
00531  * FIXME: add doc
00532  */
00533 extern logical omgstr_(integer *ndummy);
00534 
00535 
00536 /*
00537  * FIXME: add doc
00538  */
00539 extern int parcon_(doublereal *dtnrm, doublereal *c1, doublereal *c2, doublereal *c3, doublereal *c4, doublereal *gamold, doublereal *rhotmp, integer *ibmth);
00540 
00541 
00542 /*
00543  * FIXME: add doc
00544  */
00545 extern int parsi_(doublereal *c1, doublereal *c2, doublereal *c3, integer *ibmth);
00546 
00547 
00548 /*
00549  * FIXME: add doc
00550  */
00551 extern doublereal pbeta_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *v, doublereal *w1, doublereal *w2);
00552 
00553 
00554 /*
00555  * FIXME: add doc
00556  */
00557 extern int pbsor_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *u, doublereal *rhs);
00558 
00559 
00560 /*
00561  * FIXME: add doc
00562  */
00563 extern int permat_(integer *nn, integer *ia, integer *ja, doublereal *a, integer *p, integer *newia, integer *isym, integer *level, integer *nout, integer *ierr);
00564 
00565 
00566 /*
00567  * FIXME: add doc
00568  */
00569 extern int perror_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *rhs, doublereal *u, doublereal *w, doublereal *digtt1, doublereal *digtt2, integer *idgtts);
00570 
00571 
00572 /*
00573  * FIXME: add doc
00574  */
00575 extern int pervec_(integer *n, doublereal *v, integer *p);
00576 
00577 
00578 /*
00579  * FIXME: add doc
00580  */
00581 extern int pfsor_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *u, doublereal *rhs);
00582 
00583 
00584 /*
00585  * FIXME: add doc
00586  */
00587 extern int pfsor1_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *u, doublereal *rhs);
00588 
00589 
00590 /*
00591  * FIXME: add doc
00592  */
00593 extern int pjac_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *u, doublereal *rhs);
00594 
00595 
00596 /*
00597  * FIXME: add doc
00598  */
00599 extern int pmult_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *u, doublereal *w);
00600 
00601 
00602 /*
00603  * FIXME: add doc
00604  */
00605 extern int prbndx_(integer *nn, integer *nblack, integer *ia, integer *ja, integer *p, integer *ip, integer *level, integer *nout, integer *ier);
00606 
00607 
00608 /*
00609  * FIXME: add doc
00610  */
00611 extern int prsblk_(integer *nnb, integer *nnr, integer *ia, integer *ja, doublereal *a, doublereal *ur, doublereal *vb);
00612 
00613 
00614 /*
00615  * FIXME: add doc
00616  */
00617 extern int prsred_(integer *nnb, integer *nnr, integer *ia, integer *ja, doublereal *a, doublereal *ub, doublereal *vr);
00618 
00619 
00620 /*
00621  * FIXME: add doc
00622  */
00623 extern int pssor1_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *u, doublereal *rhs, doublereal *fr, doublereal *br);
00624 
00625 
00626 /*
00627  * FIXME: add doc
00628  */
00629 extern int pstop_(integer *n, doublereal *u, doublereal *dnrm, doublereal *ccon, integer *iflag, logical *q1);
00630 
00631 
00632 /*
00633  * FIXME: add doc
00634  */
00635 extern doublereal pvtbv_(integer *n, integer *ia, integer *ja, doublereal *a, doublereal *v);
00636 
00637 
00638 /*
00639  * FIXME: add doc
00640  */
00641 extern int qsort_(integer *nn, integer *key, doublereal *data, integer *error);
00642 
00643 
00647 extern int sbagn_(integer *n, integer *nz, integer *ia, integer *ja, doublereal *a, integer *iwork, integer *levell, integer *noutt, integer *ierr);
00648 
00649 
00650 /*
00651  * FIXME: add doc
00652  */
00653 extern int sbelm_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *rhs, integer *iw, doublereal *rw, doublereal *tol, integer *isym, integer *level, integer *nout, integer *ier);
00654 
00655 
00665 extern int sbend_(integer *nn, integer *nz, integer *ia, integer *ja, doublereal *a, integer *iwork);
00666 
00667 
00677 extern int sbini_(integer *nn, integer *nz, integer *ia, integer *ja, doublereal *a, integer *iwork);
00678 
00679 
00696 extern int sbsij_(integer *nn, integer *nz, integer *ia, integer *ja, doublereal *a, integer *iwork, integer *ii, integer *jj, doublereal *vall, integer *mode, integer *levell, integer *noutt, integer *ierr);
00697 
00698 
00699 /*
00700  * FIXME: add doc
00701  */
00702 extern int scal_(integer *nn, integer *ia, integer *ja, doublereal *a, doublereal *rhs, doublereal *u, doublereal *d__, integer *level, integer *nout, integer *ier);
00703 
00704 
00705 /*
00706  * FIXME: add doc
00707  */
00708 extern int sum3_(integer *n, doublereal *c1, doublereal *x1, doublereal *c2, doublereal *x2, doublereal *c3, doublereal *x3);
00709 
00710 
00711 /*
00712  * FIXME: add doc
00713  */
00714 extern doublereal tau_(integer *ii);
00715 
00716 
00717 /*
00718  * FIXME: add doc
00719  */
00720 extern E_f timer_(real *timdmy);
00721 
00722 
00723 /*
00724  * FIXME: add doc
00725  */
00726 extern logical tstchg_(integer *ibmth);
00727 
00728 
00729 /*
00730  * FIXME: add doc
00731  */
00732 extern int unscal_(integer *n, integer *ia, integer *ja, doublereal *a, doublereal *rhs, doublereal *u, doublereal *d__);
00733 
00734 
00735 /*
00736  * FIXME: add doc
00737  */
00738 extern int vevmw_(integer *n, doublereal *v, doublereal *w);
00739 
00740 
00741 /*
00742  * FIXME: add doc
00743  */
00744 extern int vevpw_(integer *n, doublereal *v, doublereal *w);
00745 
00746 
00753 extern int vfill_(integer *n, doublereal *v, doublereal *val);
00754 
00755 
00756 /*
00757  * FIXME: add doc
00758  */
00759 extern int vout_(integer *n, doublereal *v, integer *iswt, integer *noutt);
00760 
00761 
00762 /*
00763  * FIXME: add doc
00764  */
00765 extern int wevmw_(integer *n, doublereal *v, doublereal *w);
00766 
00767 
00768 /*
00769  * FIXME: add doc
00770  */
00771 extern int zbrent_(integer *n, doublereal *tri, doublereal *eps, integer *nsig, doublereal *aa, doublereal *bb, integer *maxfnn, integer *ier);
00772 
00773 
00774 }}} // end namespace itk::fem::itpack
00775 
00776 #endif // #ifndef __itpack_h

Generated at Fri May 21 01:15:45 2004 for ITK by doxygen 1.2.15 written by Dimitri van Heesch, © 1997-2000