[問題] 關於BACKPACE的寫法請教
板上各位高手好,
小弟目前實作時會用BACKSPACE這個功能,
但是在寫作上有些邏輯上的問題;
部分程式碼如下:
1 open(unit=13,file='tmp1.log',form='formatted',status='old',&
2 & access='sequential',position='append')
3
4 backspace(13)
5
6 do while(.true.)
7
8 read(13,'(a132)',iostat=error,advance='no')line
9
10 if(error/=0)then
11 write(*,*)'read input done!'
12 exit
13 end if
14
15 write(*,*)line
19
20 do loop2=1,2,1
21 backspace(13)
22 end do
23
24 end do
問題點在程式碼20~22行處,
我的想法是既然我已經把backspace寫在do while當中了,
每讀取一次應該就會把讀取位置倒回一行,
但是實際上卻是需要用到do...end do來包裝backspace,
否則程式只會不斷得給我讀取檔案中的最後一行。
請問是否我在寫作上的邏輯有問題?
先感謝大家的討論與建議,謝謝!
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 59.115.179.44
※ 文章網址: http://www.ptt.cc/bbs/Fortran/M.1409846689.A.062.html
推
09/05 09:16, , 1F
09/05 09:16, 1F
推
09/05 09:19, , 2F
09/05 09:19, 2F
→
09/05 09:20, , 3F
09/05 09:20, 3F
→
09/05 13:07, , 4F
09/05 13:07, 4F
→
09/05 13:08, , 5F
09/05 13:08, 5F
推
09/12 11:20, , 6F
09/12 11:20, 6F
→
09/12 11:21, , 7F
09/12 11:21, 7F
Fortran 近期熱門文章
PTT數位生活區 即時熱門文章