link ../../dyn3d_common/q_sat.F