Parent Directory | Revision Log | Patch
revision 25 by guez, Fri Mar 5 16:43:45 2010 UTC | revision 27 by guez, Thu Mar 25 14:29:07 2010 UTC | |
---|---|---|
# | Line 18 c | Line 18 c |
18 | use dimens_m | use dimens_m |
19 | use paramet_m | use paramet_m |
20 | use comgeom | use comgeom |
21 | use comdissipn | use inidissip_m |
22 | use filtreg_m, only: filtreg | |
23 | IMPLICIT NONE | IMPLICIT NONE |
24 | c | c |
25 | c | c |
# | Line 32 c ........ variables locales | Line 33 c ........ variables locales |
33 | c | c |
34 | REAL div(ip1jmp1,llm) | REAL div(ip1jmp1,llm) |
35 | REAL signe, nugrads | REAL signe, nugrads |
36 | INTEGER l,ij,iter,ld | INTEGER l,ij,iter |
37 | integer, intent(in):: ld | |
38 | ||
39 | c ........................................................ | c ........................................................ |
40 | c | c |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |