real*8就是说数据类型为双精度实型，占有储存空间为8个字节，有效位数为15-16位，可表示最大正数为1.79*10^308最小正数为2.23*10^（-308）希望帮到你！！
Fortran中浮点数的默认精度是单精度,且浮点数常数的默认精度也是单精度(大部分的语言都是双精度,或者无限精度),需要在浮点数的末尾加d0或者kind标识 。例如1.2d0,1.2_8表示的都是双精度。 复数变量的赋值 如果是常数,可以使用a=(1.0,2.0)来赋值,如果有变量就需要一个转换函数a=cmplx(x,y),但是,此处cmplx默认...
character*8 ABC(50)这是定义一个字符串数组，一共50个元素，每个都是8字节长度。也就是每个都是8个字符。IMPLICIT REAL（I,K）意思是声明以 I 和 K 开头的变量，为实型变量。建议不要这样声明，全部用 implicit none，也就是说，全部变量都必须声明其类型。顺序文件和直接文件（这个说法欠妥）这...
第一，直接让两种变量占用相同内存位置。使用 equivalence 语句。第二，通过计算转换。第三，通过 Mvbits 移动位。以下是代码。Program Baidu_Thlws implicit none integer( kind = 8 ) :: i8 integer( kind = 4 ) :: i4arrayEqu( 2 ) !// 方法1 integer( kind = 4 ) :: i4arrayCalc(...
(KIND=8) :: ZIP END TYPE TYPE EMPLOYEE_DATA TYPE (EMPLOYEE_NAME):: NAME TYPE (EMPLOYEE_ADDR):: ADDR INTEGER(KIND=4) :: TELEPHONE INTEGER(KIND=2) :: DATE_OF_BIRTH INTEGER(KIND=2) :: DATE_OF_HIRE INTEGER(KIND=2) :: SOCIAL_SECURITY(3) LOGICAL(KIND=2) :: MARRIED INTEGER(KIND=...
-fdefault-double-8 此参数会将FORTRAN中的DOUBLE PRECISION 的默认类型设置为8字节,由于通常我们以REAL来声明,因此使用到此DOUBLE PRECISION的情况多出现在老旧的代码中,建议更换为REAL并使用kind限定以达到表示双精度浮点数的目的。此参数可以配合-fdefault-real-8参数使用以阻止DOUBLE PRECISION类型的宽度提升。当然,对...
Fortran中的字符 A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z,0,1,2,3,4,5,6,7,8,9,+,-,*,/,(z左括号),(右括号),(撇号),(逗号),(小数点),(空格) 共47个。 Fortran中的常量 Fortran语言中有6种常量:整型常量、实型常量、双精度型常量、复型常量、逻辑型...
CHARACTER*N字符型,N为字符串长度,可以在变量名称后重新指定长度,如CHARACTER*8 STR1,STR2*10 ,赋值形式为STR2=’I'’M A BOY.’ 用IMPLICIT语句将某一字母开头的全部变量指定为所需类型 三种定义的优先级别由低到高顺序为:I—N规则→IMPLICIT语句→类型说明语句,因此,在程序中IMPLICIT语句应放在类型说明语句之...
8字节存储的双精度浮点数y x
一般REAL等价于REAL*4或REAL(4),是单精度的Fortran跟C一样，也分整型(INTEGER)，实型(REAL)，双精度(REAL*8或REAL(8)或DOUBLE PRECISION)，这些在科学计算中还是比较重要的。一般REAL等价于REAL*4或REAL(4),是单精度的；而双精度在F77中表示为DOUBLE PRECISION，在F90中可以表示为REAL*8或REAL(8...