Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
IFOS2D
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Issues
4
Issues
4
List
Boards
Labels
Service Desk
Milestones
Merge Requests
0
Merge Requests
0
Operations
Operations
Incidents
Environments
Analytics
Analytics
Repository
Value Stream
Wiki
Wiki
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Commits
Issue Boards
Open sidebar
GPIAG-Software
IFOS2D
Commits
5f99aa39
Commit
5f99aa39
authored
Dec 02, 2015
by
Florian Wittkamp
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Merge second part
parent
aef7f960
Changes
3
Expand all
Hide whitespace changes
Inline
Side-by-side
Showing
3 changed files
with
216 additions
and
179 deletions
+216
-179
src/Makefile
src/Makefile
+8
-1
src/denise.c
src/denise.c
+193
-177
src/fd.h
src/fd.h
+15
-1
No files found.
src/Makefile
View file @
5f99aa39
...
...
@@ -9,6 +9,7 @@
MODEL
=
../genmod/1D_linear_gradient_visc.c
MODEL_AC
=
../genmod/1D_linear_gradient_ac.c
MODEL_EL
=
../genmod/1D_linear_gradient_el.c
MODEL_VAC
=
../genmod/1D_linear_gradient_viscac.c
EXEC
=
../bin
# Description:
...
...
@@ -18,7 +19,7 @@ EXEC= ../bin
# LINUX with OpenMPI / IntelMPI and INTEL Compiler
# Use icc whenever possible, this will be much faster than gcc
CC
=
mpi
i
cc
CC
=
mpicc
LFLAGS
=
-lm
-lcseife
-lstfinv
-laff
-lfourierxx
-lfftw3
-lstdc
++
CFLAGS
=
-O3
SFLAGS
=
-L
./../contrib/libcseife
-L
./../contrib/bin
...
...
@@ -101,6 +102,7 @@ DENISE= \
$(MODEL)
\
$(MODEL_AC)
\
$(MODEL_EL)
\
$(MODEL_VAC)
\
matcopy.c
\
matcopy_elastic.c
\
matcopy_acoustic.c
\
...
...
@@ -158,6 +160,11 @@ DENISE= \
calc_hilbert.c
\
eprecond.c
\
eprecond1.c
\
zero_fdveps_viscac.c
\
update_p_visc_PML.c
\
matcopy_viscac.c
\
prepare_update_p.c
\
readmod_viscac.c
\
filter_frequencies.c
SNAPMERGE_OBJ
=
$(SNAPMERGE_SCR:%.c=%.o)
...
...
src/denise.c
View file @
5f99aa39
This diff is collapsed.
Click to expand it.
src/fd.h
View file @
5f99aa39
...
...
@@ -545,4 +545,18 @@ void lbfgs_core(int iteration, int N_LBFGS, int NPAR_LBFGS,float ** s_LBFGS, flo
/* Wolfe condition */
int
check_wolfe
(
float
steplength
,
float
misfit_old
,
float
misfit_new
,
float
**
grad_old_vs
,
float
**
grad_new_vs
,
float
**
update_vs
,
float
**
grad_old_rho
,
float
**
grad_new_rho
,
float
**
update_rho
,
float
**
grad_old_vp
,
float
**
grad_new_vp
,
float
**
update_vp
,
float
c1
,
float
c2
,
int
NPAR_LBFGS
);
void
wolfe_linesearch
(
int
wolfe_status
,
float
*
alpha_SL_min
,
float
*
alpha_SL_max
,
float
*
alpha_SL
);
\ No newline at end of file
void
wolfe_linesearch
(
int
wolfe_status
,
float
*
alpha_SL_min
,
float
*
alpha_SL_max
,
float
*
alpha_SL
);
/* functions for viscoacoustic modelling */
void
model_viscac
(
float
**
rho
,
float
**
pi
,
float
**
taup
,
float
*
eta
);
void
readmod_viscac
(
float
**
rho
,
float
**
pi
,
float
**
taup
,
float
*
eta
);
void
matcopy_viscac
(
float
**
prho
,
float
**
ppi
,
float
**
taup
);
void
prepare_update_p
(
float
*
etajm
,
float
*
peta
,
float
**
ppi
,
float
**
prho
,
float
**
ptaup
,
float
**
g
,
float
*
bjm
,
float
*
cjm
,
float
***
e
);
void
zero_fdveps_viscac
(
int
ny1
,
int
ny2
,
int
nx1
,
int
nx2
,
float
**
vx
,
float
**
vy
,
float
**
sp
,
float
**
vxp1
,
float
**
vyp1
,
float
**
psi_sxx_x
,
float
**
psi_sxy_x
,
float
**
psi_vxx
,
float
**
psi_vyx
,
float
**
psi_syy_y
,
float
**
psi_sxy_y
,
float
**
psi_vyy
,
float
**
psi_vxy
,
float
**
psi_vxxs
,
float
***
pp
);
void
update_p_visc_PML
(
int
nx1
,
int
nx2
,
int
ny1
,
int
ny2
,
float
**
vx
,
float
**
vy
,
float
**
sp
,
float
**
pi
,
float
**
rho
,
float
*
hc
,
int
infoout
,
float
***
p
,
float
**
g
,
float
*
bjm
,
float
*
cjm
,
float
***
e
,
float
*
K_x
,
float
*
a_x
,
float
*
b_x
,
float
*
K_x_half
,
float
*
a_x_half
,
float
*
b_x_half
,
float
*
K_y
,
float
*
a_y
,
float
*
b_y
,
float
*
K_y_half
,
float
*
a_y_half
,
float
*
b_y_half
,
float
**
psi_vxx
,
float
**
psi_vyy
,
float
**
psi_vxy
,
float
**
psi_vyx
);
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a 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