From: Sonya B. <son...@ho...> - 2013-05-27 08:37:06
|
Dear All, I wish to use parallel programming features in gnu fortran but I'm not be able to run it succesfully. I've the gortran installed on Code Blocks I put the linker options -fopenmp in the directions but the below code retrieves unintelligible result as sometimes 24357768 or Not a Number value. What could be the possible reason for that ? program main integer::threads,id !$OMP PARALLEL threads = omp_get_num_procs(); id = omp_get_thread_num() write(*,*)'In parallel region (T)? ', omp_get_max_threads() write(*,*)'Threads allocated : ', OMP_get_num_procs() !$OMP PARALLEL END end Your help will be appreciated! Regards, |
From: マーズ <ma...@th...> - 2013-06-01 23:45:12
|
Greetings Sonya Blade, I'm a g++ fan so i tought linking with g++ would be fine until recently with the new standard C++11, linking with g++ produces "undefined references" blah... My curiosity brought me to the book GNU Autoconf, which shows how to use GNU libtool linker; I recommend you try libtool for linking gfortran projects. Sonya Blade wrote: > Dear All, > > I wish to use parallel programming features in gnu fortran but I'm not be > able to run it succesfully. I've the gortran installed on Code Blocks I put > the linker options -fopenmp in the directions but the below code retrieves > unintelligible result as sometimes 24357768 or Not a Number value. What > could be the possible reason for that ? > > program main > integer::threads,id > !$OMP PARALLEL > threads = omp_get_num_procs(); > id = omp_get_thread_num() > write(*,*)'In parallel region (T)? ', omp_get_max_threads() > write(*,*)'Threads allocated : ', OMP_get_num_procs() > !$OMP PARALLEL END > end > > > Your help will be appreciated! > > Regards, > ------------------------------------------------------------------------------ > Try New Relic Now & We'll Send You this Cool Shirt > New Relic is the only SaaS-based application performance monitoring service > that delivers powerful full stack analytics. Optimize and monitor your > browser, app, & servers with just a few lines of code. Try New Relic > and get this awesome Nerd Life shirt! http://p.sf.net/sfu/newrelic_d2d_may > _______________________________________________ > MinGW-users mailing list > Min...@li... > > This list observes the Etiquette found at > http://www.mingw.org/Mailing_Lists. > We ask that you be polite and do the same. Disregard for the list etiquette > may cause your account to be moderated. > > _______________________________________________ > You may change your MinGW Account Options or unsubscribe at: > https://lists.sourceforge.net/lists/listinfo/mingw-users > Also: mailto:mingw-users- re...@li...?subject=unsubscribe |