Parent Directory | Revision Log | Patch
trunk/dyn3d/vlxqs.f90 revision 76 by guez, Fri Nov 15 18:45:49 2013 UTC | trunk/dyn3d/vlxqs.f revision 105 by guez, Thu Sep 4 10:40:24 2014 UTC | |
---|---|---|
# | Line 38 | Line 38 |
38 | Logical first,testcpu | Logical first,testcpu |
39 | SAVE first,testcpu | SAVE first,testcpu |
40 | ||
41 | REAL SSUM | REAL temps1,temps2,temps3,temps4,temps5 |
42 | REAL temps0,temps1,temps2,temps3,temps4,temps5 | SAVE temps1,temps2,temps3,temps4,temps5 |
SAVE temps0,temps1,temps2,temps3,temps4,temps5 | ||
43 | ||
44 | ||
45 | DATA first,testcpu/.true.,.false./ | DATA first,testcpu/.true.,.false./ |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |