void get_uplo_type	(	char *	type,
		CBLAS_UPLO *	uplo
	)

Definition at line 18 of file auxiliary.c.

                                                 {
  if( (strncmp( type,"u",1 )==0)||(strncmp( type,"U",1 )==0) )
        *uplo = CblasUpper;
  else if( (strncmp( type,"l",1 )==0)||(strncmp( type,"L",1 )==0) )
        *uplo = CblasLower;
  else *uplo = UNDEFINED;
}