--- trunk/dyn3d/vlxqs.f 2014/03/05 14:57:53 82 +++ 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./