diff --git a/src/title.f90 b/src/title.f90 index d18bf37..e891ba4 100644 --- a/src/title.f90 +++ b/src/title.f90 @@ -23,7 +23,7 @@ subroutine title(iout) write(iout,"(t3,56('#'),' TOPOLINK ',55('#'))") write(iout,"(t15,a)") 'L. Martinez, Institute of Chemistry - University of Campinas. http://leandro.iqm.unicamp.br' write(iout,*) - write(iout,"(t105,a)") " Version 18.263 " + write(iout,"(t105,a)") " Version 18.269 " write(iout,*) end subroutine title