合同プログラミングゼミ

第1回

　Cygwinの説明

l コマンドプロンプト

Ø username@D43 ~/　 ＜＝ ユーザー名＠コンピュータ名 現在のディレクトリ

$ ＜＝ プロンプト

l 基本コマンド

Ø pwd：現在のディレクトリパスの表示

Ø cd：ディレクトリの移動

Ø ls：ファイルのリスト表示

Ø more：テキストファイルの中身の表示

Ø rm：ファイルの削除

Ø rmdir：ディレクトリの削除

Ø mkdir：ディレクトリの作成

l g95

Ø ファイルの体裁

² ****.f95 ：　拡張子 .f95（.f90：Fortran90，.f or .for：Fortran77）

Ø $ g95 test1.f95 　　でtest1.f95というファイルをコンパイル　－＞　a.exeという実行ファイルが生成される

Ø $ ./a.exe 　　で実行

プログラム実習１

“Hello World”プログラムの作成

l Fortran95で，”Hello World”と出力するプログラムを作成する．

　サンプルプログラム1

program test1

write(*,*) “Hello World”

end program test1

　サンプルプログラム2：”Test 2”と出力するプログラム

program test2

write(*,*) “Test 2”

end program test2

プログラム実習2

SampleData.txtの読み込み，SampleData-a.txtへの書き出し

l 1時間ごと，24時間分の気象データ（時間，気圧，気温，相対湿度，風速）のデータを１行ずつ読み込み，別ファイルに書き出す

l Doループ文で24回繰り返す

Ø do i=1, 24

……

enddo

l 変数の宣言

Ø implicit none： 変数は必ず宣言しなければいけない

Ø integer：整数型変数の宣言

Ø real：実数型変数の宣言

Ø integer, parameter：整数型パラメタの宣言

l open文，close文

Ø open(unit=10, file=”SampleData.txt”)

² unit=：装置番号 0～99，0，5，6は使わないこと

² file=：使用するファイル名の指定

Ø close(unit=10)：openしたら必ずcloseする

l read文，write文

サンプルプログラム3

program test3

! no dimension version

implicit none

integer, parameter :: n=24

integer :: hour

real :: pres, temp, rh, u

integer :: i

open(unit=10, file='SampleData.txt')

open(unit=20, file='SampleData-a.txt')

do i=1, n

read(10,*) hour, pres, temp, rh, u

write(20,*) hour, pres, temp, rh, u

end do

close(10)

close(20)

end program test3