????????? ????????? SPMODEL

1
?????????????????? SPMODEL

• ???? (???)
• ???? (??????)
• ???? (?????)
• ???? (???)
• ??? (???)

2
1.????

• ??????????????????
• ?????????????(?????)
• ?????????
• ???????, ????????????
• ?????????????
• ??????
• ???????????????(????)
• ???????????
• ???????, ????????????
• ???????????, ?????????
• ??????????

3
2.???????????

• ???????????????
• ??????????????
• ???????????????
• ???????????????
• ??????
• ????????????????????
• ??????
• ??????????????????
• ???????????

4
3.SPMODEL

• ??????????????????
• GFD ???????????????
• Fortran90 ???
• ????
• ??????????
• ??????????????
• ???????????
• ???????????
• ??????? ISPACK, ??? I/O ? gt4f90io

5
4.??????????????

• ?????????????
• ?????????(spml)???
• ISPACK ? Fortran90 ????????
• ???????, ???, ??????
• ??????? gt4f90io ?????
• gtool4 netCDF ?????????????
• 4 ????????? call ????

6
5.SPMODEL ??

• ??
• ????????????????
• ?????? g_Zeta
• ???????? s_Zeta
• ????
• (???)_(??)_(???) ??????
• ??????? s_Zetas_g(g_Zeta)
• ??? g_Zetag_s(s_Zeta)
• ?? s_Div_g(g_Zeta)
• ???????????????

7
6.???????

• 1 ???????????
• ???? (Euler ??????)
• ???????????????
• 2??, 3???????????????

s_ZetaA s_ZetaB

dt( - Us_Dx_s(s_Zeta)
Ds_Dx_s(s_Dx_s(s_Zeta))
8
7.???????(??? I/O ?)

• use gt4history
  ! ???????
• call HistoryCreate( ! ????????
• fileoutput_file, titleRun Number,
  sourceshallow institutionGFD Dennou Club
  SPMODEL project, dims(/lon,lat,t
  /),dimsizes(/im,jm,0/), longnames(/longit
  ude,latitude ,time /),
  units(/'deg.','deg.','sec.'/),
  originreal(tinit), intervalreal(intrstdelt
  ) )
• call HistoryAddVariable( varnameeta, !
  ??????
• dims(/lon,lat,t /),
  lognameVorticity, units1/s,xtypedouble)
• do it 1, n ! ?????
• call HistoryPut(eta,xy_Eta) ! ????
• end do
• call HistoryClose ! ?????

9
8.?????????

• ????????????????
• 1 ?????
• ???????, KdV ???
• 2 ?????
• ????????????, ??ß??????
• ?????????, ???????
• 3 ?????
• ??????????
• ?? MHD ???
• ?????????(???)

10
9.????

• ????(x86 Linux)
• Fujitsu frt ver.3.0, 4.0 (5.0 ???????)
• Intel ifc ver.6.0, 7.0
• 8.0 ????(8.0.039)???????
• ??????????
• Fujitsu VPP VPP800, VPP5000
• NEC SX ?????

11
10.???? CPU ??

• ??????????
• 15 ????????
• ?t1800 sec, 720 ????(T106 ??t900 sec)
• ??? hhmmss
• ?????????

T42 T63 T106
Xeon 2.4GHz 000033 000109 001352
VPP800 000009 ---------- 000153
12
11.???????????

• Williamson et al.(1992) ???????????
• 0, 5, 10, 15 ????? h ???

13
12.SPMODEL ???

• ??????????????????
• ?????????
• ??????????????
• ?????????????????
• do ?????????????
• ?????
• ???????????
• ?????????????????
• ???????????
• ??????????????????????

14
13.SPMODEL ???

• ??????????
• ex). ??????????????
• ?1???????????????
• ?????????????????
• ?2??????????
• ????????????????
• ?3?????
• ???????, ???????????
• ???????????????

15
14.?? URL

• SPMODEL
• http//www.gfd-dennou.org/arch/spmodel/
• ISPACK
• http//www.gfd-dennou.org/arch/ispack/
• gt4f90io
• http//www.gfd-dennou.org/arch/gtool4/

16
15.??

• Debian GNU/Linux ?????????
• ????????
• /etc/apt/sources.list ???? 2 ????
• apt ???????????
• ISPACK, netCDF ?????????
• ???http//www/gfddennou.org/arch/spmodel

deb ftp//www.gfd-dennou.org/arch/spmodel/debian
woody/ deb-src ftp//www.gfd-dennou.org/arch/spmod
el/debian woody/
apt-get install spml