~maddevelopers/mg5amcnlo/3.0.2

« back to all changes in this revision

Viewing changes to models/template_files/fortran/lha_read.f

  • Committer: Marco Zaro
  • Date: 2014-01-27 16:54:10 UTC
  • mfrom: (78.124.55 MG5_aMC_2.1)
  • Revision ID: marco.zaro@gmail.com-20140127165410-5lma8c2hzbzm426j
merged with lp:~maddevelopers/madgraph5/MG5_aMC_2.1 r 267

Show diffs side-by-side

added added

removed removed

Lines of Context:
71
71
      
72
72
      if(len_trim(string).le.0) return
73
73
      
74
 
      do while(string(1:1) .eq. ' ') 
 
74
      do while(string(1:1) .eq. ' ' .or. string(1:1) .eq. CHAR(9)) 
75
75
        string=string(2:len(string))
76
76
      end do
77
77
      if (index(string,' ').gt.1) then