neutron source subroutine

Dear fluka experts,
     The neutron source subroutine in the last email was beyond 72 column. Tt maybe a mistake during coping and uploading. I checked my subroutine and found that the column was not bigger than 72. Then I revised it and it still can't work. Could the experts help me revise it? Any advice is appreciated.
      And there is another problem: a Co-60 subroutine can't work now what I once compiled successfully. I don't know the reason. Please help me find out why, thanks.
      P.S. If the column is bigger than 72, it just a mistake because of coping. please ignore it.
Best regards,
                                     weihua