Pls Help: VF Multithread

[wisperless]

I am a beginner of VF multithread programming. Can anyone give me a sample code how to parallel calculating the summation of 100 numbers, such as one part for the summation from 1 to 50,the other from51 to 100? Thank you :)

Calculating the summation of 100 numbers from 1 to 100

VF sequential code:

integer sum

sum=0

do i=1, 100

sum=sum+i

enddo

[TimP]

Assuming you are using a Fortran compiler which supports OpenMP, you should find the material at www.openmp.org useful.