vic/vic_run/src/alloc_and_free.c
void
free_2d_double(size_t  *shape,
               double **array)
{
    size_t i;

    for (i = 0; i < shape[0]; i++) {
        free(array[i]);
    }
    free(array);
}
/******************************************************************************
 * @brief    This subroutine frees memory for a 2-dimensional double array
 *****************************************************************************/
@brief    This subroutine frees memory for a 2-dimensional double array
@brief This subroutine frees memory for a 2 - dimensional double array
void
free_2d_double(size_t  *shape,
               double **array)
{
    size_t i;
    for (i = 0; i < shape[0]; i++) {
        free(array[i]);
    }
    free(array);
}
void free_2d_double ( size_t * shape , double * * array ) { size_t i ; for ( i = 0 ; i < shape [ 0 ] ; i ++ ) { free ( array [ i ] ) ; } free ( array ) ; }
@brief    This subroutine frees memory for a 2-dimensional double array
@brief This subroutine frees memory for a 2 - dimensional double array