math/cmlib: Unbreak build with GCC 10
dbocls.f:185:19:
62 | * 2,LMDW,MCON+MOUT, 0,RDUM,RDUM) | 2
......
185 | * 1,J,IDUM, 2,BL(J),BU(J)) | 1
Error: Type mismatch between actual argument at (1) and actual argument at (2) (REAL(8)/REAL(4)).
dbocls.f:371:18:
62 | * 2,LMDW,MCON+MOUT, 0,RDUM,RDUM) | 2
......
371 | * 1,J,IDUM,1,RW(J),RDUM) | 1
Error: Type mismatch between actual argument at (1) and actual argument at (2) (REAL(8)/REAL(4)).
dbocls.f:423:19:
62 | * 2,LMDW,MCON+MOUT, 0,RDUM,RDUM) | 2
......
423 | * 1,JP,IDUM,0,IDUM,IDUM) | 1
Error: Type mismatch between actual argument at (1) and actual argument at (2) (INTEGER(4)/REAL(4)).
PR: 246700