& gencost_scalefile(igen_mdt),
& gencost_scalefile(igen_lsc),
& gencost_scalefile(igen_amsre_lsc),
& gencost_scalefile,
character*(MAX_LEN_FNAM) gencost_scalefile(NGENCOST)
gencost_scalefile(k) = ' '