g77 -fno-automatic  -ffixed-line-length-none  call_get_err_band.f  -o call_get_err_band