大変お世話になりましたm(_ _)m
日付 | 曜日 | 開始〜終了 | 作業時間(h) | 立合 | 作業内容 |
4/18 | 月曜日 | 14:00~18:00 | 4 | 後藤 | Linuxの基本操作 |
4/21 | 木曜日 | 14:30~18:00 | 3.50 | 後藤 | 翻訳の分担&パソコン |
4/25 | 月曜日 | 15:00~19:00 | 4 | 後藤 | フォートラン入門 |
5/16 | 月曜日 | 15:00~19:00 | 4 | 後藤 | calculix(片持ち梁のたわみ) |
5/23 | 月曜日 | 15:00~19:00 | 4 | 後藤 | 片持ち梁のたわみ |
5/26 | 木曜日 | 14:30~18:30 | 4 | 後藤 | calculix(アクリルのたわみ) |
6/2 | 木曜日 | 14:30~19:30 | 5 | 後藤 | calculix(アクリルのたわみ) |
6/6 | 月曜日 | 14:00~19:00 | 5 | 後藤 | calculix(直交異方性材料の応力ひずみ) |
6/9 | 木曜日 | 14:30~19:30 | 5 | 後藤 | calculix(直交異方性材料の応力ひずみ) |
6/12 | 日曜日 | 14:00~18:00 | 4 | 後藤 | calculix(直交異方性材料の応力ひずみ) |
6/13 | 月曜日 | 14:00~19:00 | 5 | 後藤 | calculix(直交異方性材料の応力ひずみ) |
6/16 | 木曜日 | 14:30~19:30 | 5 | 後藤 | calculix |
6/20 | 月曜日 | 14:00~18:00 | 4 | 後藤 | calculix |
6/23 | 木曜日 | 10:30~14:30 | 4 | 後藤 | 船川打ち合わせ |
6/27 | 月曜日 | 14:00~19:00 | 5 | 後藤 | calculix |
6/30 | 木曜日 | 10:30~14:30 | 4 | 後藤 | 船川資料整理 |
7/4 | 月曜日 | 14:00~19:00 | 5 | 後藤 | LateXとXHTML |
7/7 | 木曜日 | 10:30~14:30 | 4 | 後藤 | 船川資料整理 |
7/21 | 木曜日 | 10:30~14:30 | 4 | 後藤 | 船川資料整理 |
7/25 | 月曜日 | 12:00~18:00 | 6 | 後藤 | LateXとXHTML |
7/28 | 木曜日 | 10:30~14:30 | 4 | 後藤 | 船川資料整理 |
8/4 | 木曜日 | 10:30~14:30 | 4 | 後藤 | 船川資料整理 |
8/15 | 月曜日 | 12:00~18:00 | 6 | 後藤 | LateXとXHTML |
8/18 | 木曜日 | 10:30~14:30 | 4 | 後藤 | 船川資料整理 |
8/22 | 月曜日 | 10:00~15:00 | 5 | 後藤 | LateXとXHTML |
8/24 | 木曜日 | 10:30~14:30 | 4 | 後藤 | 船川資料整理 |
9/15 | 木曜日 | 10:30~14:30 | 4 | 後藤 | 船川資料の複写テスト |
9/16 | 金曜日 | 14:00~18:00 | 4 | 後藤 | gthumb、ウェブアルバム |
9/26 | 月曜日 | 12:00~19:00 | 7 | 後藤 | gthumb、ウェブアルバム |
9/29 | 木曜日 | 10:00~15:00 | 5 | 後藤 | 船川資料の複写 |
11/17 | 木曜日 | 12:00~17:00 | 5 | 後藤 | XHTML、ウェブアルバム |
11/18 | 金曜日 | 14:00~19:00 | 5 | 後藤 | XHTML、ウェブアルバム |
11/19 | 土曜日 | 14:00~19:00 | 5 | 後藤 | ImageMagick?、ウェブアルバム |
11/21 | 月曜日 | 14:00~19:00 | 5 | 後藤 | ImageMagick?、ウェブアルバム |
11/24 | 木曜日 | 14:00~19:00 | 5 | 後藤 | XHTML、スタイルシート |
11/25 | 金曜日 | 14:00~19:00 | 5 | 後藤 | XHTML、スタイルシート |
11/26 | 土曜日 | 8:00~16:30 | 8.50 | 後藤 | 船川土木遺産シンポジウム |
11/29 | 火曜日 | 14:00~19:00 | 5 | 後藤 | XHTML、検索機能 |
11/30 | 水曜日 | 11:00~17:00 | 6 | 後藤 | XHTML、検索機能 |
12/2 | 金曜日 | 14:00~19:00 | 5 | 後藤 | XHTML、cgiスクリプト |
12/6 | 火曜日 | 14:00~19:00 | 5 | 後藤 | XHTML |
12/7 | 水曜日 | 10:00~15:00 | 5 | 後藤 | XHTML |
12/9 | 金曜日 | 14:00~19:00 | 5 | 後藤 | XHTML |
12/10 | 土曜日 | 13:00~18:00 | 5 | 後藤 | XHTML |
12/13 | 火曜日 | 12:00~18:00 | 6 | 後藤 | XHTML |
12/14 | 水曜日 | 10:00~17:00 | 7 | 後藤 | 中間発表用スライド作成 |
12/16 | 金曜日 | 14:00~19:00 | 5 | 後藤 | スライド作成 |
12/17 | 土曜日 | 13:00~19:00 | 6 | 後藤 | スライド作成 |
12/19 | 月曜日 | 11:00~16:00 | 5 | 後藤 | 中間発表 |
12/22 | 木曜日 | 13:00~19:00 | 6 | 後藤 | XHTML |
12/23 | 金曜日 | 14:00~19:00 | 5 | 後藤 | XHTML |
12/27 | 火曜日 | 10:00~15:00 | 5 | 後藤 | 資料分析 |
1/9 | 月曜日 | 10:00~17:00 | 7 | 後藤 | 資料分析 |
1/11 | 水曜日 | 10:00~17:00 | 7 | 後藤 | 資料分析 |
1/12 | 木曜日 | 10:00~15:00 | 5 | 後藤 | 資料分析 |
1/13 | 金曜日 | 10:00~17:00 | 7 | 後藤 | 資料分析 |
1/17 | 火曜日 | 10:00~15:00 | 5 | 後藤 | 資料分析 |
1/18 | 水曜日 | 10:00~17:00 | 7 | 後藤 | 発表概要TEX作成 |
1/19 | 木曜日 | 13:00~18:00 | 5 | 後藤 | TEX作成 |
1/23 | 月曜日 | 10:00~17:00 | 7 | 後藤 | TEX作成、資料分析 |
1/24 | 火曜日 | 13:00~18:00 | 5 | 後藤 | 資料分析 |
1/25 | 水曜日 | 12:00~19:00 | 7 | 後藤 | 発表用スライド作成 |
1/27 | 金曜日 | 13:00~18:00 | 5 | 後藤 | スライド作成 |
1/28 | 土曜日 | 10:00~16:00 | 6 | 後藤 | 資料分析 |
1/30 | 月曜日 | 10:00~15:00 | 5 | 後藤 | TEX、スライド作成 |
2/2 | 木曜日 | 13:00~19:00 | 6 | 後藤 | 発表練習、スライド |
2/3 | 金曜日 | 10:00~18:00 | 8 | 後藤 | TEX、スライド作成 |
2/4 | 土曜日 | 13:00~19:00 | 6 | 後藤 | スライドまとめ |
2/5 | 日曜日 | 13:00~19:00 | 6 | 後藤 | スライドまとめ |
2/6 | 月曜日 | 13:00~17:00 | 5 | 後藤 | スライドまとめ |
合計 | 364 |
要素分解数(nx.ny/2.nz/10) | nx*10*100 | 8*ny*100 | 8*10*nz |
1 | 4.8456E-04 | 4.6903E-04 | 1.9795E-04 |
2 | 4.8808E-04 | 4.8422E-04 | 3.5896E-04 |
3 | 4.8879E-04 | 4.8722E-04 | 4.2345E-04 |
4 | 4.8906E-04 | 4.8835E-04 | 4.5243E-04 |
5 | 4.8906E-04 | 4.6728E-04 | |
6 | 4.7549E-04 | ||
7 | 4.8087E-04 | ||
8 | 4.8476E-04 | ||
9 | 4.8707E-04 | ||
10 | 4.8906E-04 |
implicit real*8(a-h,o-z) character a20*20,b20*20 nretu=3 open(4,file='lsjpg') read(4,*) n open(5,file='lsjpeg') iretu=0 do i=1,n if(iretu==0) then print*,'<tr>' end if iretu=iretu+1 read(4,*) a20 read(5,*) b20 print*,'<td><a href=\"',a20,'"><img src="',b20,'\" /></a></td>' if(iretu==nretu) then print*,'</tr>' iretu=0 end if end do end
implicit real*8(a-h,o-z) character a20h*20,a20je*20,a20j*20,html*20,a40l*40 nretu=6 open(1,file='lshtml') read(1,*) n open(2,file='lsjpeg') open(3,file='lsjpg') open(4,file='lslh') open(7,file='index.html') iretu=0 write(7,*) '<html>' write(7,*) '<body>' write(7,*) '<table>' do i=1,n if(iretu==0) then write(7,*) '<tr>' end if iretu=iretu+1 read(1,*) a20h read(2,*) a20je read(4,'(a40)') a40l write(7,*) '<td>' write(7,*) ' <a href=\"',a20h,'"><img src="',a20je,'\" /></a><br />' write(8,*) ' <p>' write(8,*) ' <small>' write(7,*) ' 資料番号:',i,'<br />' write(7,'(a40)') a40l write(8,*) ' </small>' write(8,*) ' </p>' write(7,*) '</td>' if(iretu==nretu) then write(7,*) '</tr>' iretu=0 end if open(8,file=a20h) read(3,*) a20j write(8,*) '<html>' write(8,*) '<body>' write(8,*) '<p>' write(8,*) '<a href=\"',a20j,'"><img src="',a20je,'\" /></a><br />' write(8,'(a40)') a40l write(8,*) '</p>' write(8,*) '<ul>' write(8,*) ' <li>資料番号:',i,'</li>' write(8,*) ' <li>画像種別:</li>' write(8,*) ' <li>紙種:</li>' write(8,*) ' <li>年代:</li>' write(8,*) ' <li>キーワード:</li>' write(8,*) '</ul>' write(8,*) '</body>' write(8,*) '</html>' close(8) end do write(7,*) '</table>' write(7,*) '</body>' write(7,*) '</html>' close(1) close(2) close(3) close(7) end
implicit real*8(a-h,o-z) character a20h(1000)*20,a20je*20,a20j*20,html*20,a40l*40 nretu=6 open(1,file='lshtml') read(1,*) n open(2,file='lsjpeg') open(3,file='lsjpg') open(4,file='lslh') open(7,file='index.html') iretu=0 write(7,*) '<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN"' write(7,*) '"http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">' write(7,*) '<html xmlns="http://www.w3.org/1999/xhtml"' write(7,*) 'xml:lang="ja" version="-//W3C//DTD XHTML 1.1//EN">' write(7,*) '<head>' write(7,*) '<meta http-equiv="Content-type" content="application/xhtml+xml;' write(7,*) 'charset=utf-8" />' write(7,*) '<meta http-equiv="Content-Style-Type" content="text/css" />' write(7,*) '<link rel="stylesheet" href="./webhtml_1.css" ' write(7,*) 'type="text/css" />' write(7,*) '<title>画像アルバム</title>' write(7,*) '</head>' write(7,*) '<body>' write(7,*) '<table>' do i=1,n read(1,*) a20h(i) end do do i=1,n if(iretu==0) then write(7,*) '<tr>' end if iretu=iretu+1 read(2,*) a20je read(4,'(a40)') a40l write(7,*) '<td>' write(7,*) ' <a href=\"',a20h(i),'"><img src="',a20je,'\" /></a><br />' write(7,*) ' <p>' write(7,*) ' <small>' write(7,*) ' 資料番号:',i,'<br />' write(7,'(a40)') a40l write(7,*) ' </small>' write(7,*) ' </p>' write(7,*) '</td>' if(iretu==nretu) then write(7,*) '</tr>' iretu=0 end if open(8,file=a20h(i)) read(3,*) a20j write(8,*) '<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN"' write(8,*) '"http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">' write(8,*) '<html xmlns="http://www.w3.org/1999/xhtml"' write(8,*) 'xml:lang="ja" version="-//W3C//DTD XHTML 1.1//EN">' write(8,*) '<head>' write(8,*) '<meta http-equiv="Content-type" content="application/xhtml+xml;' write(8,*) 'charset=utf-8" />' write(8,*) '<meta http-equiv="Content-Style-Type" content="text/css" />' write(8,*) '<link rel="stylesheet" href="./webhtml_2.css" ' write(8,*) 'type="text/css" />' write(8,*) '<title>',a20j,'</title>' write(8,*) '</head>' write(8,*) '<body>' write(8,*) '<p>' write(8,*) '<a href="./index.html">上</a><br />' write(8,*) '<a href="',a20h(i-1),'">前</a>' write(8,*) '<a href=\"',a20j,'"><img src="',a20j,'" width="600" \" /></a>' write(8,*) '<a href="',a20h(i+1),'">次</a><br />' write(8,'(a40)') a40l write(8,*) '</p>' write(8,*) '<ul>' write(8,*) ' <li>資料番号:',i,'</li>' write(8,*) ' <li>画像種別:</li>' write(8,*) ' <li>紙種:</li>' write(8,*) ' <li>年代:</li>' write(8,*) ' <li>キーワード:</li>' write(8,*) '</ul>' write(8,*) '</body>' write(8,*) '</html>' close(8) end do write(7,*) '</tr>' write(7,*) '</table>' write(7,*) '</body>' write(7,*) '</html>' close(1) close(2) close(3) close(4) close(7) end