| @@ -29,9 +29,12 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||
| int CNAME(int transa, int transb, BLASLONG M, BLASLONG N, BLASLONG K, FLOAT alpha, FLOAT beta) | int CNAME(int transa, int transb, BLASLONG M, BLASLONG N, BLASLONG K, FLOAT alpha, FLOAT beta) | ||||
| { | { | ||||
| return 0; | |||||
| /* | |||||
| double MNK = (double) M * (double) N * (double) K; | double MNK = (double) M * (double) N * (double) K; | ||||
| if (MNK <= 100.0*100.0*100.0) | if (MNK <= 100.0*100.0*100.0) | ||||
| return 1; | return 1; | ||||
| else | else | ||||
| return 0; | return 0; | ||||
| */ | |||||
| } | } | ||||
| @@ -29,9 +29,12 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |||||
| int CNAME(int transa, int transb, BLASLONG M, BLASLONG N, BLASLONG K, FLOAT alpha0, FLOAT alpha1, FLOAT beta0, FLOAT beta1) | int CNAME(int transa, int transb, BLASLONG M, BLASLONG N, BLASLONG K, FLOAT alpha0, FLOAT alpha1, FLOAT beta0, FLOAT beta1) | ||||
| { | { | ||||
| return 0; | |||||
| /* | |||||
| double MNK = (double) M * (double) N * (double) K; | double MNK = (double) M * (double) N * (double) K; | ||||
| if (MNK <= 100.0*100.0*100.0) | if (MNK <= 100.0*100.0*100.0) | ||||
| return 1; | return 1; | ||||
| else | else | ||||
| return 0; | return 0; | ||||
| */ | |||||
| } | } | ||||