/[lmdze]/trunk/libf/dyn3d/iniadvtrac.f90
ViewVC logotype

Diff of /trunk/libf/dyn3d/iniadvtrac.f90

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

revision 23 by guez, Mon Dec 14 15:25:16 2009 UTC revision 34 by guez, Wed Jun 2 11:01:12 2010 UTC
# Line 91  contains Line 91  contains
91         endif         endif
92         tnom(iq)=str1         tnom(iq)=str1
93         tname(iq)=tnom(iq)         tname(iq)=tnom(iq)
94         str2=tnom(iq)         str2=tnom(iq)
95         ttext(iq) = trim(str2) // descrq(iadv(iq))         ttext(iq) = trim(str2) // descrq(iadv(iq))
96      end do      end do
97    

Legend:
Removed from v.23  
changed lines
  Added in v.34

  ViewVC Help
Powered by ViewVC 1.1.21