C/C++ VS. Fortran

最新推荐文章于 2023-06-26 11:20:18 发布
最新推荐文章于 2023-06-26 11:20:18 发布
阅读量2.6k 收藏 1
点赞数 1
分类专栏： Fortran 文章标签： fortran integer float c service windows
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/hjh2005/article/details/7444810
版权
C/C++  VS.  Fortran 
项目C/C++Fortran备注
软硬件环境操作系统：Windows XP professional 2002 Service Pack 3
CUP：Intel® Core™2 Quad 2.66GHz  4核
内存：3.00GB
编译环境VS2008Intel Fortran Compler Xe 2011+MKL
浮点型循环比较#include <time.h>
#include <iostream>
using namespace std;
int main()
{
 clock_t start, end;
 int i,j,k;
 double m;
 start = clock();
 m=0.0;
 for (i=1;i<=1000;i++)
 {
  for (j=1;j<=1000;j++)
  {
   for (k=1;k<=1000;k++)
   {
    m=m+1.0;
   }
  }
 }
 end = clock();
 printf("Time was: %f\n", (double)(end-start)/CLOCKS_PER_SEC);
 printf("Result is: %f\n", m);
 char a;
 cin>>a;
 return 0;
}
耗时：1.125s		PROGRAM CPUTIME
         IMPLICIT NONE
         REAL time_begin, time_end
         INTEGER I, J, K
         REAL(8) M
         CALL CPU_TIME ( TIME_BEGIN )
         M=0.0_8
         DO I=1,1000
                 DO J=1,1000
                         DO K=1,1000
                         M=M+1.0_8
                         END DO
                 END DO
         END DO
         CALL CPU_TIME ( TIME_END )
         PRINT *, 'TIME WAS ', time_end - time_begin
         PRINT *, 'Result is ', M
         pause
END PROGRAM CPUTIME
耗时：1.125s		在release版本下比较
整型循环比较
（带数据转换）		#include <time.h>
#include <iostream>
using namespace std;
int main()
{
 clock_t start, end;
 int i,j,k;
 int m;
 start = clock();
 m=0;
 for (i=1;i<=1000;i++)
 {
  for (j=1;j<=1000;j++)
  {
   for (k=1;k<=1000;k++)
   {
    m=m+1*2.0;
   }
  }
 }
 end = clock();
 printf("Time was: %f\n", (double)(end-start)/CLOCKS_PER_SEC);
 printf("Result is: %d\n", m);
 char a;
 cin>>a;
 return 0;
}
耗时：8.734s		PROGRAM CPUTIME
         IMPLICIT NONE
         REAL time_begin, time_end
         INTEGER I, J, K
         INTEGER M
         CALL CPU_TIME ( TIME_BEGIN )
         M=0
         DO I=1,1000
                 DO J=1,1000
                         DO K=1,1000
                         M=M+1*2_8
                         END DO
                 END DO
         END DO
         CALL CPU_TIME ( TIME_END )
         PRINT *, 'TIME WAS ', time_end - time_begin
         PRINT *, 'Result is ', M
         pause
END PROGRAM CPUTIME
耗时：0.515625s		在release版本下比较
矩阵乘法比较1
（矩阵大小1048576*80）		#include <time.h>
#include <iostream>
using namespace std;
int main()
{
 clock_t start, end;
 int i,j,k;
 const int rows=1024*1024;
 const int cols=80;
 const int count=rows*cols;
 float *x=new float[rows*cols];
 float c[cols][cols];
 for (i=0;i<count;i++){
  x[i]=1.0f; }
 start = clock();
 for (i=0;i<cols;i++) {
  for (j=0;j<cols;j++)  {
   float sum=0;
   for (k=0;k<rows;k++){
    sum+=x[k*cols+i]*x[k*cols+j];   }
   c[i][j]=sum;  } }
 end = clock();
 printf("Time was: %f\n", (double)(end-start)/CLOCKS_PER_SEC);
 printf("Result is: %f\n", c[1][1]);
 char a;
 cin>>a;
 return 0;
}
耗时：165.735s		不使用MKL库：
PROGRAM CPUTIME
     IMPLICIT NONE
     real :: x(1024*1024,80)
     real :: c(80,80)
     real :: sum_t
     integer :: i,j,k
     integer,parameter:: count=1024*1024
     REAL time_begin, time_end            
     x=1    
     CALL CPU_TIME ( TIME_BEGIN )    
        do i=1,80
            do j=1,80
                sum_t=0_4;
                do k=1,count
                    sum_t=sum_t+x(k,i)*x(k,j)
                end do
                c(i,j)=sum_t
            end do
       end do    
     CALL CPU_TIME ( TIME_END )    
     print *,c
     PRINT *, 'TIME WAS ', time_end - time_begin
     pause
END PROGRAM CPUTIME
耗时：8.25s		在release版本下比较
矩阵乘法比较2
（矩阵大小1048576*80）		转置矩阵后相乘：
#include <time.h>
#include <iostream>
using namespace std;
int main()
{
 clock_t start, end;
 int i,j,k;
 const int rows=1024*1024;
 const int cols=80;
 const int count=rows*cols;
 float *x=new float[rows*cols];
 float c[cols][cols];
 for (i=0;i<count;i++){
  x[i]=1.0f; }
 start = clock();
 for (i=0;i<cols;i++) {
  for (j=0;j<cols;j++)  {
   float sum=0;
   for (k=0;k<rows;k++){
    sum+=x[i*rows+k]*x[j*rows+k];   }
   c[i][j]=sum;  } }
 end = clock();
 printf("Time was: %f\n", (double)(end-start)/CLOCKS_PER_SEC);
 printf("Result is: %f\n", c[1][1]);
 char a;
 cin>>a;
 return 0;
}
耗时：23.407s		使用MKL库：
PROGRAM CPUTIME
use mkl95_blas, only: gemm
         IMPLICIT NONE
         real :: x(1024*1024,80)
         real :: c(80,80)
         REAL time_begin, time_end        
         x=1        
         CALL CPU_TIME ( TIME_BEGIN )        
         call gemm(x, x, c, 'T', 'N', 1.0, 0.0)        
         CALL CPU_TIME ( TIME_END )        
         print *,c
         PRINT *, 'TIME WAS ', time_end - time_begin        
         pause
END PROGRAM CPUTIME
耗时：1.3125s		在release版本下比较
总结1、从单纯的循环操作来看C/C++与Fortran的性能不相上下，但是从数值计算方面来看Fortran比C还是有比较大的优势的，如果使用MKL那优势就更明显了；
2、从对矩阵操作的代码上来看Fortran比C要更简洁一些，但是在Fortran中调用函数的操作会比较复杂一些。

hjh2005
关注
专栏目录
MATLAB Support for MinGW-w64 C/C++/Fortran Compiler
03-08
标题“MATLAB Support for MinGW-w64 C/C++/Fortran Compiler”涉及的主要知识点是MATLAB编程环境与MinGW-w64编译器的集成，以及对C、C++和Fortran语言的支持。 MATLAB是一款强大的数学计算软件，广泛用于科学计算...
MinGW-w64 C/C++/Fortran Compiler
最新发布
03-08
MinGW-w64 是一个为 Windows 平台提供开源 GCC 编译器的项目，它支持 C、C++ 和 Fortran 语言。这个工具链专为64位和32位Windows系统设计，允许开发者在Windows环境下编写和编译原生的Windows应用程序。MinGW-w64 的...
VS+Fortran混和编程环境搭建（VS2019+oneAPI）
zhoufei95的博客
01-10 2364
VS+Fortran混和编程环境搭建说明一、VS2019安装二、oneAPI安装 说明 从VS2019后期版本，Intel不再单独发布Intel® Parallel Studio XE。而是由集成包Intel® oneAPI Base Toolkit和Intel® oneAPI HPC Toolkit 这个取代。本文主要讲述新版VS2019与oneAPI搭建混合编程环境。 一、VS2019安装 网上自己较多，可自行查找 二、oneAPI安装 下载位置：https://www.intel.com/conten
VS下编译Fortran
weixin_38594380的博客
02-27 4138
VS下编译Fortran 参考博客 https://www.liangzl.com/get-article-detail-161716.html 完成Intel Parallel Studio XE 2020的安装，在这个环境下可以编译Fortran 如果需要用到数学库，记得勾选MKL，并在之后参考博客 http://www.guanjihuan.com/archives/3021 完成配置。 但是要注意里面的第二条要稍作修改，因为找不到那些文件，我在这改成了： mkl_intel_thread.lib m
文档分享：Fortran与C++的比较
老好人(廖海仁）的专栏
12-13 1631
Fortran与C++的比较 http://wenku.baidu.com/view/a1daf3d333d4b14e85246856.html
Fortran 和 C 的差异
Technology DNA
10-29 2289
<br /><br /> 其实两者差异很多，在下面涉及具体方面时可以看到，这里只从 Fortran的角度大致提一<br /> 些。 <br /> （1）不分大小写； <br /> （2）每句末尾不必要写分号； <br /> （3）程序代码命令间的空格没有意义； <br /> （4）不像 C，Fortran程序块中不使用{ }； <br /> （5）数据类型多出了复数和逻辑判断类型。比如复数类型为： <br /> COMPLEX :: A !声明复数的方法 <br /> A=(1.0,2.0
MATLAB Support for MinGW-w64 C/C++ Compiler.rar
12-31
资源是笔者在MATLAB里面安装的MinGW-w64 C/C++编译器安装包，主要用于作为博文https://blog.csdn.net/jiqiren_dasheng/article/details/103759720的资源附件。（声明：上传时积分设置的1，如果数值后续变了，就是...
MinGW-w64 C/C++编译器+libsvm安装包.rar
05-09
这个编译器套件包括了C、C++、Fortran等语言的编译器，支持多种编程语言的开发。MinGW-w64的主要优点是轻量级、无需安装Microsoft Visual Studio或其他大型IDE，且完全免费，适合于那些希望在Windows上进行原生C/C++...
MATLAB与C／C++、FORTRAN语言混合编程[整理].pdf
10-11
本资料“MATLAB与C/C++、FORTRAN语言混合编程”专注于讲解如何将这三种语言集成在一起，实现高效且灵活的软件开发。MATLAB以其强大的数值计算和数据可视化功能而闻名，而C/C++和FORTRAN则以其高性能和对底层硬件的...
Fortran转C++的工具
09-26
该工具的英文版评价: http://www.scfbm.org/content/7/1/5 其它信息和说明: http://cci.lbl.gov/fable/ Unix systems with Python 2.3 through 2.7: wget http://cci.lbl.gov/fable_bundles/current/fable_bundle.selfx perl fable_bundle.selfx source fable_build/setpaths.sh fable.cout --example Windows systems (XP or higher): Download http://cci.lbl.gov/fable_bundles/current/fable_win_xp.exe fable_win_xp.exe fable_build\setpaths.bat fable.cout --example The fable.cout --example command is known to work with gcc 3.2 or higher, Visual C++ 7.1 or higher, and with recent development versions of clang++.
andason计算流体力学书上例子源程序
03-20
andason计算流体力学 书上例子源程序，注明也是从别处转来的，大家看看哈
Fortran调用C++动态链接库实践篇
yangjj2005的博客
06-26 1332
本文通过Fortran对C++的动态链接库的调用，实现了Fortran与C++之间内置变量、派生变量、子例程定义的方法调用，在基本操作的基础上，还实现了Fortran对C++定义的类使用，通过这些常见场景的实现，展现了Fortran/C++混合编程的魅力。
c++调用fortran方法
huwi25的专栏
09-28 3386
环境：vs2019+Intel Parallel Studio XE 2020 1，c++调用fortran的lib动态库 (1)编写fortran动态库。 DOUBLE PRECISION FUNCTION ADD (A, B) !DEC$ ATTRIBUTES DLLEXPORT:: ADD DOUBLE PRECISION A, B ADD =A + B END (2)编写c++程序。右键项目->添加现有项->添加lib (3)c++代码 #include &lt
fortran和c++混合编程-fortran程序调用c++代码的方法
xenonhu的博客
01-12 4664
fortran和c++混合编程-fortran程序调用c++代码的方法 标签：fortran和c++混合编程、fortran程序调用c++代码、c++程序内存不断增加 动机 手头上有一个c++编写的某问题计算程序，然后需要利用该程序进行优化计算。于是想起8年前，用fortran写的优化计算程序。说实话，这些年下来基本已经没有碰优化计算了，没想到还有要用到的时候。当时用fortran实现了遗传（演化...
VS2019中C++与Fortran的混合编程
weixin_41124748的博客
09-06 5116
这里写自定义目录标题目录基本配置Fortran的dll如何改变文本的样式插入链接与图片如何插入一段漂亮的代码片生成一个适合你的列表创建一个表格设定内容居中、居左、居右SmartyPants创建一个自定义列表如何创建一个注脚注释也是必不可少的KaTeX数学公式新的甘特图功能，丰富你的文章UML 图表FLowchart流程图导出与导入导出导入 目录 本文说明在VS2019中使用C++调用Fortran的dll 基本配置 windows 10； VS2019+oneAPI； 参考链接： 1:https://bl
WIN10下VS+Fortran+Intel MPI安装、配置、运行笔记
热门推荐
weixin_42242227的博客
02-08 2万+
引子 笔者因项目需求，需要做Fortran77代码的MPI并行，因此在 WIN10 下安装了 VS2017 和 Intel Parallel Studio XE 2018 Update 3 Cluster Edition for Windows（以下简称IVF2018Cluster） ，并做相应配置，最终以MPI并行的Hello World程序单机环境运行验证。 IVF2018Cluster 版本...
Fortran和C/C++混合编程学习笔记（一）：编译链接
aq1234xyq的博客
12-11 4431
有时候，我们希望使用Fortran和C/C++混合编程，以利用各语言的优势。只要确保函数调用时传递的参数类型正确，定义和声明的变量类型和大小匹配，Fortran和C 语言二者的函数和全局变量就可以彼此直接相互调用，所以混合编程可以非常容易地实现。由于在同一个可执行文件内，两种语言间可以进行双向函数调用，所以主函数在C文件中还是Fortran文件中，依具体使用情况而定。 本篇和接下的几篇主要讨论标准...
VS2019+Fortran语言配置
weixin_43586847的博客
09-27 4835
Intel Parallel Studio XE 2020在intel官网已经改名，Fortran语言现在可以在oneAPI HPC中配置，内附详细安装教程。
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值