| Revision: | 716 |
| Committed: | Thu Nov 3 23:12:27 2005 UTC (19 years, 11 months ago) by chrisfen |
| Content type: | text/plain |
| File size: | 283 byte(s) |
| Log Message: | improvements in shifted-force |
| # | User | Rev | Content |
|---|---|---|---|
| 1 | chrisfen | 716 | #ifdef __C |
| 2 | #ifndef __FELECTROSTATICSCREENINGMETHOD | ||
| 3 | #define __FELECTROSTATICSCREENINGMETHOD | ||
| 4 | |||
| 5 | #define UNDAMPED 1 | ||
| 6 | #define DAMPED 2 | ||
| 7 | |||
| 8 | #endif | ||
| 9 | #endif /*__C*/ | ||
| 10 | |||
| 11 | #ifdef __FORTRAN90 | ||
| 12 | |||
| 13 | INTEGER, PARAMETER:: UNDAMPED = 1 | ||
| 14 | INTEGER, PARAMETER:: DAMPED = 2 | ||
| 15 | |||
| 16 | #endif |