Anasazi Version of the Day
Loading...
Searching...
No Matches
MyMemory.cpp
1// @HEADER
2// *****************************************************************************
3// Anasazi: Block Eigensolvers Package
4//
5// Copyright 2004 NTESS and the Anasazi contributors.
6// SPDX-License-Identifier: BSD-3-Clause
7// *****************************************************************************
8// @HEADER
9
10// This software is a result of the research described in the report
11//
12// "A comparison of algorithms for modal analysis in the absence
13// of a sparse direct method", P. Arbenz, R. Lehoucq, and U. Hetmaniuk,
14// Sandia National Laboratories, Technical report SAND2003-1028J.
15//
16// It is based on the Epetra, AztecOO, and ML packages defined in the Trilinos
17// framework ( http://trilinos.org/ ).
18
19#include "MyMemory.h"
20
21char *startingPoint;
22
23void initMemCounters() {
24
25#ifdef INTEL_CXML
26 startingPoint = NULL;
27#else
28 startingPoint = (char *) sbrk(0);
29#endif
30
31 return;
32
33}
34
35
36double currentSize() {
37
38#ifdef INTEL_CXML
39 return 0.0;
40#else
41 char *current = (char *) sbrk(0);
42 return (current - startingPoint)/(1024.0*1024.0);
43#endif
44
45}
46