Parent Directory
| 
Revision Log
| 
Patch
| revision 25 by guez, Fri Mar 5 16:43:45 2010 UTC | revision 26 by guez, Tue Mar 9 15:27:15 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 | IMPLICIT NONE | IMPLICIT NONE |
| 23 | c | c |
| 24 | c | c |
| # | Line 32 c ........ variables locales | Line 32 c ........ variables locales |
| 32 | c | c |
| 33 | REAL div(ip1jmp1,llm) | REAL div(ip1jmp1,llm) |
| 34 | REAL signe, nugrads | REAL signe, nugrads |
| 35 | INTEGER l,ij,iter,ld | INTEGER l,ij,iter |
| 36 | integer, intent(in):: ld | |
| 37 | ||
| 38 | c ........................................................ | c ........................................................ |
| 39 | c | c |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.21 |