Create spdif_comp.f