Create Thumb2_main.f