- 1、本文档共51页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
[理学]Fortran90_7
学院的计算机集群9 使用处理器间的消息传递(MPI) 使用操作系统的线程(Thread) 线程的最大特点是,线程间共享数据。 因此它在SMP系统上工作的更好。 PROGRAM test ! implicit none ! integer :: i, j, k, num real(kind=8) :: sum, result integer,dimension(100) :: gg real(kind=8),dimension(100) :: score ! do i = 1, 100 gg(i) = i enddo ! ! --- test !$OMP PARALLEL DO !$OMP PRIVATE ( i ) shared(result) LOOP: DO i = 1 , 100 CALL add(gg(i), result) score(i) = result END DO LOOP ! write(*,*) (score(i),i=1,100) ! END PROGRAM test SUBROUTINE add(ii, result) ! implicit none ! integer,intent(in) :: ii integer :: i, j, k real(kind=8) :: sum real(kind=8),intent(out) :: result ! ! sum = 0. do i = 1, 10000 do j = 1, 10000 sum = sum + ii enddo enddo ! result = sum ! END SUBROUTINE add 参考书目 《并行算法的设计与分析》 陈国良 编著 高等教育出版社 介绍一个商业软件 SDI converter, SDI Viewer, SDI_editor ps ? cgm, ps ? emf 修改 ps, cgm图片 4/ 临时下载区 --- SDI_CGM 介绍一个shareware软件($40) /importps/ importps 安装之后,允许在word中 直接插入ps图片 但是,如果你的图片是eps (enhanced PS), 可以直接插入word文档。 插入PS图片的另一种途径 安装 免费软件 ghostscript,gsview 利用gsview打开ps图片,将它另存为eps图片 在word文档中插入 (图片—来自文件) GrADS 格点绘图 GrADS 站点绘图 站点绘图 3步曲 处理站点数据 a) 生成站点数据sta.dat b) 写sta.ctl c) 生成sta.map文件 给定背景格点场及其描述文件 bg.dat, bg.ctl 3 开始绘图(或直接写sta.gs文件) 几个例子讲解 eth=345K Data Explorer 3D绘图 NCAR-Graphics 1D、2D绘图 GrADS 1D、2D绘图 介绍 GrADS Grid Analysis and Display System 免费 (freeware) window 版本 Linux/UNIX 版本 GrADS的下载与安装 (Windows System) 下载地址:/grads/downloads.html里的xwin32 (MS Windows),不要下载win32e! 或者:/grads/1.8/grads-1.8sl11-xwin32.exe 请选择默认路径进行安装,安装完毕之后千万不要忘记设置系统环境变量! 我的电脑--属性--高级--环境变量--系统变量--Path-- 编辑,譬如原来为: %SystemRoot%\system32;%SystemRoot%;%Syste
文档评论(0)