第五章_数组.pptVIP

第五章 数 组 数组的定义 数组是类型相同的一组变量的有序集合 基本数据类型 派生数据类型 指针类型 数组的描述 秩（rank）或维数 向量：1维； 矩阵：2维 维数 ? [0, 7] 每一维的范围（extent） 下界、上界 大小（size） 数组元素的总数 形状（shape） 由rank和extent来共同表示 数组的属性 a(1:3, -1:4) 数组元素的存储顺序 按列存储(Column major) 数组的描述 数组的引用 a(1:3, -1:4) 数组名 a 数组元素 a(1,3) 数组片段 三元下标：a(1:2, -1:3:2) 向量下标：a(2, b) b=(/-1, 1, 3/) 数组越界：debug状态检查，release状态不检查 显式形状数组（explicit-shape） Fortran数组的种类 假定形状数组（assumed-shape） 假定大小数组（assumed-size） 延迟形状数组（deferred-shape） 静态显式 自动数组（automatic array） 可调数组（adjustable array） 可分配数组（allocatable array） 指针数组 动态数组 静态数组 用类型声明语句 exam_5_1 静态显式数组的声明 用dimension语句：dimension 数组声明表 用带dimension属性的类型声明语句 类型声明符[::]数组声明表 数组声明表→数组名（维说明表）[=数组初值] {,数组名（维说明表）[=数组初值]} 维说明表→维说明符{,维说明符} 维说明符→[下界:]上界 下界缺省为1 数组初值→（/初值1,…,初值n/）| [初值1,…,初值n] n为数组的大小 数组元素赋值 数组元素的缺省值 要养成赋初值的习惯 exam_5_1 用data语句赋初值（按列存储） 声明数组时直接赋初值（按列存储） 每个数组元素都要赋初值 只能出现常量表达式。*作乘号使用，不是重复符号 可以给部分数组元素赋初值 只能出现常量表达式。*作重复符号使用 以最后一个data语句为准，只赋一次初值 数组元素赋值 用数组构造器赋值（Fortran90） 可以是常量、表达式、三元组、隐式do循环或数组片段 只能给一维数组（或数组片段）赋值 exam_5_1 用reshape语句给多维数组（或数组片段）赋值 直接给数组赋值 给数组整体赋值（Fortran90） 给单个数组元素赋值 两种格式：（/…/） 或 […] 数组元素赋值 条件赋值(where)－ Fortran90 where语句→where(屏蔽表达式) 赋值语句 where语句→[标签:]where(屏蔽表达式) {赋值语句} else where(屏蔽表达式)[标签] {赋值语句} {else where(屏蔽表达式)[标签] {赋值语句}} [else where[标签] {赋值语句}] end where[标签] exam_5_2 ASSEM_FORCE.f90 数组元素赋值 屏蔽表达式和赋值语句中的数组的形状必须一致 当赋值语句等号右端的函数是elemental的时候，屏蔽表达式才对该函数起作用 elemental函数（Fortran95，见彭国伦书203页）： 可以赋给一个数组，是pure函数的一种特例 pure函数（Fortran95 ，见彭国伦书202页）： 确保函数不影响程序其它部分的状态 只能使用赋值语句 数组元素赋值 exam_5_2 forall语句 → forall(三元组{, 三元组}[,屏蔽表达式]) 赋值语句 forall语句→ [标签:]forall(三元组{, 三元组} [,屏蔽表达式]) 赋值语句 {赋值语句}