相關(guān)文件資源：

VS 2017 提取碼：hyz3

Fortran (Intel Parallel Studio XE 2018) 提取碼：arn5

MPI 提取碼：kgo6

環(huán)境：Win10操作系統(tǒng)

安裝順序：

1、先安裝VS2017，解壓文件直接安裝即可，安裝時需要安裝C++這個庫，為了后續(xù)和Intel Parallel Studio XE 2018一起集成。

2、先關(guān)閉VS2017的窗口，再繼續(xù)安裝intel parallel studio xe 2018，不需要其它組件的話可以只選擇安裝Inter Visual Fortran ...這一個組件，所需空間會少很多。安裝過程中選擇license注冊（五個任選其一即可）

3、安裝兩個MPI插件

說明：VS2017可以安裝在其他盤，Intel parallel studio xe 2018需要安裝在C盤

項目MPI并行配置流程：

1、新建Fortran項目

2、設(shè)置項目的鏈接庫，關(guān)鍵是能讓項目找到MPI安裝在哪個地方

（1）調(diào)試——屬性——Fortran——General——Additional Inclue Directories中添加include目錄：C:\Program Files (x86)\Microsoft SDKs\MPI\Include\和C:\Program Files (x86)\Microsoft SDKs\MPI\Include\x86，兩個之間用英文分號隔開

（2）調(diào)試——屬性——Linker——General——Additional Library Directories 中添加：C:\Program Files (x86)\Microsoft SDKs\MPI\Lib\x86\和C:\Program Files (x86)\Microsoft SDKs\MPI\Lib\，同樣兩個之間用英文分號隔開。

（3）調(diào)試——屬性——Linker——Input——Additional Dependencies處添加msmpi.lib msmpifec.lib （中間用空格區(qū)分）

（4）將 C:\Program Files\Microsoft MPI\Bin 目錄下的文件mpiexec.exe放到VS2017項目的目錄下（和.f90程序放在一個文件夾下），再按照下圖改動，其中 -n 4表示并行4進程，可修改。

3、設(shè)置完成，運行以下程序進行測試

include "mpi.f90"

program main 
    use mpi 
    implicit none 
    character(len=mpi_max_processor_name) :: p_name 
    integer :: myid, numProcs, nameLen, ierr 

    call mpi_init( ierr ) ! 完成 MPI程序 的初始化工作
    !                | 
    !                + ---- 返回代碼，與 mpi_success 相等時表示成功（out） 
    call mpi_comm_rank( mpi_comm_world, myid, ierr ) ! 獲取當前進程標識號 
    !                        |            |     | 
    !                        |            |     + ---- 返回代碼（out） 
    !                        |            + ---------- 返回當前進程標識號（out） 
    !                        + ----------------------- 通信域（in） 
    call mpi_comm_size( mpi_comm_world, numProcs, ierr ) ! 獲取通信域包含的進程數(shù) 
    !                        |            |         | 
    !                        |            |         + ---- 返回代碼（out） 
    !                        |            + -------------- 返回通信域內(nèi)進程數(shù)（out） 
    !                        + --------------------------- 通信域（in） 
    call mpi_get_processor_name( p_name, nameLen, ierr ) ! 獲取運行當前進程的機器名 
    !                               |       |       | 
    !                               |       |       + ---- 返回代碼（out） 
    !                               |       + ------------ 返回機器名長度（out） 
    !                               + -------------------- 返回機器名（out） 
    write(*,*) "Hello World! Processor ",myid," of ",numProcs," on ",p_name(1:nameLen) 
    call mpi_finalize( ierr ) ! 完成 MPI程序 的結(jié)束工作
    pause 
end program 

參考資料：

VS2017+Fortran2018（intel parallel studio xe 2018 update 3）集成失敗【已解決】_小毛95的博客-CSDN博客_fortran2018VS2103+Intel2013+MSMPI運行Fortran并行程序_huangjd7的博客-CSDN博客基于MS VS2017的Intel Fortran 使用MPI_Dwyane JHWu的博客-CSDN博客_fortran mpi文章來源地址http://www.zghlxwxcb.cn/news/detail-485885.html

到了這里，關(guān)于VS2017+Fortran（Intel Parallel Studio XE 2018）+MPI的文章就介紹完了。如果您還想了解更多內(nèi)容，請在右上角搜索TOY模板網(wǎng)以前的文章或繼續(xù)瀏覽下面的相關(guān)文章，希望大家以后多多支持TOY模板網(wǎng)！