ver0026 f_to_d を　subroutineとしてくみこむ