--- trunk/dyn3d/vlxqs.f90 2013/11/15 18:45:49 76 +++ trunk/dyn3d/vlxqs.f 2014/09/04 10:40:24 105 @@ -38,9 +38,8 @@ Logical first,testcpu SAVE first,testcpu - REAL SSUM - REAL temps0,temps1,temps2,temps3,temps4,temps5 - SAVE temps0,temps1,temps2,temps3,temps4,temps5 + REAL temps1,temps2,temps3,temps4,temps5 + SAVE temps1,temps2,temps3,temps4,temps5 DATA first,testcpu/.true.,.false./