Remove unused variable btpr
This commit is contained in:
parent
acf3d34bc5
commit
65bf0a343c
|
@ -35,7 +35,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||||
int CNAME(BLASLONG rows, BLASLONG cols, FLOAT alpha_r, FLOAT alpha_i, FLOAT *a, BLASLONG lda)
|
int CNAME(BLASLONG rows, BLASLONG cols, FLOAT alpha_r, FLOAT alpha_i, FLOAT *a, BLASLONG lda)
|
||||||
{
|
{
|
||||||
BLASLONG i,j,ia;
|
BLASLONG i,j,ia;
|
||||||
FLOAT *aptr,*bptr;
|
FLOAT *aptr;
|
||||||
FLOAT a0, a1;
|
FLOAT a0, a1;
|
||||||
|
|
||||||
if ( rows <= 0 ) return(0);
|
if ( rows <= 0 ) return(0);
|
||||||
|
|
|
@ -34,7 +34,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||||
int CNAME(BLASLONG rows, BLASLONG cols, FLOAT alpha_r, FLOAT alpha_i, FLOAT *a, BLASLONG lda)
|
int CNAME(BLASLONG rows, BLASLONG cols, FLOAT alpha_r, FLOAT alpha_i, FLOAT *a, BLASLONG lda)
|
||||||
{
|
{
|
||||||
BLASLONG i,j,ia;
|
BLASLONG i,j,ia;
|
||||||
FLOAT *aptr,*bptr;
|
FLOAT *aptr;
|
||||||
FLOAT a0, a1;
|
FLOAT a0, a1;
|
||||||
|
|
||||||
if ( rows <= 0 ) return(0);
|
if ( rows <= 0 ) return(0);
|
||||||
|
|
|
@ -34,7 +34,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||||
int CNAME(BLASLONG rows, BLASLONG cols, FLOAT alpha_r, FLOAT alpha_i, FLOAT *a, BLASLONG lda)
|
int CNAME(BLASLONG rows, BLASLONG cols, FLOAT alpha_r, FLOAT alpha_i, FLOAT *a, BLASLONG lda)
|
||||||
{
|
{
|
||||||
BLASLONG i,j,ia;
|
BLASLONG i,j,ia;
|
||||||
FLOAT *aptr,*bptr;
|
FLOAT *aptr;
|
||||||
FLOAT a0, a1;
|
FLOAT a0, a1;
|
||||||
|
|
||||||
if ( rows <= 0 ) return(0);
|
if ( rows <= 0 ) return(0);
|
||||||
|
|
Loading…
Reference in New Issue