Parent Directory | Revision Log | Patch
trunk/libf/filtrez/inifgn.f revision 3 by guez, Wed Feb 27 13:16:39 2008 UTC | trunk/filtrez/inifgn.f revision 76 by guez, Fri Nov 15 18:45:49 2013 UTC | |
---|---|---|
# | Line 9 c | Line 9 c |
9 | use paramet_m | use paramet_m |
10 | use comgeom | use comgeom |
11 | use serre | use serre |
12 | use coefils | |
13 | IMPLICIT NONE | IMPLICIT NONE |
14 | c | c |
15 | ||
# | Line 19 c | Line 20 c |
20 | REAL pi | REAL pi |
21 | INTEGER i,j,k,imm1,nrot | INTEGER i,j,k,imm1,nrot |
22 | C | C |
include "coefils.h" | ||
23 | c | c |
24 | EXTERNAL SSUM, acc, jacobi | EXTERNAL SSUM, acc, jacobi |
25 | CC EXTERNAL eigen | CC EXTERNAL eigen |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |