在Fortran 77中优化if-then-else语句

对于我的C++代码,我问了这个 question 大约两天前。但我现在意识到,我必须用Fortran编写代码,因为我编写的内核将是用Fortran 77编写的现有应用程序的一部分。因此,我再次提出这个问题,这次的上下文是Fortran。非常感谢。

根据矩阵大小(从8x8到20x20),我有不同的平方矩阵乘法函数。这些函数彼此不同,因为每个函数采用不同的优化策略,即不同的循环排列和不同的循环展开因子。矩阵大小在程序的生命周期内是不变的,在编译时是已知的。我的目标是减少决定必须使用哪个功能的时间。例如,一个简单的实现是:

if (matrixSize == 8) C = mxm8(A, B);
else if (matrixSize == 9) C = mxm9(A,B);
 ...
else if (matrixSize == 20) C = mxm20(A,B);

在这种情况下,决定每个矩阵乘法使用哪个函数所花费的时间是非常重要的,特别是因为矩阵乘法在代码中经常发生。提前感谢您对如何在Fortran 77中处理此问题的任何建议。