Anasazi
Version of the Day
Main Page
Related Pages
Modules
Namespaces
Classes
Files
Examples
File List
All
Classes
Namespaces
Files
Functions
Variables
Typedefs
Enumerations
Enumerator
Friends
Groups
Pages
epetra
src
ModalAnalysisSolvers
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
21
char
*startingPoint;
22
23
void
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
36
double
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
Generated on Fri Jul 25 2025 09:18:09 for Anasazi by
1.8.5