For the files:
SRC/sorcsd2by1.f
SRC/dorcsd2by1.f
SRC/cuncsd2by1.f
SRC/zuncsd2by1.f
There are many instances of 0 being passed as an array argument. For these functions I added an explicit "REAL DUMMY(1,1)" and
"COMPLEX CDUMMY(1,1)" as needed and replaced the instances of 0 with either DUMMY or CDUMMY.
The function calls that are affected in CUNCSD2BY1, brackets indicating CDUMMY:
CUNBDB1 positions 9 [10] [11] [12]
CUNQR position [6]
CUNGLQ position [6]
CBBCSD positions 10 [17] 19 20 21 22 23 24 25 26
CUNBDB2 9 [10] [11] [12]
CUNBDB3 9 [10] [11] [12]
CUNBDB4 9 [10] [11] [12] [13]
Other files are similar, with the exception that SORCSD2BY1 and DORCSCD2BY1 only need one dummy value for all the positions affected.