|
#define | FOR_3D(i1, i2, i3, I1, I2, I3) |
|
#define | FOR_3(i1, i2, i3, I1, I2, I3) |
|
#define | STIME(t) |
|
#define | STIME_T(t) ( amp*Pi*f0*( cos(2.*Pi*f0*(t))+cos(3.*Pi*f0*(t))+cos(4.*Pi*f0*(t))+cos(5.*Pi*f0*(t))) ) |
|
#define | SHEAR(y, t) ((u1+u2)*.5+(u1-u2)*.5*tanh(beta*((y)-y0)))*STIME(t) |
|
#define | SHEAR_T(y, t) ((u1+u2)*.5+(u1-u2)*.5*tanh(beta*((y)-y0)))*STIME_T(t) |
|
#define | X0(i0, i1, i2) (xa+dx0*(i0-i0a)) |
|
#define | X1(i0, i1, i2) (ya+dy0*(i1-i1a)) |
|
#define | X2(i0, i1, i2) (za+dz0*(i2-i2a)) |
|
#define | X0(i0, i1, i2) (xa+dx0*(i0-i0a)) |
|
#define | X1(i0, i1, i2) (ya+dy0*(i1-i1a)) |
|
#define | X2(i0, i1, i2) (za+dz0*(i2-i2a)) |
|