link ../../dyn3d/abort_gcm.F