1 SUBROUTINE FSTERM(iopt) 2 if (iopt.eq.0) then 3 call x11enddev 4 else 5 call x11changecurseur(8) 6 call seldialog 7 endif 8 end 9