& sshv4cost_scalefile,
character*(MAX_LEN_FNAM) sshv4cost_scalefile(NSSHV4COST)
sshv4cost_scalefile(k) = ' '
& ssh_errfile, sshv4cost_scalefile,