Changeset 173 for trunk/ADOL-C


Ignore:
Timestamp:
Oct 6, 2010 9:48:23 AM (10 years ago)
Author:
awalther
Message:

new get_HP in sparsedrivers.cpp

Location:
trunk/ADOL-C/src
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • trunk/ADOL-C/src/sparse/sparsedrivers.cpp

    r160 r173  
    588588
    589589/****************************************************************************/
    590 /*******        sparse Hessians, complete driver              ***************/
     590/*******      sparse Hessians, set and get sparsity pattern   ***************/
    591591/****************************************************************************/
    592592
     
    618618}
    619619#endif
     620
     621void get_HP(
     622    short          tag,        /* tape identification                     */
     623    int            indep,      /* number of independent variables         */
     624    unsigned int *** HP)
     625#ifdef SPARSE
     626{
     627    SparseHessInfos sHinfos;
     628    TapeInfos *tapeInfos;
     629
     630    tapeInfos=getTapeInfos(tag);
     631    memcpy(&ADOLC_CURRENT_TAPE_INFOS, tapeInfos, sizeof(TapeInfos));
     632    *HP = ADOLC_CURRENT_TAPE_INFOS.pTapeInfos.sHinfos.HP;
     633}
     634#else
     635{
     636    fprintf(DIAG_OUT, "ADOL-C error: function %s can only be used if sparse configuration option was used\n", __FUNCTION__);
     637    exit(-1);
     638}
     639#endif
     640
    620641/*****************************************************************************/
    621642/*                                                    JACOBIAN BLOCK PATTERN */
  • trunk/ADOL-C/src/sparse/sparsedrivers.h

    r139 r173  
    8383    unsigned int ** HP);
    8484
     85void get_HP(
     86    short          tag,        /* tape identification                     */
     87    int            indep,      /* number of independent variables         */
     88    unsigned int *** HP);
     89
    8590/*--------------------------------------------------------------------------*/
    8691/*                                                   JACOBIAN BLOCK PATTERN */
  • trunk/ADOL-C/src/usrparms.h

    r42 r173  
    2222/*--------------------------------------------------------------------------*/
    2323/* Buffer sizes */
    24 #define OBUFSIZE  65536 /* 16384 or  524288  */
    25 #define LBUFSIZE  65536 /* 16384 or  524288  */
    26 #define VBUFSIZE  65536 /* 16384 or  524288  */
     24#define OBUFSIZE  80000000 /* 16384 or  524288  */
     25#define LBUFSIZE  80000000 /* 16384 or  524288  */
     26#define VBUFSIZE  80000000 /* 16384 or  524288  */
    2727
    2828/*--------------------------------------------------------------------------*/
Note: See TracChangeset for help on using the changeset viewer.