cloudy
trunk
Loading...
Searching...
No Matches
source
opacity_zero.cpp
Go to the documentation of this file.
1
/* This file is part of Cloudy and is copyright (C)1978-2013 by Gary J. Ferland and
2
* others. For conditions of distribution and use see copyright notice in license.txt */
3
/*OpacityZero zero out opacity save arrays, save old opacity in OldOpacSave array */
4
#include "
cddefines.h
"
5
#include "
rfield.h
"
6
#include "
opacity.h
"
7
8
void
OpacityZero
(
void
)
9
{
10
long
int
i;
11
12
DEBUG_ENTRY
(
"OpacityZero()"
);
13
14
15
for
( i=0; i <
rfield
.
nupper
; i++ )
16
{
17
opac
.
opacity_sct
[i] = 0.;
18
/* save the current opacities */
19
opac
.
OldOpacSave
[i] =
opac
.
opacity_abs
[i];
20
opac
.
opacity_abs
[i] = 0.;
21
}
22
23
/* only zero out the static array if we are going to
24
* totally redo the static part */
25
if
(
opac
.
lgRedoStatic
)
26
{
27
/*fprintf(ioQQQ," OpacityZero is zeroing out the static opacities\n");*/
28
for
( i=0; i <
rfield
.
nupper
; i++ )
29
{
30
opac
.
OpacStatic
[i] = 0.;
31
}
32
}
33
return
;
34
}
35
36
/* set old opac array to current versin during search phase */
37
void
OpacityZeroOld
(
void
)
38
{
39
long
int
i;
40
41
DEBUG_ENTRY
(
"OpacityZeroOld()"
);
42
43
44
for
( i=0; i <
rfield
.
nupper
; i++ )
45
{
46
/* save the current opacities */
47
opac
.
OldOpacSave
[i] =
opac
.
opacity_abs
[i];
48
}
49
return
;
50
}
cddefines.h
DEBUG_ENTRY
#define DEBUG_ENTRY(funcname)
Definition:
cddefines.h:684
opac
t_opac opac
Definition:
opacity.cpp:5
opacity.h
OpacityZero
void OpacityZero(void)
Definition:
opacity_zero.cpp:8
OpacityZeroOld
void OpacityZeroOld(void)
Definition:
opacity_zero.cpp:37
rfield
t_rfield rfield
Definition:
rfield.cpp:8
rfield.h
t_opac::OldOpacSave
double * OldOpacSave
Definition:
opacity.h:101
t_opac::OpacStatic
double * OpacStatic
Definition:
opacity.h:114
t_opac::opacity_sct
double * opacity_sct
Definition:
opacity.h:98
t_opac::opacity_abs
double * opacity_abs
Definition:
opacity.h:95
t_opac::lgRedoStatic
bool lgRedoStatic
Definition:
opacity.h:147
t_rfield::nupper
long int nupper
Definition:
rfield.h:46
Generated by
1.9.5