|
Last change
on this file since 753 was
581,
checked in by laurent, 11 years ago
|
|
Adding ocean application, some mathematics functions and distributed locks
|
|
File size:
581 bytes
|
| Rev | Line | |
|---|
| [581] | 1 | |
|---|
| 2 | double ****work1; |
|---|
| 3 | double ***work2; |
|---|
| 4 | double ***work3; |
|---|
| 5 | double ****work4; |
|---|
| 6 | double ****work5; |
|---|
| 7 | double ***work6; |
|---|
| 8 | double ****work7; |
|---|
| 9 | double ***tauz; |
|---|
| 10 | |
|---|
| 11 | double ****psi; |
|---|
| 12 | double ****psim; |
|---|
| 13 | double ***psium; |
|---|
| 14 | double ***psilm; |
|---|
| 15 | double ***psib; |
|---|
| 16 | double ***ga; |
|---|
| 17 | double ***gb; |
|---|
| 18 | double ***oldga; |
|---|
| 19 | double ***oldgb; |
|---|
| 20 | |
|---|
| 21 | double ****q_multi; |
|---|
| 22 | double ****rhs_multi; |
|---|
| 23 | |
|---|
| 24 | long *imx; |
|---|
| 25 | long *jmx; |
|---|
| 26 | |
|---|
| 27 | double *f; |
|---|
| 28 | struct Global_Private *gp; |
|---|
| 29 | |
|---|
| 30 | |
|---|
| 31 | double *lev_res; |
|---|
| 32 | double *lev_tol; |
|---|
| 33 | double *i_int_coeff; |
|---|
| 34 | double *j_int_coeff; |
|---|
| 35 | long *xpts_per_proc; |
|---|
| 36 | long *ypts_per_proc; |
|---|
| 37 | long xprocs; |
|---|
| 38 | long yprocs; |
|---|
| 39 | long numlev; |
|---|
| 40 | double eig2; |
|---|
| 41 | long im; |
|---|
| 42 | long jm; |
|---|
Note: See
TracBrowser
for help on using the repository browser.