! Loop through various values

!mkasc=1        ! Flag to tell rplot_nodal to make PSI-Plot output files
!ar12=1


*do,ar10,140,300,10
    tc_top,ar10
*enddo