[cvs] / MG_ME / Models / sm / couplings.f Repository:
ViewVC logotype

Diff of /MG_ME/Models/sm/couplings.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.13, Mon May 11 15:39:42 2009 UTC revision 1.14, Tue Jun 9 09:01:17 2009 UTC
# Line 516  Line 516 
516           exit           exit
517   30      tempname='../'//tempname   30      tempname='../'//tempname
518           if (i.eq.5)then           if (i.eq.5)then
519              print 'Warning: file ',tempname,' is not correct'              print *,'Warning: file ',tempname,' is not correct'
520              stop              stop
521           endif           endif
522        enddo        enddo

Legend:
Removed from v.1.13  
changed lines
  Added in v.1.14

Mail to administrator
ViewVC Help
Powered by ViewVC 1.0.0