$ vi test.f program main write(6,*) ' exercise 1' stop end

main( ){ printf(" exercise 2\n"); }

$vi test2.f ■ ( Clear Display )　　 ~ ~ ~ ~ "test2.f" [New File] ( when New file ） "test2.f" 4 Lines, 68 Characters ( when Old file ）

(2) Input Words

Input [a] or [ i] Key -> Standby Input

[a] ; input words behind Cursor
[i] ; input words fore Cursor (insert)

■ (no changes in display)　　 ~ ~ ~ ~ "test2.f" [New File]

• Input [:] key

　　 Push [Esc] key( no changes in display)
　　 Input [：] key


~ ~ ~ :← 　　　　　　　　　　　( shown [:] under the display)

• Input [q], [q!], [wq] key


[wq] ; quit with overwrite
[q] ; quit
[q!] ; quit by compulsion


~ ~ ~ :q ( input [q] key ) $ ( quit from vi )

• 1 Word Delete

progranm main ( I want delete [n]. write(6,*) ' exercise 1' stop end

Move Cursor on [n] and push [x] key.


program main ( complete 1 word delete ) write(6,*) ' exsercise 1' stop end

• 1 Line Delete

program main write(6,*) ' exercise 1' write(6,*) ' exercise 2' ( I want delete this 1 line.) stop end

Move Cursor on the line and push [dd] keys.


program main write(6,*) ' exercise 1' ( Complete 1 line delete ) stop end

$ f77 test.f ** main === End of Compilation 1 === 1501-510 Compilation successful for file test.f. $ ( Complete Compilation ) $a.out ( Run Program ) exercise 1 ( Output Result) $

$ cc test.c $ ( Complete Compilation ) $a.out ( Run Program ) exercise 2 ( Output Result ) $

$ f77 test1.f test2.f test1.f: test2.f: $

$ f77 test.f -o TEST ( Change run name by '-o' option ) ** main === End of Compilation 1 === 1501-510 Compilation successful for file test.f. $ ( Complete Compilation ) $TEST ( Rum Program ) exercise 1 ( Output Result ) $