run time error

[changhee]

I've used intel fortran compiler for windows 7.1

When I compiled a simple parallelprogram with '/Qopenmp', I saw the following warning message with no error.

"Type size specifiers are an extention to strandard fortran 95"

Strangely, when running the program, I saw the alert box like the following.

""unknown software exception ..... "

Virtually, when compiling without '/Qopenmp', there exist thewarning, but the program runs wih no problem.

I think that IFL restricts the type size when parallelizing the source.

The source I compiled is like the following.

REAL*8 D(513,513)
INTEGER N
N=16

!$omp parallel do default(shared)
DO 10 I = 1, N
write(*,*) 'TEST'
10 continue

STOP
END

When thinking of the future in my work, I should useseverallarger data.

Could you give me some advice ? I look forward to your response.

Thanks.

[TimP]

There's no likely connection between your use of REAL*8 and your run-time error. No, /Qopenmp doesn't alter the interpretation of it. It's not as dangerous as the practice of assuming that KIND is measured in bytes, although that too will work as long as you stick to compilers with the same convention.

In principle, sticking to standard Fortran might be advisable in your future work. If you used named kinds, you might be able to adjust them more reliably. The only down side I know of is incompatibility with g77, but g95 is coming along.

INTEGER,PARAMETER :: DP = SELECTED_REAL_KIND(10)

REAL(DP) :: x = 20_DP