--- MITgcm/eesupp/src/check_threads.F 2000/03/14 20:28:11 1.5 +++ MITgcm/eesupp/src/check_threads.F 2000/06/21 20:44:06 1.6 @@ -1,4 +1,4 @@ -C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/eesupp/src/check_threads.F,v 1.5 2000/03/14 20:28:11 adcroft Exp $ +C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/eesupp/src/check_threads.F,v 1.6 2000/06/21 20:44:06 heimbach Exp $ #include "CPP_EEOPTIONS.h" @@ -77,8 +77,10 @@ ENDIF IF ( numberThreadsRunning .NE. nThreads ) THEN #ifndef TARGET_T3E +#ifndef TARGET_CRAY_VECTOR CALL SYSTEM('sleep 1') #endif +#endif GOTO 10 ENDIF 11 CONTINUE