modified artvis.f90
modified rev_artvis.f90
Merge branch 'artvis'