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 16 c | Line 16 c |
16 | c | c |
17 | use dimens_m | use dimens_m |
18 | use paramet_m | use paramet_m |
19 | use comdissipn | use inidissip_m |
20 | IMPLICIT NONE | IMPLICIT NONE |
21 | c | c |
22 | c | c |
# | Line 29 c | Line 29 c |
29 | c ...... variables locales ........ | c ...... variables locales ........ |
30 | c | c |
31 | REAL rot(ip1jm,llm) , signe, nugradrs | REAL rot(ip1jm,llm) , signe, nugradrs |
32 | INTEGER l,ij,iter,lr | INTEGER l,ij,iter |
33 | integer, intent(in):: lr | |
34 | c ........................................................ | c ........................................................ |
35 | c | c |
36 | c | c |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |