#include "geoslib_old_f.h"
#include "geoslib_define.h"
#include "Basic/AStringable.hpp"
#include <math.h>

Functions
static void	error (int flag)

int	time_3db (double HS, double T, int NX, int NY, int NZ, int BX, int BY, int BZ, double XS, double YS, double ZS, double HS_EPS_INIT, int MSG)

static int	pre_init (void)

static int	init_point (void)

static void	init_nearest (void)

static void	init_cell (double vx, double vy, double vz, int xl, int yl, int zl)

static double	init_cellh (double vh, double vv, double hsc, double hsn)

static int	recursive_init (void)

static int	propagate_point (int start)

static void	free_ptrs (int max_x)

static double	exact_delay (double vx, double vy, double vz, int xm, int ym, int zm)

static int	t_1d (int x, int y, int z, double t0, double hs0, double hs1, double hs2, double hs3)

static int	diff_2d (int x, int y, int z, double t0, double hs0, double hs1)

static int	point_diff (int x, int y, int z, double t0, double hs0)

static int	t_2d (int x, int y, int z, double t0, double t1, double hs0, double hs1)

static int	edge_diff (int x, int y, int z, double t0, double t1, double hs0)

static int	t_3d_ (int x, int y, int z, double t0, double tl, double tr, double td, double hs0, int redundant)

static int	t_3d_part1 (int x, int y, int z, double t0, double tl, double tr, double hs0)

static int	x_side (int y_begin, int y_end, int z_begin, int z_end, int x, int future)

static int	scan_x_ff (int y_start, int y_end, int z_start, int z_end, int x0, int x, int x_s)

static int	scan_x_bf (int y_begin, int y_start, int z_start, int z_end, int x0, int x, int x_s)

static int	scan_x_bb (int y_begin, int y_start, int z_begin, int z_start, int x0, int x, int x_s)

static int	scan_x_fb (int y_start, int y_end, int z_begin, int z_start, int x0, int x, int x_s)

static int	y_side (int x_begin, int x_end, int z_begin, int z_end, int y, int future)

static int	scan_y_ff (int x_start, int x_end, int z_start, int z_end, int y0, int y, int y_s)

static int	scan_y_bf (int x_begin, int x_start, int z_start, int z_end, int y0, int y, int y_s)

static int	scan_y_bb (int x_begin, int x_start, int z_begin, int z_start, int y0, int y, int y_s)

static int	scan_y_fb (int x_start, int x_end, int z_begin, int z_start, int y0, int y, int y_s)

static int	z_side (int x_begin, int x_end, int y_begin, int y_end, int z, int future)

static int	scan_z_ff (int x_start, int x_end, int y_start, int y_end, int z0, int z, int z_s)

static int	scan_z_bf (int x_begin, int x_start, int y_start, int y_end, int z0, int z, int z_s)

static int	scan_z_bb (int x_begin, int x_start, int y_begin, int y_start, int z0, int z, int z_s)

static int	scan_z_fb (int x_start, int x_end, int y_begin, int y_start, int z0, int z, int z_s)

Variables
static int	messages

static int	source_at_node = 0

static int	init_stage = 0

static int	current_side_limit

static int	X0

static int	X1

static int	Y0

static int	Y1

static int	Z0

static int	Z1

static int	reverse_order

static int *	longflags

static int	flag_fb

static int	x_start_fb

static int	y_start_fb

static int	z_start_fb

static int	flag_bf

static int	x_start_bf

static int	y_start_bf

static int	z_start_bf

static int	flag_ff

static int	x_start_ff

static int	y_start_ff

static int	z_start_ff

static int	flag_bb

static int	x_start_bb

static int	y_start_bb

static int	z_start_bb

static double	hs_eps_init

static int	bx

static int	by

static int	bz

static const char *	err_msg []

Function Documentation

◆ diff_2d()

static int diff_2d	(	int	x,
		int	y,
		int	z,
		double	t0,
		double	hs0,
		double	hs1
	)

static

◆ edge_diff()

static int edge_diff	(	int	x,
		int	y,
		int	z,
		double	t0,
		double	t1,
		double	hs0
	)

static

◆ error()

static void error ( int flag )

static

◆ exact_delay()

static double exact_delay	(	double	vx,
		double	vy,
		double	vz,
		int	xm,
		int	ym,
		int	zm
	)

static

◆ free_ptrs()

static void free_ptrs ( int max_x )

static

◆ init_cell()

static void init_cell	(	double	vx,
		double	vy,
		double	vz,
		int	xl,
		int	yl,
		int	zl
	)

static

◆ init_cellh()

static double init_cellh	(	double	vh,
		double	vv,
		double	hsc,
		double	hsn
	)

static

◆ init_nearest()

static void init_nearest ( void )

static

◆ init_point()

static int init_point ( void )

static

◆ point_diff()

static int point_diff	(	int	x,
		int	y,
		int	z,
		double	t0,
		double	hs0
	)

static

◆ pre_init()

static int pre_init ( void )

static

◆ propagate_point()

static int propagate_point ( int start )

static

◆ recursive_init()

static int recursive_init ( void )

static

◆ scan_x_bb()

static int scan_x_bb	(	int	y_begin,
		int	y_start,
		int	z_begin,
		int	z_start,
		int	x0,
		int	x,
		int	x_s
	)

static

◆ scan_x_bf()

static int scan_x_bf	(	int	y_begin,
		int	y_start,
		int	z_start,
		int	z_end,
		int	x0,
		int	x,
		int	x_s
	)

static

◆ scan_x_fb()

static int scan_x_fb	(	int	y_start,
		int	y_end,
		int	z_begin,
		int	z_start,
		int	x0,
		int	x,
		int	x_s
	)

static

◆ scan_x_ff()

static int scan_x_ff	(	int	y_start,
		int	y_end,
		int	z_start,
		int	z_end,
		int	x0,
		int	x,
		int	x_s
	)

static

◆ scan_y_bb()

static int scan_y_bb	(	int	x_begin,
		int	x_start,
		int	z_begin,
		int	z_start,
		int	y0,
		int	y,
		int	y_s
	)

static

◆ scan_y_bf()

static int scan_y_bf	(	int	x_begin,
		int	x_start,
		int	z_start,
		int	z_end,
		int	y0,
		int	y,
		int	y_s
	)

static

◆ scan_y_fb()

static int scan_y_fb	(	int	x_start,
		int	x_end,
		int	z_begin,
		int	z_start,
		int	y0,
		int	y,
		int	y_s
	)

static

◆ scan_y_ff()

static int scan_y_ff	(	int	x_start,
		int	x_end,
		int	z_start,
		int	z_end,
		int	y0,
		int	y,
		int	y_s
	)

static

◆ scan_z_bb()

static int scan_z_bb	(	int	x_begin,
		int	x_start,
		int	y_begin,
		int	y_start,
		int	z0,
		int	z,
		int	z_s
	)

static

◆ scan_z_bf()

static int scan_z_bf	(	int	x_begin,
		int	x_start,
		int	y_start,
		int	y_end,
		int	z0,
		int	z,
		int	z_s
	)

static

◆ scan_z_fb()

static int scan_z_fb	(	int	x_start,
		int	x_end,
		int	y_begin,
		int	y_start,
		int	z0,
		int	z,
		int	z_s
	)

static

◆ scan_z_ff()

static int scan_z_ff	(	int	x_start,
		int	x_end,
		int	y_start,
		int	y_end,
		int	z0,
		int	z,
		int	z_s
	)

static

◆ t_1d()

static int t_1d	(	int	x,
		int	y,
		int	z,
		double	t0,
		double	hs0,
		double	hs1,
		double	hs2,
		double	hs3
	)

static

◆ t_2d()

static int t_2d	(	int	x,
		int	y,
		int	z,
		double	t0,
		double	t1,
		double	hs0,
		double	hs1
	)

static

◆ t_3d_()

static int t_3d_	(	int	x,
		int	y,
		int	z,
		double	t0,
		double	tl,
		double	tr,
		double	td,
		double	hs0,
		int	redundant
	)

static

◆ t_3d_part1()

static int t_3d_part1	(	int	x,
		int	y,
		int	z,
		double	t0,
		double	tl,
		double	tr,
		double	hs0
	)

static

◆ time_3db()

int time_3db	(	double *	HS,
		double *	T,
		int	NX,
		int	NY,
		int	NZ,
		int	BX,
		int	BY,
		int	BZ,
		double	XS,
		double	YS,
		double	ZS,
		double	HS_EPS_INIT,
		int	MSG
	)

◆ x_side()

static int x_side	(	int	y_begin,
		int	y_end,
		int	z_begin,
		int	z_end,
		int	x,
		int	future
	)

static

◆ y_side()

static int y_side	(	int	x_begin,
		int	x_end,
		int	z_begin,
		int	z_end,
		int	y,
		int	future
	)

static

◆ z_side()

static int z_side	(	int	x_begin,
		int	x_end,
		int	y_begin,
		int	y_end,
		int	z,
		int	future
	)

static

Variable Documentation

◆ bx

int bx

static

◆ by

int by

static

◆ bz

int bz

static

◆ current_side_limit

int current_side_limit

static

◆ err_msg

const char* err_msg[]

static

Initial value:

= { "\ntime_3d: Computations terminated normally.\n",
                                 "\ntime_3d: [Bug] macros T3D_INF, FD_HUGE not properly set.\n",
                                 "\ntime_3d: Multiple source but input time map is uniform.\n",
                                 "\ntime_3d: Not enough virtual memory (malloc failed).\n",
                                 "\ntime_3d: Recursive init failed: see message(s) above.\n",
                                 "\ntime_3d: [Init] Illegal tolerance on inhomogeneity.\n",
                                 "\ntime_3d: Illegal ('infinite') value(s) in array hs.\n",
                                 "\ntime_3d: Non-physical negative value(s) in array hs.\n",
                                 "\ntime_3d: a dimension (nx,ny,nz) is too small or negative.\n",
                                 "\ntime_3d: args bx,by,bx not correctly set. use 1,1,1 !!!\n", }

◆ flag_bb

int flag_bb

static

◆ flag_bf

int flag_bf

static

◆ flag_fb

int flag_fb

static

◆ flag_ff

int flag_ff

static

◆ hs_eps_init

double hs_eps_init

static

◆ init_stage

int init_stage = 0

static

◆ longflags

int * longflags

static

◆ messages

int messages

static

◆ reverse_order

int reverse_order

static

◆ source_at_node

int source_at_node = 0

static

◆ X0

int X0

static

◆ X1

int X1

static

◆ x_start_bb

int x_start_bb

static

◆ x_start_bf

int x_start_bf

static

◆ x_start_fb

int x_start_fb

static

◆ x_start_ff

int x_start_ff

static

◆ Y0

int Y0

static

◆ Y1

int Y1

static

◆ y_start_bb

int y_start_bb

static

◆ y_start_bf

int y_start_bf

static

◆ y_start_fb

int y_start_fb

static

◆ y_start_ff

int y_start_ff

static

◆ Z0

int Z0

static

◆ Z1

int Z1

static

◆ z_start_bb

int z_start_bb

static

◆ z_start_bf

int z_start_bf

static

◆ z_start_fb

int z_start_fb

static

◆ z_start_ff

int z_start_ff

static

Functions

Variables

Function Documentation

◆ diff_2d()

◆ edge_diff()

◆ error()

◆ exact_delay()

◆ free_ptrs()

◆ init_cell()

◆ init_cellh()

◆ init_nearest()

◆ init_point()

◆ point_diff()

◆ pre_init()

◆ propagate_point()

◆ recursive_init()

◆ scan_x_bb()

◆ scan_x_bf()

◆ scan_x_fb()

◆ scan_x_ff()

◆ scan_y_bb()

◆ scan_y_bf()

◆ scan_y_fb()

◆ scan_y_ff()

◆ scan_z_bb()

◆ scan_z_bf()

◆ scan_z_fb()

◆ scan_z_ff()

◆ t_1d()

◆ t_2d()

◆ t_3d_()

◆ t_3d_part1()

◆ time_3db()

◆ x_side()

◆ y_side()

◆ z_side()

Variable Documentation

◆ bx

◆ by

◆ bz

◆ current_side_limit

◆ err_msg

◆ flag_bb

◆ flag_bf

◆ flag_fb

◆ flag_ff

◆ hs_eps_init

◆ init_stage

◆ longflags

◆ messages

◆ reverse_order

◆ source_at_node

◆ X0

◆ X1

◆ x_start_bb

◆ x_start_bf

◆ x_start_fb

◆ x_start_ff

◆ Y0

◆ Y1

◆ y_start_bb

◆ y_start_bf

◆ y_start_fb

◆ y_start_ff

◆ Z0

◆ Z1

◆ z_start_bb

◆ z_start_bf

◆ z_start_fb

◆ z_start_ff