Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Menu
Open sidebar
GPIAG-Software
IFOS2D
Commits
907334d7
Commit
907334d7
authored
Dec 15, 2015
by
Florian Wittkamp
Browse files
BUGFIX: SEGFAULT if ACOUSTIC && VERBOSE
parent
3bff7d50
Changes
1
Hide whitespace changes
Inline
Side-by-side
src/denise.c
View file @
907334d7
...
...
@@ -1093,7 +1093,7 @@ int main(int argc, char **argv){
if
(
iter
==
1
){
FPL2
=
fopen
(
MISFIT_LOG_FILE
,
"w"
);
/* Write header for misfit log file */
if
(
GRAD_METHOD
==
1
)
{
if
(
GRAD_METHOD
==
1
&&
VERBOSE
)
{
if
(
TIME_FILT
==
0
){
fprintf
(
FPL2
,
"opteps_vp
\t
epst1[1]
\t
epst1[2]
\t
epst1[3]
\t
L2t[1]
\t
L2t[2]
\t
L2t[3]
\t
L2t[4]
\n
"
);}
else
{
...
...
@@ -2366,8 +2366,13 @@ int main(int argc, char **argv){
if
(
VERBOSE
){
/* Output jacobian VS per SHOT PSV */
if
(
WAVETYPE
==
1
||
WAVETYPE
==
3
)
{
sprintf
(
jac
,
"%s_jacobian_u_shot%i"
,
JACOBIAN
,
ishot
);
write_matrix_disk
(
waveconv_u_shot
,
jac
);
if
(
!
ACOUSTIC
){
sprintf
(
jac
,
"%s_jacobian_u_shot%i"
,
JACOBIAN
,
ishot
);
write_matrix_disk
(
waveconv_u_shot
,
jac
);
}
else
{
sprintf
(
jac
,
"%s_jacobian_shot%i"
,
JACOBIAN
,
ishot
);
write_matrix_disk
(
waveconv_shot
,
jac
);
}
}
/* Output jacobian VS per SHOT SH */
...
...
@@ -2376,7 +2381,7 @@ int main(int argc, char **argv){
write_matrix_disk
(
waveconv_u_shot_z
,
jac
);
}
}
}
/*--------------------------------------------------------------------------------*/
...
...
@@ -2752,17 +2757,17 @@ int main(int argc, char **argv){
if
(
WAVETYPE
==
1
||
WAVETYPE
==
3
)
{
for
(
j
=
1
;
j
<=
NY
;
j
=
j
+
IDY
){
for
(
i
=
1
;
i
<=
NX
;
i
=
i
+
IDX
){
if
(
iter
<
INV_VP_ITER
)
waveconv
[
j
][
i
]
=
0
.
0
;
if
(
iter
<
INV_VS_ITER
)
waveconv_u
[
j
][
i
]
=
0
.
0
;
if
(
iter
<
INV_RHO_ITER
)
waveconv_rho
[
j
][
i
]
=
0
.
0
;
if
(
iter
<
INV_VP_ITER
)
waveconv
[
j
][
i
]
=
0
.
0
;
if
(
iter
<
INV_VS_ITER
&&
!
ACOUSTIC
)
waveconv_u
[
j
][
i
]
=
0
.
0
;
if
(
iter
<
INV_RHO_ITER
)
waveconv_rho
[
j
][
i
]
=
0
.
0
;
}
}
}
if
(
WAVETYPE
==
2
||
WAVETYPE
==
3
)
{
for
(
j
=
1
;
j
<=
NY
;
j
=
j
+
IDY
){
for
(
i
=
1
;
i
<=
NX
;
i
=
i
+
IDX
){
if
(
iter
<
INV_VS_ITER
)
waveconv_u_z
[
j
][
i
]
=
0
.
0
;
if
(
iter
<
INV_RHO_ITER
)
waveconv_rho_z
[
j
][
i
]
=
0
.
0
;
if
(
iter
<
INV_VS_ITER
)
waveconv_u_z
[
j
][
i
]
=
0
.
0
;
if
(
iter
<
INV_RHO_ITER
)
waveconv_rho_z
[
j
][
i
]
=
0
.
0
;
}
}
}
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment