Curious This is the output I get K:\Documents and Settings\Ian>ifort test.f Intel(R) Fortran Compiler for 32-bit applications, Version 8.1 Build 20040802 Z Package ID: w_fc_p_8.1.021 Copyright (C) 1985-2004 Intel Corporation. All rights reserved. Microsoft (R) Incremental Linker Version 7.00.9466 Copyright (C) Microsoft Corporation. All rights reserved. -out:test.exe -subsystem:console -entry:mainCRTStartup test.obj K:\Documents and Settings\Ian>test Strange : random numbers are the same 0.0002472573 0.9353569401 0.6148786582 0.8077240475 Are you running the latest version of the compiler? See the details in the compile above for the Version I'm using. Cheers Ian Chivers -----Original Message----- From: Fortran 90 List [mailto:[log in to unmask]] On Behalf Of Xiaogang Wang Sent: 06 November 2004 15:16 To: [log in to unmask] Subject: error of rand with intel fortran compiler Hi, The old random number function rand() always gives the same number under all the intel fortran compilers I tested (7.1, 8.0, 8.1). See the simple test code below. Is this a known ifc bug? Thanks. Xiaogang ==================== c compiled with c ifort test.f -Vaxlib program main implicit double precision (a-h,o-z) dimension a(4) write(*,*)'Strange : random numbers are the same' iseed=11 call srand(iseed) do i=1,4 a(i)=rand() c if the following line is added, it works again. c write(*,*)a(i) end do write(*,'(f15.10)')a(1:4) end =========== Output: Strange : random numbers are the same 0.0002472573 0.0002472573 0.0002472573 0.0002472573 -- ------------------------------------------------ Dr Xiaogang Wang Departement de chimie Universite de Montreal C.P. 6128, succursale Centre-ville Montreal (Quebec) H3C 3J7 Tel. (514) 3436111 ext 3947 (office) FAX (514) 3437586 (office) e-mail: [log in to unmask] homepage: http://www.esi.umontreal.ca/~wangx ------------------------------------------------