等于编译时加上编译选项： -r4 , 这一般是默认的，-r8 双精度用来检测精确度达16为的计算时试用较多，比如矩阵中的伴随检验！
首先,32位的real,表达成 real(4) 还是 real(8) ,要看具体编译器. 某些编译器还表达成 real(1) 呢. 其次,我们假设 real(4) 表示 32 位实型.那么 2.4785239 应该是 32 位的单精度. 因为如果是双精度,那么应该写为 2.47... 分析总结。 首先32位的real表达成real4还是real8要看具体编译器结果一 题目 ...
real 和 real*4 的一个意思 ,所以也会出错。
首先，32位的real，表达成 real(4) 还是 real(8) ，要看具体编译器。某些编译器还表达成 real(1) 呢。其次，我们假设 real(4) 表示 32 位实型。那么 2.4785239 应该是 32 位的单精度。因为如果是双精度，那么应该写为 2.4785239D0 或 2.4785239_8 ...
Integer(整型)版,real(实型,kind=4),Double precision(双精度权浮点)不指定类型,默认的是real(kind=4),即单精度浮点型 我要定义两个双精度浮点型数组,就有以下两种定义方法: (1)用DimensionDimension A(4,4),B(3,3)double precision A,B (2)第二种方法REAL(kind=8)::A(4,4),B(3,3)这两种定义...
Real*4 :: rVar1 , rVar2 Character(Len=16) :: cStr Open( 12 , File = 'TestBin.Bin' , Access = 'Direct' , Form = 'Unformatted' , RecL = 4 ) Read( 12 , Rec = 2 ) cStr Read( 12 , Rec = 1 ) iVar1 , iVar2 , rVar1 , rVar2 Write( * , * ) cStr Write( * , ...
的意思是，将 1,2,1,3,2,3,2,3,4 这个一维数组重新划分形状，变为二维数组。它等同于 real::...
real::a,b,c,d 在输出的时候按照指数格式输出的话就是 write(",100)a,b,c,d 100 format(4e18.8)其中4表示有四个变量要按照e18.8的格式来输出，e表示指数格式，18表示输出的总长度为18，.8表示有效数字为8 比如说如果a=1.2546825498 那么a输出后就变成了“ 0.12546825E+01”，注意这里...
在文件开头给C定义一下类型吧，比如implict real*8 C implict real*8 (A-H,O-Z)，INTEGER*4 (I-N)就是将A-H,O-Z开头定义为8位的实数型，将I-N开头的变量定义为4位的整形 一般开头部分就把所有的字母类型定义好，特殊的情况再具体定义，纯手打，谢谢 ...