Logo Search packages:      
Sourcecode: design version File versions  Download package

dmatrix.c

/* $Id: dmatrix.c 11080 2008-10-24 03:47:51Z therneau $
/*
** set up ragged arrays, with #of columns and #of rows
*/
#include "survS.h"
#include "survproto.h"

double **dmatrix(double *array, int ncol, int nrow)
    {
S_EVALUATOR
    register int i;
    register double **pointer;

    pointer = (double **) ALLOC(nrow, sizeof(double *));
    for (i=0; i<nrow; i++) {
      pointer[i] = array;
      array += ncol;
      }
    return(pointer);
    }

Generated by  Doxygen 1.6.0   Back to index