ʪÍý²Ê³Ø²Ê 2ǯ¼¡ 2007ǯ ¸å´ü(¿å5-6) ¥·¥ß¥å¥ì¡¼¥·¥ç¥óʪÍý(2ñ°Ì ÁªÂò)
ôÅö¼Ô(½ê°)¡§¹â ¶¶ ¿® ²ð
(Íý¹©³ØÉô): taka(_#_)stu.hirosaki-u.ac.jp ¡¡(_#_)¤ò @ ¤ËÃÖ´¹¤¨¤ÆÁ÷¿®¤·¤Æ¤¯¤À¤µ¤¤
Last modified 09:45, Feb.26, 2008
Ìܼ¡
¤ª¤·¤é¤»¡§¥ì¥Ý¡¼¥È2¤ÎÉÔ´°Á´¤ÊÉôʬ¤ÏµÞ¤®ºÆÄó½Ð¤¹¤ë¤³¤È¡£(1/22)
¤ª¤·¤é¤»¡§¸¦µæ¼¼¤Ë¤Æ´üËö»î¸³¤òÊֵѤ·¤Æ¤¤¤Þ¤¹¡£(2/11)
¤ª¤·¤é¤»¡§¥ì¥Ý¡¼¥È3¤Î¥Ò¥ó¥È¤ò½Ð¤·¤Þ¤·¤¿¡£(2/11)
¥ì¥Ý¡¼¥ÈÄó½Ð¾õ¶·
Âè01²ó OCt 3, 2007 / (Last modified Oct.3,2007)
- ¹ÖµÁ
¼ø¶È³µÍפÎÀâÌÀ¡£
- ¥·¥é¥Ð¥¹¤ÎÀâÌÀ
- ¿å5Ž¥6ÁªÂò2ñ°Ì
- ¼õ¹Ö¼Ô³Îǧ
- 񂫪
- ͽ½¬¤Î¤¿¤á¤Ë¡¦Ï¢Íí
- ±¿Æ°ÊýÄø¼°¤Î²òË¡¤ò°·¤¤¤Ê¤¬¤é¿ôÃÍ·×»»Ë¡¤ÎÉü½¬
Âè02²ó Oct.10, 2007 / (Last modified Oct.10,2007)
- ¹ÖµÁ
- ±¿Æ°ÊýÄø¼°¤Î²òË¡
2³¬¤ÎÈùʬÊýÄø¼°¤ò¡¤Ï¢Î©1³¬¤ÎÈùʬÊýÄø¼°¤Ë¤¹¤ë
»þ´Ö´Ö³Öùt¤´¤È¤Ë·×»»¤ò¤¹¤ë¡£
- Eulerˡ
ùt¤Îº¸Ã¼¤Îv¤ò»È¤Ã¤Æ±¦Ã¼¤Îy¤òµá¤á¤ë
ùt¤Îº¸Ã¼¤Îa¤ò»È¤Ã¤Æ±¦Ã¼¤Îv¤òµá¤á¤ë
¡¡¡¡ - Euler-CromerË¡
ùt¤Î±¦Ã¼¤Îv¤ò»È¤Ã¤Æ±¦Ã¼¤Îy¤òµá¤á¤ë
ùt¤Îº¸Ã¼¤Îa¤ò»È¤Ã¤Æ±¦Ã¼¤Îv¤òµá¤á¤ë
- 񂫪
¡¡- ±é½¬¤½¤Î¤Þ¤¨¤Ë(fileÀ°Íý¤Î¤¿¤á¤ÎUnix¥³¥Þ¥ó¥É)
- ls sample*
sample¤«¤é»Ï¤Þ¤ëÎà»÷¤Î¥Õ¥¡¥¤¥ë̾¤ò¤¹¤Ù¤ÆÉ½¼¨¤¹¤ë
- mkdir Prog
Prog¤È¤¤¤¦¥Ç¥£¥ì¥¯¥È¥ê(¥Õ¥©¥ë¥À)¤òºîÀ®¤¹¤ë
- mv sample* Prog
Á°´ü¤Î¼ø¶È¤Çºî¤Ã¤¿¥Õ¥¡¥¤¥ë¤òProg¤È¤¤¤¦¥Ç¥£¥ì¥¯¥È¥ê¤Ë°Üư¤¹¤ë
- cd Prog
¥Ç¥£¥ì¥¯¥È¥êProg¤Ë°Ü¤ë
- ls
- pwd
¸½ºß¤Î¥Ç¥£¥ì¥¯¥È¥ê¤ò¤·¤á¤¹
- cd
¥Û¡¼¥à¥Ç¥£¥ì¥¯¥È¥ê¤ËÌá¤ë
- mkdir Simulation
Simulation¤È¤¤¤¦¥Ç¥£¥ì¥¯¥È¥ê¤òºîÀ®¤¹¤ë
¤³¤Î¼ø¶È¤Çºî¤ë¥Õ¥¡¥¤¥ë¤ÏSimulation¤È¤¤¤¦¥Ç¥£¥ì¥¯¥È¥êÆâ¤Çºî¶È¤¹¤ë
- ls
- emacs ex01.f &
¡¡¡¡
- fortran¥×¥í¥°¥é¥à¤ÎÊÔ½¸¡¦¥³¥ó¥Ñ¥¤¥ë¡¦¼Â¹Ô
°ÅÌۤη¿Àë¸À¤Ï»È¤ï¤Ê¤¤¤³¤È¤Ë¤¹¤ë
implicit none¤ò»È¤¦
- Eulerˡ
ex01.f
program ex01
implicit none
real*8 t0, y0, v0, t, y, v, a, g, dt
integer i, imax
data t0, y0, v0, g, dt/0d0, 1d1, 0d0, 9.8d0, 1d0/
data imax/100/
t = t0
y = y0
v = v0
a = -g
i = 0
write(*,*) i, t, y, v, a
do i=1,imax
a = -g
y = y + v*dt
v = v * a*dt
t = t + dt
write(*,*) i, t, y, v, a
enddo
stop
end
- Euler-Cromerˡ
ex01-2.f
do i=1,imax
a = -g
v = v * a*dt
y = y + v*dt
t = t + dt
write(*,*) i,t,y,v,a
enddo
- gnuplot¤Ë¤è¤ëÉÁ²è¡¡
ͽ¤á
f77 ex01.f
./a.out > data01.dat
f77 ex01-2.f
./a.out > data01-2.dat
¤ÇÉÁ²è¥Ç¡¼¥¿¤ò¥Õ¥¡¥¤¥ë¤ËºîÀ®¤¹¤ë
plot "data01.dat" using 2:3, "data01-2.dat" using 2:3
- ͽ½¬¤Î¤¿¤á¤Ë¡¦Ï¢Íí
- ¼¡²ó¤Ï¥ª¥¤¥é¡¼¡¦¥ê¥Á¥ã¡¼¥É¥½¥óË¡¤ò°·¤¤¤Þ¤¹
- ¥µ¥Ö¥ë¡¼¥Á¤Ë¤¹¤ëÊýË¡¤òÉü½¬¤·¤Æ¤¯¤ë¤³¤È
¡¡
- ¥ì¥Ý¡¼¥È¤Ê¤·
Âè03²ó Oct 17, 2007¡¡/ (Last modified Oct.25,2007)
- ¹ÖµÁ
¡¡±¿Æ°ÊýÄø¼°¤Î²òË¡¡¦¤½¤Î£²
- Euler RichardsonË¡¤Ë¤Ä¤¤¤Æ
¶è´Öùt¤ÎÃæ´ÖÅÀtmid¤Ë¤ª¤±¤ë®ÅÙvmid¡¢°ÌÃÖymid¤òµá¤á¤Æ¡¢Ãæ´ÖÅÀ¤Ç¤Î²Ã®ÅÙamid¤ò·×»»¤¹¤ë
a{n} = F( y{n}, v{n}, t{n} )/m
vmid = v{n} + a{n}*ùt/2
ymid = y{n} + v{n}*ùt/2
amid = F( ymid, vmid, t+ùt/2 )/m
v{n+1} = v{n} + amid*ùt
y{n+1} = y{n} + vmid*ùt
t{n+1} = t{n} + ùt
- °ì¼¡¸µ¡¦¶õµ¤Äñ¹³¤Ê¤·¤Î¾ì¹ç
m*a = - m*g
- °ì¼¡¸µ¡¦¶õµ¤Äñ¹³¤¢¤ê¡Ê®Å٤Σ±¾è¡Ë¤Î¾ì¹ç
m*a = - m*g - k*v
- 񂫪
- °ì¼¡¸µ¡¦¶õµ¤Äñ¹³¤Ê¤·
ex02.f
do i=1,imax
a = -g
vmid = v + a*dt/2
ymid = y + v*dt/2
amid = -g
v = v * amid*dt
y = y + vmid*dt
t = t + dt
write(*,*) i,t,y,v,a
enddo
- °ì¼¡¸µ¡¦¶õµ¤Äñ¹³¤¢¤ê¡Ê®Å٤Σ±¾è¡Ë
ex02-2.f
do i=1,imax
a = -g - k/m*v
vmid = v + a*dt/2
ymid = y + v*dt/2
amid = -g - k/m*vmid
v = v * amid*dt
y = y + vmid*dt
t = t + dt
write(*,*) i,t,y,v,a
enddo
- ¥ì¥Ý¡¼¥È²ÝÂê ¤Ê¤·
- Ï¢Íí¡¦Ãí°Õ
Âè04²ó Oct 24, 2007¡¡/ (Last modified Oct.25,2007)
- ¹ÖµÁ
- ®¤µ¤Î1¾è¤ËÈæÎ㤹¤ë¶õµ¤Äñ¹³¤ò¹Íθ¤·¤¿¾ì¹ç¤Î±¿Æ°ÊýÄø¼°¤ÎÄɲÃÀâÌÀ
¾å¸þ¤¤ò¥×¥é¥¹¤ÎÊý¸þ¤È¤¹¤ë¤È¡¢
¾å¾ºÃæ¡¢v>0¡¢¶õµ¤Äñ¹³²¼¸þ¤¡¢-k*v<0
¹ß²¼Ãæ¡¢v<0¡¢¶õµ¤Äñ¹³¾å¸þ¤¡¢-k*v>0
¾å¾º¡¦¹ß²¼¤¤¤º¤ì¤â¡¡m*a = -m*g -k*v
- ²òÀϲò¤ÎÀâÌÀ¡£
¶ñÂÎŪ¤Ê²ò¤¤«¤¿¡£
¤ª¤è¤Ó¤½¤Î´Ø¿ô¤Î·Á¡¦ÆÃħ¤Ë¤Ä¤¤¤Æ
- ¶õµ¤Äñ¹³¤ò-m*g*(v/vt)¤Çɽ¤·¤¿¾ì¹ç¤Ë¤Ä¤¤¤Æ¡£vt¤ÏºÇ½ª¤Î®¤µ¡£
¤¿¤È¤¨¤Ð¡¢vt = 3 m/sec
- ®¤µ¤Î2¾è¤ËÈæÎ㤹¤ë¶õµ¤Äñ¹³¤ò¹Íθ¤·¤¿¾ì¹ç¤Î±¿Æ°ÊýÄø¼°¤ÎÀâÌÀ
¶õµ¤Äñ¹³¤ò-m*g*(v/vt)**2¤Çɽ¸½¤¹¤ë¡£
¾å¾ºÃæ¡¡m*a = -m*g -m*g(v/vt)**2
¹ß²¼Ãæ¡¡m*a = -m*g +m*g(v/vt)**2
- 񂫪
- 1¼¡¸µ¡¦Â®ÅÙ1¾è¤Î¶õµ¤Äñ¹³¤¢¤ê¡Êmg(v/vt)¡Ë
ex02-2.f
do i=1,imax
a = -g - g*(v/vt)
vmid = v + a*dt/2
ymid = y + v*dt/2
amid = -g - g*(vmid/vt)
v = v * amid*dt
y = y + vmid*dt
t = t + dt
write(*,*) i,t,y,v,a
enddo
- 1¼¡¸µ¡¦Â®ÅÙ2¾è¤Î¶õµ¤Äñ¹³¤¢¤ê¡Êm*g*(v/vt)**2¡Ë
ex03.f
do i=1,imax
a = -g - g*abs(v)*v/vt**2
vmid = v + a*dt/2
ymid = y + v*dt/2
amid = -g - g*abs(vmid)*vmid/vt**2
v = v * amid*dt
y = y + vmid*dt
t = t + dt
write(*,*) i,t,y,v,a
enddo
abs(v)¤Ïv¤ÎÀäÂÐÃͤòµá¤á¤ë´Ø¿ô¡£
- ¥³¥ó¥Ñ¥¤¥ë¡¦¼Â¹Ô¡¦·ë²Ì¤ò¥Õ¥¡¥¤¥ë¤Ø
f77 ex03.f
./a.out > data03.dat
- gnuplot¤Î¥³¥Þ¥ó¥É¤ò¥Õ¥¡¥¤¥ë¤ÇÊÔ½¸¡¦Êݸ¡¦load¤·¤ÆÉ½¼¨¡£
> emacs ex03.plt &
set grid
set xlabel 'time(sec)'
set ylabel 'y(m)'
set xrange[0:10]
set yrange[-10:50]
plot 'data03.dat' using 2:4, 'data02-2.dat' using 2:4
¾å½ñ¤Êݸ¤ò¤¹¤ë¡£
> gnuplot
gnuplot> load "ex03.plt"
gnuplot> exit
- ¥ì¥Ý¡¼¥È²ÝÂꤢ¤ê
¥ì¥Ý¡¼¥ÈÈֹ桧rep01
¥×¥í¥°¥é¥à¤Î¥Õ¥¡¥¤¥ë̾¡§ex04.f
®¤µ¤Î£²¾è¤ËÈæÎ㤹¤ë¶õµ¤Äñ¹³¤ò¹Íθ¤·¤Æ¡¢£²¼¡¸µ¤Îµ°Àפòµá¤á¤è¡£
²¼µ¤Îˤ´ÝÅꤲ¤òÁÛÄꤷ¤¿¾ì¹ç¤Î¡¢Åꤲ¤ë³ÑÅÙ¤ÈÃåÃϵ÷Î¥¤Ë¤Ä¤¤¤ÆÏÀ¤¸¤è
¡¡¡¡±¿Æ°ÊýÄø¼°
£øÊý¸þ¡§ m*ax = - Fd*cos¦È¡¡
£ùÊý¸þ¡§ m*ay = -m*g - Fd*sin¦È¡¡¤¿¤À¤·¡¡Fd = k2*v**2
¡¡¡¡²Ã®ÅÙ¤Ï
£øÊý¸þ¡§ ax = -k2/m * v * vx
£ùÊý¸þ¡§ ay = -g - k2/m * v * vy
¡¡¡¡Ë¤´ÝÅꤲ¤òÁÛÄꤷ¤¿½é´ü¾ò·ï¡§
m=7(kg),¡¡k2=0.01,¡¡y0=h=2(m),¡¡v0=30(m/s),¡¡¦È0=30¡ë, 45¡ë, 60¡ë
ùt=0.01
Ãí°Õ¡§¡¡£øÊý¸þ¤È£ùÊý¸þ¤Î±¿Æ°ÊýÄø¼°¤ÏÆÈΩ¤Ç¤Ï
¤¢¤ê¤Þ¤»¤ó¡£Â®Å٥٥¯¥È¥ë¤ÎµÕ¸þ¤¤Ë¶õµ¤Äñ¹³¡Ê¥Ö¥ì¡¼¥¡Ë¤¬Æ¯¤¤Þ¤¹¡£¤½¤Î
¸þ¤¤Ï»þ´Ö¤È¤È¤â¤ËÊѲ½¤·¤Æ¤¤¤¤Þ¤¹¡£¤³¤ì¤ËÂФ·¡¢¶õµ¤Äñ¹³¤¬Ìµ¤¤¾ì¹ç¤Ï¡¢
£øÊý¸þ¤È£ùÊý¸þ¤Î±¿Æ°ÊýÄø¼°¤ÏÆÈΩ¤Ë¤Ê¤ê¤Þ¤¹¡£¤³¤Î¤³¤È¤òÎɤ¯¸¡Æ¤¤·¤Æ¤«¤é¡¢
¥×¥í¥°¥é¥à¤òºî¤ë¤³¤È¤¬¡¢½ÅÍפǤ¹¡£¤¢¤ï¤»¤Æ¡¢¶õµ¤Äñ¹³¤¬¤Ê¤¤¾ì¹ç¤ËÁÛÄꤵ¤ì¤ë
µ°ÀפÈÈæ³Ó¤·¤Æ¤ß¤ë¤ÈÎɤ¤¤Ç¤·¤ç¤¦¡£¥×¥í¥°¥é¥à¤Î¤É¤³¤ò½¤Àµ¤¹¤ì¤Ð¤è¤¤¤«¡©
¤¿¤È¤¨¤Ð¡¢¤³¤ó¤Ê´¶¤¸¡ª
t = t0
x = x0
y = y0
vx = v0*cos¦È0¡¡¡¡! ³ÑÅÙ¤Îñ°Ì¤Ï¥é¥¸¥¢¥ó
vy = v0*sin¦È0
do i=1,imax
v = sqrt( vx**2 + vy**2 )
ax = - k2/m * v * vx
ay = -g - k2/m * v * vy
vxmid = vx + ax*dt/2
vymid = vy + ay*dt/2
xmid = x + vx*dt/2
ymid = y + vy*dt/2
vmid = sqrt( vxmid**2 + vymid**2 )
axmid = ...vmid...
aymid = ...vmid...
vx = ...
vy = ...
x = ...
y = ...
t = t + dt
write(*,'(....)') t, x, y, vx, vy, ax, ay
enddo
¥°¥é¥ÕºîÀ®¡§
Êü½Ð³Ñ¦È¤ò¤¤¤í¤¤¤íÊѤ¨¤¿µ°ÀפòÉÁ¤¯¡£
³ÑÅ٦ȤÈÅþãµ÷Î¥¤Î´Ø·¸¤ò¼¨¤¹¥°¥é¥Õ(²£¼´¡§¦È¡¢½Ä¼´¡§Åþãµ÷Î¥)
- Ï¢Íí¡¦Ãí°Õ
- ¥á¡¼¥ë¤ò»È¤Ã¤¿¥ì¥Ý¡Ý¥ÈÁ÷¿®¤Ë¤Ä¤¤¤Æ
·ï̾(Subject:)¤Ëɬ¤º³ØÀÒÈÖ¹æ¤È¥ì¥Ý¡¼¥ÈÈÖ¹æ¤òµÆþ¤¹¤ë
·ï̾¤ÎÎã¡§¡¡06s20xx rep01
¤³¤ì¤Ë½¾¤ï¤Ê¤¤¤È¥ì¥Ý¡¼¥È¤¬¹ÔÊýÉÔÌÀ¤Ë¤Ê¤ë¤«¤â¤·¤ì¤Ê¤¤¤Î¤ÇÃí°Õ
Á÷¿®Àè¤Î¥¢¥É¥ì¥¹¤Ï¡¡taka(_#_)stu.hirosaki-u.ac.jp ¤Ø¡£Ã¢¤·¡¢(_#_) ¤ò @ ¤Ë½¤Àµ¤·¤ÆÁ÷¿®¡£
¥ì¥Ý¡¼¥È¤ÎÁ÷¿®Á°¤Ë·×»»·ë²Ì¤ò¤è¤¯¸¡Æ¤¤¹¤ë¤³¤È¤¬É¬ÍפǤ¹¡£
·×»»·ë²Ì¤ËÌÀ¤é¤«¤Ê¸í¤ê¤ò´Þ¤ó¤À¤Þ¤Þ¤Ç¡¢¤Ê¤ó¤ÎÀâÌÀ¤Î̵¤¤¥ì¥Ý¡¼¥È¤òÁ÷¿®¤¹¤ë¤³¤È¤Ï¿µ¤à¤Ù¤¤Ç¤¹¡£
- Äó½Ð¤¹¤ë¤â¤Î
- ¥×¥í¥°¥é¥à¥ê¥¹¥È¡£¤³¤ì¤Ï¥á¡¼¥ë¤ÎËÜÂΤإ³¥Ô¥Ú¤¹¤ë¡£
- ·×»»·ë²Ì¤Î¥°¥é¥Õ¡£eps¥Õ¥¡¥¤¥ë¤È¤·¤ÆºîÀ®¤·ÅºÉÕ¤¹¤ë¡£
- ·ë²Ì¤Ë¤Ä¤¤¤Æ¤Î¹Í»¡¡£¤³¤ì¤â¥á¡¼¥ë¤ÎËÜÂΤؽñ¤¹þ¤à¡£
Âè05²ó Oct. 31, 2007¡¡/ (Last modified Nov.01,2007 17:00)
- ¹ÖµÁ
- ñ¿¶Æ°¤Î±¿Æ°ÊýÄø¼°¤ò¿ôÃÍŪ¤Ë²ò¤¯
- Äñ¹³ÎϤ¬Ìµ¤¤¾ì¹ç
f = - k x
ma = - k x
x(t) = A cos(¦Ø0t+¦Ä) ¡Ê²òÀϲò¡Ë
¤¿¤À¤·¡¡¦Ø0^2 = k/m
a = - ¦Ø0^2x ¡¡¤È¤·¤ÆEuler-RichardsonË¡¤Ë¤«¤±¤ë¡¡¡Ê¿ôÃͲò¡Ë
Á´¥¨¥Í¥ë¥®¡¼ E = (1/2)mv^2 + (1/2)kx^2 = (1/2)kA^2¡¡¤Ï»þ´Ö¤È¤È¤â¤ËÊѲ½¤·¤Ê¤¤¡£
- ®¤µ¤ËÈæÎ㤹¤ëÄñ¹³ÎϤ¬Æ¯¤¯¾ì¹ç
f = - kx - m¦Ãv
ma = - kx - m¦Ãv
a = - ¦Ø0^2 x - ¦Ãv ¡¡¤È¤·¤ÆEuler-RichardsonË¡¤Ë¤«¤±¤ë¡¡¡Ê¿ôÃͲò¡Ë
- ®¤µ¤ËÈæÎ㤹¤ëÄñ¹³ÎϤª¤è¤Ó³°ÎÏF(t)¤Ë¤è¤ë¶îưÎϤ¬Æ¯¤¯¾ì¹ç
f = - kx - m¦Ãv + (1/m)F(t)
ma = - kx - m¦Ãv + (1/m)F(t)
(1/m)F(t) = A0 cos ¦Øt¡¡¤È¤¹¤ì¤Ð¡¡
a = - ¦Ø0^2 x - ¦Ãv + A0 cos ¦Øt
- 񂫪
ex05.f
- Äñ¹³ÎϤ¬Ìµ¤¤¾ì¹ç
t = t0 <-- 0.0
x = x0 <-- 1.0
v = v0 <-- 0.0
w2 = w02 <-- 9.0
dt = 0.01
imax = 600
Em0 = 0.5 * v**2 + 0.5 * w2 * x**2 ¡¡<-- ñ°Ì¼ÁÎ̤¢¤¿¤ê¤ÎÁ´¥¨¥Í¥ë¥®¡¼¡¡
write(*,'(1p6e15.7)') t, x, v, a, Em, 1.0
do i=1, imax
a = -w2 * x
vmid = v + a*dt/2
xmid = x + v*dt/2
amid = - w2 * xmid
v = v + amid*dt
x = x + vmid*dt
t = t + dt
Em = 0.5*v**2 + 0.5*w2*x**2
dE = Em - Em0
ratio = dE / Em0
write(*,'(1p6e15.7)') t, x, v, a, Em, ratio
enddo
t-x ¶ÊÀþ¤òÉÁ¤¯
x-v ¶ÊÀþ¤òÉÁ¤¯
t-ratio ¶ÊÀþ¤òÉÁ¤¯br>
dt ¤ò 0.2, 0.1, 0.05, 0.01, 0.0005 ¤Ê¤É¤ËÊѤ¨¤Æ¡¢¾åµ¶ÊÀþ¤¬¤É¤¦ÊѲ½¤¹¤ë¤«´Ñ»¡¤·¡¢
¹Í»¡¤·¤Æ¤ª¤¯¤³¤È¡£
±¿Æ°³«»Ï 6ÉäޤǤËÁ´¥¨¥Í¥ë¥®¡¼¤ÎÃͤÎÀºÅÙ¤¬ 0.1% °Ê²¼¤ËÊݤĤ¿
¤á¤Ë¤Ï¡¢»þ´ÖÉý dt ¤Ï¤É¤ì¤À¤±¤¬Å¬ÀÚ¤«¡©
²òÀϲò¤È¤ÎÈæ³Ó¤ò»î¤ß¤ë
- ®¤µ¤ËÈæÎ㤹¤ëÄñ¹³ÎϤ¬Æ¯¤¯¾ì¹ç
a = -w2 * x - gamma*v
.
amid = - w2 * xmid - gamma*vmid
.
.
t-x ¶ÊÀþ¤òÉÁ¤¯
x-v ¶ÊÀþ¤òÉÁ¤¯
t-ratio ¶ÊÀþ¤òÉÁ¤¯
®¤µ¤ËÈæÎ㤹¤ëÄñ¹³ÎϤª¤è¤Ó³°ÎÏF(t)¤Ë¤è¤ë¶îưÎϤ¬Æ¯¤¯¾ì¹ç
¥ì¥Ý¡¼¥È²ÝÂê¤Ê¤·
Ï¢Íí¡¦Ãí°Õ
- ͸»þ´ÖÉý dt ¤´¤È¤Î¿ôÃÍ·×»»¤Ç¤¹¤Î¤Ç¡¢É¬¤º¿¿¤Î²ò¤È¤Î¤º¤ì¤¬¤¢¤ê¤Þ¤¹¡£
¤³¤³¤Ç¤Ï¡¢Äñ¹³ÎϤ¬Ìµ¤¤¾ì¹ç¤ÏÁ´¥¨¥Í¥ë¥®¡¼¤¬°ìÄê¤Ë¤Ê¤Ã¤Æ¤¤¤ë¤³¤È¤ò»È¤Ã¤Æ¡¢³Î¤«¤á¤é¤ì¤Þ¤¹¡£
- ¿¶Æ°¸½¾Ý¤Ë¤Ä¤¤¤ÆÎɤ¯Éü½¬¤·¤Æ¤ª¤¯¤³¤È
- ¤³¤Î¸º¿ê¿¶Æ°¤Ë¤Ï¡¢²òÀϲò¤¬¤¢¤ê¤Þ¤¹¡£¤³¤ì¤âÉü½¬¡ª
- ¼¡²ó¤Ï¶¯À©¿¶Æ°¤ª¤è¤ÓLRC²óÏ©¤Ë¤Ä¤¤¤Æ¡¢°·¤¦Í½Äê¤Ç¤¹¤Î¤ÇÎɤ¯Í½½¬¤ò¤·¤Æ¤ª¤¯¤³¤È
Âè06²ó Nov. 07, 2007 / (Last modified Nov.09,2007 17:00)
- ¹ÖµÁ
- ³°ÎÏF(t)¤Ë¤è¤ê¶îư¤µ¤ì¤¿¸º¿êÄ´Ï¿¶Æ°»Ò
a = - ¦Ø0^2 x - ¦Ãv + F(t)/m
F(t)/m = A0 cos (¦Ø¡¦ t)
A0, ¦Ø ¤òÊѲ½¤µ¤»¤Æ¡¢ t-x-v¶ÊÀþ¤òÉÁ¤¡¢¤½¤Î·Á¤ÎÊѲ½¤ò¹Í»¡¤¹¤ë
- RC²óÏ©¡ÊľÎó¡Ë
¥¥ë¥Ò¥Û¥Ã¥Õ¤Îˡ§¤òÉü½¬
R¡¦(dQ(t)/dt) = R¡¦I(t) = Vs(t) - Q(t)/C ¡¡¡¡Q(t)¤Ë¤Ä¤¤¤Æ¤Î°ì³¬¤ÎÈùʬÊýÄø¼°
Vs(t) = cos (¦Ø¡¦t)
- 񂫪
- ³°ÎÏF(t)¤Ë¤è¤ê¶îư¤µ¤ì¤¿¸º¿êÄ´Ï¿¶Æ°»Ò¤Î¾ì¹ç
ex05.f ¤ËÄɲý¤Àµ¤¹¤ë
.
gamma = 0.5
omega = 2.0 ¡¡¡¡<--- ¦Ø¤Î¤³¤È
amplitude = 1.0 ¡¡¡¡<--- A0¤Î¤³¤È
.
a = -w2 * x - gamma*v + amplitude * cos ( omega * t )
.
amid = - w2 * xmid - gamma*vmid + amplitude * cos ( omega * t )
.
.
t-x ¶ÊÀþ¤òÉÁ¤¯
t-v ¶ÊÀþ¤òÉÁ¤¯
x-v ¶ÊÀþ¤òÉÁ¤¯
t-x-v ¶ÊÀþ¤òÉÁ¤¯
- ¥ì¥Ý¡¼¥È²ÝÂê¤Ê¤·
- Ï¢Íí¡¦Ãí°Õ
- ÀßÄꤷ¤¿¥Ñ¥é¥á¡¼¥¿¤Èɽ¼¨¤µ¤ì¤¿¶ÊÀþ¤Î·Á¾õ¤È¤Î´Ø·¸¤ò¡¢¤è¤¯¹Í»¡¤¹¤ë¤³¤È¡£
Âè07²ó Nov. 14, 2007 / (Last modified Nov.16,2007 18:00)
- ¹ÖµÁ
- rep01¤Î²òÀâ¡Ê¼¡²ó¤Ë¥×¥í¥°¥é¥àÎã¤òÇÛÉÛ¤·¤Þ¤¹¡Ë
ˤ´Ý¤ÎÍî²¼ÅÀ¤Îµá¤áÊý
- RC²óÏ©¤Ë¤Ä¤¤¤Æ(low pass filter, high pass filter, ÀÑʬ²óÏ©, Èùʬ²óÏ©)
- 񂫪
- 1³¬¤ÎÈùʬÊýÄø¼°
- ³°Éô¤«¤é¤ÎÆþÎÏÅ۵¤È¼è¤ê½Ð¤¹(´Ñ»¡¤¹¤ë)ü»Ò´Ö¤Î½ÐÎÏÅ۵¤Î»þ´ÖŪÊѲ½¤ò´Ñ»¡¤·¹Í»¡¤¹¤ë
- ¥ì¥Ý¡¼¥È²ÝÂê¤Ê¤·
- Ï¢Íí¡¦Ãí°Õ
- ¼¡²ó¤³¤½LRC²óÏ©(¤³¤ì¤Ï2³¬¤ÎÈùʬÊýÄø¼°¤Ë¤Ê¤ê¤Þ¤¹)
Âè08²ó Nov. 21, 2007 / (Last modified Nov.22,2007 14:00)
- ¹ÖµÁ
- rep01(ex04.f)¤Î¥×¥í¥°¥é¥àÎã¤òÇÛÉÛ¤·¤Þ¤·¤¿¡£¼«ºî¤·¤¿¤â¤Î¤ÈÈæ³Ó¤·¡¢»î¤·¤Æ¤ß¤ë¤³¤È¡£
¥µ¥Ö¥ë¡¼¥Á¥ó¤ÎÍøÍÑË¡¤òÎɤ¯Éü½¬¤·¤Æ¤ª¤¯¤³¤È
- LRC²óÏ©¤ÎÀâÌÀ (ÊÑ¿ô¤ª¤è¤Ó·¸¿ô¤ÎÂбþ´Ø·¸¤ËÃí°Õ)
L¡¦(d^2Q/dt^2) + R¡¦(dQ/dt) + Q/C = Vs(t)
¥×¥í¥°¥é¥à¤òºî¤ëºÝ¤Ï¡¢
ex05.f ¤Ç°·¤Ã¤¿
m(d^2 x/dt^2) = - kx - ¦£(dx/dt) + F(t)
¤È¤ÎÈæ³Ó¤ò¤·¤Æ¤ß¤ë¡£
¤Þ¤¿
ex06.f ¤Ç°·¤Ã¤¿
R¡¦(dQ(t)/dt) = R¡¦I(t) = Vs(t) - Q(t)/C
¤È¤âÈæ³Ó¤¹¤ë¡£
- 񂫪
- ex07.f ¤È¤¹¤ë
ex05.f µÚ¤Ó ex06.f ¤ò»²¹Í¤È¤·¤Æ¡¢¥ª¥¤¥é¡¼¤ÇºîÀ®¤¹¤ë¡¡
¤¿¤È¤¨¤Ð¡¢R=100¦¸¡¢C=3.0¦ÌF¡¢L=2.0mH
Vs(t) = V0 cos (¦Ø¡¦t)¡¢V0=1.0V
¼þÇÈ¿ô(Ëô¤Ï³Ñ¿¶Æ°¿ô¦Ø)¤ò¤¤¤í¤¤¤íÊѤ¨¤Æ¡¢ÅÅήÃÍI(t)¤ò´Ñ»¡¤¹¤ë
²£¼´¡§»þ´Ö¡¢½Ä¼´¡§ÅÅή¤Î¿Þ¤òºîÀ®¤¹¤ë
- ¥ì¥Ý¡¼¥È²ÝÂê¤Ê¤·¡Êex07.f¤ò´°À®¤Ç¤¤¿¾ì¹ç¤ÏÄó½Ð¤¹¤ë¤³¤È¡£Äó½Ð¤ÏÁ´°÷ɬ¿Ü¤Ç¤Ï¤¢¤ê¤Þ¤»¤ó¡Ë
- Ï¢Íí
- £±£²·î£µÆü¡Ê¿å¡Ë¤Î¤³¤Î¼ø¶È¤ÏµÙ¹Ö¤Ç¤¹
¡Ê¹°Á°Âç³Ø¥É¥ê¡¼¥à¹ÖºÂ¤Î¤¿¤á¸©Æâ¤Î¹â¹»¤Ø½ÐÄ¥¤¹¤ë¤¿¤á¤Ç¤¹¡Ë
Âè09²ó Nov. 28, 2007 / (Last modified Dec.01,2007 12:00)
- ¹ÖµÁ
- ex07.f¤ò¼«Í³Äó½Ð¤È¤·¤¿¤È¤³¤í4̾¤ÎÄó½Ð¤À¤±¤Ç¤·¤¿¡£
¤Ç¤¤Ê¤¤¤Î¤«¡©¡¡¤Ç¤¤Æ¤¤¤Æ¤â½Ð¤µ¤Ê¤¤¤Î¤«¡©
- Euler RichardsonË¡¤Ë¤Ä¤¤¤ÆºÆÅÙ¤ÎÀâÌÀ
- 2³¬¤ÎÈùʬÊýÄø¼°¤Î²òË¡
- ÊÑ¿ô¤ÎÂбþ´Ø·¸
±¿Æ°ÊýÄø¼° | LRC²óÏ©¤Î¥¥ë¥Ò¥Û¥Ã¥Õ¤Îˡ§ |
m(d^2x/dt^2) = - kx - ¦£(dx/dt) + F(t) |
L(d^2Q/dt^2) + R(dQ/dt) + Q/C = Vs(t) |
x | Q |
v | I |
²Ã®ÅÙ | d^2Q/dt^2 |
- 񂫪
- R=100¦¸¡¡C=3.0¦ÌF¡¡L=2.0mH¡¡Vs(t)=V0cos¦Øt¡¡V0=1.0V¡¡¤È¤·¤Æ
Euler RichardsonË¡¤òÍѤ¤¤Æ¿ôÃͲò¤òµá¤á¤Æ¹Í»¡¤¹¤ë
- ²£¼´¡§t¡¡½Ä¼´¡§I
- ²£¼´¡§t¡¡½Ä¼´¡§Å۵¡Ú Vs(t),¡¡L, R, C ¤½¤ì¤¾¤ì¤Ë¤«¤«¤ëÅŰ̺¹ ¡Û
- ²£¼´¡§¼þÇÈ¿ô¡¡½Ä¼´¡§Äê¾ï¾õÂÖ¤ÎImax
- ¥ì¥Ý¡¼¥È²ÝÂê
¥ì¥Ý¡¼¥ÈÈֹ桧rep02
Program file name : ex07.f
- Äù¤á¤¤ê¤Ï£±£²·î£±£´Æü¡Ê¶â¡Ë
- Ï¢Íí¡¦Ãí°Õ
Dec. 05, 2007 µÙ¹Ö / (Last modified Nov.22,2007 14:00)
Âè10²ó Dec. 12, 2007 / (Last modified Dec.13,2007 15:00)
- ¹ÖµÁ
- ³ÎΨÏÀŪ¥·¥ß¥å¥ì¡¼¥·¥ç¥ó
°ìÍÍÍð¿ô¤ÎȯÀ¸Ë¡¡Ê¤ÎÉü½¬¡Ë
ÁȤ߹þ¤ß´Ø¿ô rand()
¹çƱˡ¤Ë¤è¤ëÍð¿ôȯÀ¸
- Íð¿ô¤ÎÅÙ¿ôʬÉÛ¡¡n(i )
Åý·×¤ò¤È¤ë¤¿¤á¤Îʬ³ä¿ô
¥µ¥ó¥×¥ê¥ó¥°¿ô
- ³ÎΨ̩ÅÙ¤ÎʬÉÛ¡¡p(i )
ʬ³ä¿ô¡¢¥µ¥ó¥×¥ê¥ó¥°¿ô¤Ë°Í¸¤·¤Ê¤¤¥°¥é¥Õ
p(i ) = n(i ) / dx / Nsample
- 񂫪
- ÁȤ߹þ¤ß´Ø¿ô
iseed = 123457
call srand(iseed)
do i=1,100
enddo
end
- ¹çƱˡ
iy = 1234567
do i=1,100
call ransu(iy,r)
write(*,*) r
enddo
end
subroutine ransu(iy,r)
integer iy
real*8 r
iy = iy * 48828125
if(iy.lt.0) iy = ( iy + 2147483647 ) + 1
r = dfloat( iy ) * 4.6566128e-10
return
end
- ´üÂÔ¤µ¤ì¤ëÉÑÅÙ¤¬Ê¿¶ÑÃͤμþ¤ê¤Ë¤É¤ì¤¯¤é¤¤¤Ð¤é¤Ä¤¤¤Æ¤¤¤ë¤«¤ò´Ñ»¡¤¹¤ë¡£
ʬ³ä¿ô = 100, Nsample = 100Ëü¡¡¤Î¾ì¹ç
ʬ³ä¿ô = 500, Nsample = 100Ëü¡¡¤Î¾ì¹ç
ʬ³ä¿ô =1000, Nsample = 100Ëü¡¡¤Î¾ì¹ç,,,,
- ¥ì¥Ý¡¼¥È²ÝÂê ̵¤·
- Ï¢Íí¡¦Ãí°Õ
- ¼¡²ó¤Ï³ÆÉÑÅÙÃͤÈÊ¿¶ÑÃͤκ¹¤Î¤Ð¤é¤Ä¤Åٹ礤¤ò¿ôÃͲ½¤·¤Þ¤¹¡Ê-->ʬÉÛ¤ò¸«¤ë¡Ë
¤³¤ÎʬÉÛ¤òÀµµ¬Ê¬Éۤˤ¢¤Æ¤Ï¤á¤Æ¤ß¤Þ¤¹¤Î¤Ç¡¢Àµµ¬Ê¬ÉÛ¡Ê¥¬¥¦¥¹Ê¬Éۡˤòͽ½¬¤·¤Æ¤¯¤ë¤³¤È
- gnuplot ¤Ë¤Ä¤¤¤Æ
plot "data.dat" u 1:2 with histeps
¤³¤Î¾ì¹ç¡¢xºÂɸ¤ÎÃͤˤϳƶè´Ö¤ÎÃæ±û¤ÎÃͤòµÆþ¤¹¤ë
Âè11²ó Dec. 19, 2007 / (Last modified Jan.09,2008 12:00)
- ¹ÖµÁ
- ¥ì¥Ý¡¼¥È£²¤Î²òÀâ¡¢¥×¥í¥°¥é¥àÎã¤ÎÇÛÉÛ
- ¼¡¤Î¤³¤È¤òͽ¬¤·¤Æ·×»»¤ò¼Â¹Ô¤¹¤ë¤³¤È¤¬Âç»ö¡£
(1) ·«¤êÊÖ¤··×»»¤¬²¿²ó¤ª¤³¤Ê¤ï¤ì¤Æ¤¤¤ë¤«¡©
(2) ·×»»»þ´Ö¤Ï¤É¤ì¤À¤±¤Ë¤Ê¤ë¤«¡©
(3) ¥Õ¥¡¥¤¥ë¤Ë½ñ¤½Ð¤·¤¿ÍÆÎ̤Ϥɤì¤À¤±¤Ë¤Ê¤Ã¤Æ¤¤¤ë¤«¡©
- °ìÍÍÍð¿ô¤ÎʬÉۤΤФé¤Ä¤Åٹ礤¤òÄ´¤Ù¤ë¡£
ÅÙ¿ô¤ÎÊ¿¶ÑÃͤÈÅÙ¿ô¤ÎʬÉÛ
- 񂫪
- ¥ì¥Ý¡¼¥È²ÝÂê¤Ê¤·
- Ï¢Íí¡¦Ãí°Õ
Âè12²ó Jan. 09, 2008 / (Last modified Jan.17,2008 20:15)
- ¹ÖµÁ
- °ìÍÍÍð¿ô¤ÎʬÉۤΤФé¤Ä¤Åٹ礤¤òÄ´¤Ù¤ë¡£
--> Àµµ¬Ê¬ÉÛ¤ò¤·¤Æ¤¤¤ë
- ¥Ç¡¼¥¿¤Î²òÀÏ
--> »þ´Öº¹¤ÎʬÉÛ¤ò¤ß¤ë --> »Ø¿ôʬÉۤˤʤäƤ¤¤ë
--> ÆüÉÕÊѹ¹¤È¤Ê¤ë»þ¹ï¥Ç¡¼¥¿¤Î°·¤¤¤ËÃí°Õ
- 񂫪
- ex08.f¡¡¡¡ex08.plt
- 070109.DAT
open(1,file='070109.DAT')
do i=1,20000
read(1,'(3i2)') hh,mm,ss
enddo
close(1)
- Ï¢Íí¡¦Ãí°Õ
Âè13²ó Jan. 16, 2008 / (Last modified Jan.17,2008 15:15)
- ¹ÖµÁ
- °ìÍÍÍð¿ô¤ÎʬÉۤΤФé¤Ä¤Åٹ礤¤òÄ´¤Ù¤ë¡£
--> Àµµ¬Ê¬ÉÛ¶ÊÀþ¤ò½Å¤Í¤ÆÉÁ¤¯
--> ½Ä¼´¤¬Ê¬³ä¿ôN¤ä¥µ¥ó¥×¥ê¥ó¥°¿ôImax¤Ë°Í¸¤·¤Ê¤¤¤è¤¦¤Ë¤¹¤ë
--> ʬ³ä¿ô N¡¤¥µ¥ó¥×¥ê¥ó¥°¿ô Imax ¤òÊѲ½¤µ¤»¡¢Ê¬ÉۤηÁ¤ò´Ñ»¡¤¹¤ë¡£
--> Ê¿¶ÑÃͤÈɸ½àÊк¹ÃͤȤδط¸¤ò´Ñ»¡¤¹¤ë¡£
- ¥Ç¡¼¥¿²òÀϤˤĤ¤¤Æ(¼¡²ó¤Î¤¿¤á¤Î²òÀâ)
»þ´Öº¹Ê¬ÉÛ --> Ê¿¶Ñ»þ´Öº¹¤òµá¤á¤Æ¤ª¤¯
1»þ´Ö¤´¤È¤ÎÈôÍè¿ô¤ÎʬÉÛ --> ¥Ð¥é¥Ä¥¤¬¤¢¤Ã¤Æ¤âÊ¿¶ÑÌó£±£µ£°°Ì¡£
»Ø¿ôʬÉۤζÊÀþ¤ò½Å¤Í¤ÆÉÁ¤¯
¤³¤Î»Ø¿ôʬÉۤ˽¾¤¦Íð¿ô¤òȯÀ¸¤·¤Æ¡¢ÈôÍè»þ´Ö¤Î¥·¥ß¥å¥ì¡¼¥·¥ç¥ó¤ò¤¹¤ë
- 񂫪
- Ï¢Íí¡¦Ãí°Õ
- ¼¡²ó¤ÏÄÌ¾ï¼ø¶È¤ò¤·¤Þ¤¹¡£
´üËö»î¸³¤Ï1·î£³£°Æü¤Ë±ä´ü¤·¤Þ¤¹¡£
- ¼¡²ó¤Ë¥ì¥Ý¡¼¥È£³¤Î²ÝÂê¤ò½Ð¤·¤Þ¤¹¡£
Âè14²ó Jan. 23, 2008 / (Last modified Jan.17,2008 15:15)
´üËö»î¸³¤ÎͽÄê¤ò¡¢¼¡²ó1·î£³£°Æü¤Ë±ä´ü¤·¤Þ¤¹¡£
Âè15²ó Jan. 30, 2008 / (Last modified Jan.23,2008 15:15)
´üËö»î¸³¤ò¼Â»Ü¤·¤Þ¤¹¡£
¥ì¥Ý¡¼¥ÈÄó½Ð¾õ¶· ¡¡(¡¡¡û°õ¡§¥ì¥Ý¡Ý¥È¥á¡¼¥ë¼õ¿®¡¤¡¡¢¤°õ¡§ÆâÍÆÉÔ½½Ê¬¡¤¡¡_¡§Ì¤Ãå¿®¡¡)
(Last modified 09:45, Feb.26, 2008)
¥ì¥Ý¡¼¥È2¤ÎÉÔ´°Á´¤ÊÉôʬ¤ÏµÞ¤®ºÆÄó½Ð¤¹¤ë¤³¤È¡£Ì¤Äó½Ð¤Î¼Ô¤âɬ¤ºÄó½Ð¤¹¤ë¤³¤È¡£(1/22)
½¤ÀµÄó½Ð¤ª¤è¤Ó̤Äó½Ð¥ì¥Ý¡¼¥È¤ÎÄó½ÐÄù¤áÀÚ¤ê¤Ï£²·î£²£²Æü(¶â)¤È¤·¤Þ¤¹¡£(2/11)
½ÐÂêÆü |
10/24 |
11/28 |
01/23 |
_/__ |
_/__ |
---|
ÄùÀÚÆü |
11/09 |
12/14 (last check 2/22 18:15) |
02/22 (last check 2/26 09:45) |
_/__ |
_/__ |
---|
¥ì¥Ý¡¼¥ÈÈÖ¹æ |
rep01 |
rep02 |
rep03 |
_____ |
_____ |
---|
Program file name |
ex04.f |
ex07.f |
ex09.f |
_____ |
_____ |
---|
ÇÛÅÀ(»ÃÄêËþÅÀ) |
10ÅÀ |
10ÅÀ |
15ÅÀ |
____ |
____ |
program / figure |
p | f | p | f | p | f | p | f | p | f |
03 | ¡û | ¡û | _ | _ | _ | _ | _ | _ | _ | _ |
04 | ¡û | ¡û | ¡û | ¡û |
¡û | ¢¤(fig0901, fig0903, fig0904-2,°Ê³°¤Ï³«¤«¤Ê¤¤¤è¡©) |
_ | _ | _ | _ |
05 | ¡û | ¡û | ¡û |
¢¤(¿Þ3¤Þ¤ÀÊѤÀ¡ª²£¼´¤òÂпôÌÜÀ¹¤ê¤ÇÉÁ¤¯¤È¡¢º¸±¦ÂоΤˤʤë)2/19 |
¡û | ¡û |
_ | _ | _ | _ |
06 | ¡û | ¡û | ¢¤(¤â¤¦¾¯¤·¹Í»¡Íߤ·¤¤¤Í) |
¿Þ3¤â¤¦¤Á¤ç¤Ã¤È¤Ç¤¹¤Í |
¡û | ¡û |
_ | _ | _ | _ |
07 | ¡û | ¡û | ¡û |
¿Þ3¤â¤¦¤Á¤ç¤Ã¤È¤Ç¤¹¤Í |
¡û | ¡û |
_ | _ | _ | _ |
12 | ¡û | ¡û | ¢¤(¤â¤Ã¤È¹Í»¡É¬Í×) |
¿Þ1,2,3¤É¤ì¤â³«¤«¤Ê¤¤¤¾ º£²ó¤â¡¤ex07.eps, ex07-1.eps, ex07-2.eps¤É¤ì¤â³«¤«¤Ê¤¤¤è¡©(2/22,13:00) |
¢¤(¹Í»¡Â¤ê¤Ê¤¤) | ¡û |
_ | _ | _ | _ |
16 | ¡û | ¡û | ¡û | ¡û |
¢¤ | ¢¤(2ÈÖÌܤοޤϽļ´¤òÂпôɽ¼¨¤Ç) |
_ | _ | _ | _ |
17 | ¡û | ¡û | ¡û | ¡û |
¡û | ¡û(¤â¤¦¾¯¤·¹Í»¡¤¬Íߤ·¤«¤Ã¤¿¤Í) |
_ | _ | _ | _ |
19 | ¡û | ¡û | ¡û |
¿Þ3¤¬Ìµ¤¤ |
¢¤ |
¢¤(¤â¤¦¾¯¤·¤¬¤ó¤Ð¤ê¤Þ¤»¤ó¤«) |
_ | _ | _ | _ |
20 | ¡û | ¡û | ¢¤(¹Í»¡É¬Í×) |
¿Þ1,2,3¤É¤ì¤â³«¤«¤Ê¤¤¤¾ |
_ | _ | _ | _ | _ | _ |
25 | ¡û | ¡û | ¡û |
¿Þ1,¿Þ3³«¤«¤Ê¤¤¤¾ |
¢¤ |
¢¤(¤â¤¦¾¯¤·¤¬¤ó¤Ð¤ê¤Þ¤»¤ó¤«) |
_ | _ | _ | _ |
31 | ¡û | ¡û | ¡û |
¡û(¿Þ3 º£ÅÙ¤Ïok!) |
¡û | ¡û(£³ÈÖÌܤοޤÁ¤ç¤Ã¤È¤Ø¤ó¤«¤Ê¡ª) |
_ | _ | _ | _ |
32 | ¡û | ¡û | ¡û | ¡û |
¢¤ |
¢¤(¹Í»¡¤Ç¤â¼è¤ê¾å¤²¤Æ¤¤¤ë¤Î¤À¤¬¡¤report09-3-1.eps, report09-3-2.eps ¤ÇÀÖÀþ¤ÈÎ理ÎÀþ¤¬Î¥¤ì¤Æ¤¤¤ë¤Î¤Ï¤Ø¤ó¤À¤¾¡£¤¤¤Å¤ì¤Î¾ì¹ç¤Ç¤â°ìÃפ¹¤ë¤Ï¤º¡£) |
_ | _ | _ | _ |
33 | ¡û | ¡û | _ | _ | _ | _ | _ | _ | _ | _ |
35 | ¡û | ¡û | ¡û | ¡û |
¢¤(¹Í»¡ÉÔ½½Ê¬) | ¡û(½Ä¼´¡¦²£¼´¤Îlabel¤¯¤é¤¤½ñ¤¤Ê¤µ¤¤) |
_ | _ | _ | _ |
38 | ¡û | ¡û | ¡û | ¡û |
¡û | ¡û |
_ | _ | _ | _ |
48 | ¡û | ¡û | ¡û |
¢¤(¿Þ3¤Îº¸È¾Ê¬¤ËÉÔÍפÊÅÀ¤¬Â¿¿ô¤¢¤ê¤Þ¤¹¤Í)2/19 |
¡û | ¡û |
_ | _ | _ | _ |
program / figure |
p | f | p | f | p | f | p | f | p | f |
¥ì¥Ý¡¼¥ÈÈÖ¹æ |
rep01 |
rep02 |
rep03 |
_____ |
_____ |
---|
taka(_#_)stu.hirosaki-u.ac.jp