Parent Directory | Revision Log | Patch
revision 66 by guez, Thu Sep 20 13:00:41 2012 UTC | revision 71 by guez, Mon Jul 8 18:12:18 2013 UTC | |
---|---|---|
# | Line 45 contains | Line 45 contains |
45 | ||
46 | PRINT *, 'Call sequence information: inidissip' | PRINT *, 'Call sequence information: inidissip' |
47 | call random_seed(size=seed_size) | call random_seed(size=seed_size) |
48 | call random_seed(put=(/(0, ii = 1, seed_size)/)) | call random_seed(put=(/(1, ii = 1, seed_size)/)) |
49 | ||
50 | PRINT *, 'Calcul des valeurs propres de divgrad' | PRINT *, 'Calcul des valeurs propres de divgrad' |
51 | deltap = 1. | deltap = 1. |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |