Skip to content

Instantly share code, notes, and snippets.

@kaneshin

kaneshin/cg_descent.c

Created November 20, 2011 05:46
Show Gist options
  • Save kaneshin/1379845 to your computer and use it in GitHub Desktop.
Save kaneshin/1379845 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
cg_descent.c
xnorm = ZERO ;
for (i = 0; i < n5; i++) if ( xnorm < fabs (x [i]) ) xnorm = fabs (x [i]) ;
for (; i < n; i += 5)
{
if ( xnorm < fabs (x [i] ) ) xnorm = fabs (x [i] ) ;
if ( xnorm < fabs (x [i+1]) ) xnorm = fabs (x [i+1]) ;
if ( xnorm < fabs (x [i+2]) ) xnorm = fabs (x [i+2]) ;
if ( xnorm < fabs (x [i+3]) ) xnorm = fabs (x [i+3]) ;
if ( xnorm < fabs (x [i+4]) ) xnorm = fabs (x [i+4]) ;
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment