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