Skip to content
Snippets Groups Projects
Commit 29e88eb4 authored by Wuttke, Joachim's avatar Wuttke, Joachim
Browse files

removed "ordered" from parallel pragma

parent 7b8e8bfa
No related branches found
No related tags found
No related merge requests found
......@@ -221,7 +221,7 @@ void NCurveFit::fit( bool _allow_slow_conv )
control.patience = nCall;
control.verbosity = verbosity;
#pragma omp parallel for ordered
#pragma omp parallel for
for ( int j=0; j<fc->nJ(); j++ ) {
try {
if ( fc->V[j]->frozen )
......@@ -283,7 +283,6 @@ void NCurveFit::fit( bool _allow_slow_conv )
if( nfreedom<1 ) nfreedom = 1;
C->Quality[2] = SQR(status.fnorm) / nfreedom;
#pragma omp ordered
{
// print results:
if( fiter.size()>1 )
......@@ -296,7 +295,6 @@ void NCurveFit::fit( bool _allow_slow_conv )
printf( "%s\n", lm_shortmsg[ status.outcome ] );
}
} catch (...) {
#pragma omp ordered
printf( "Caught unexpected exception"
" while fitting spectrum %i\n", j );
} // try
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment