第2期 马明军等：岩体动态响应分析程序的微机化及其应用 .107. 1 内存空间的数据处理 与大、中型机相比，微机的主要缺点是内存容量较小，运算速度较低，因此，微机数值 分析应用程序的开发则必须适应微机的这些特点·在微机上实现运行大、中型算题的主要技 术途径可概括为以下几个方面：(1)优化内存空间的数据处理；(2)改变传统的程序结构 (变集中运行为分块运行)；(3)发展新的数值方法或耦合方法；(4)改进求解方法，下文 介绍一种内存空间的数据处理方法· 内存空间的数据处理要求解决以下几个问题：(1)在内存限制的条件下最大可能地利 用内存空间；(2)程序内模块间的数据通讯方便；(3)避免传统程序设计中多而杂的公用 语句，这些数组所占的存储空间应能随后被其他将要用到的数组取代， 1.1实施方法和主体子程序 PROGRAM MAIN COMMON MTOT,NP,IA(100000) MTOT=1000000. 其中，MAN为用户自定的程序名，IA为大型一维数组·在整个程序中（包括主程序 和子程序)，所有根据需要设定的分数组都存放于IA数组中，主要的数据处理操作将在IA 中进行.MTOT为LA的大小，NP为数组类型（整型、实型、字符型），它将用于各分数组 在IA中的定位，与主程序相对应，各子程序中的公用语句形式为： COMMON MTOT,NP,IA(1) 此外，在主程序中另外两个有名公用语句也是必要的（子程序可选择加人），形式为： COMMON/IOFILE/NF1,NF2 COMMON/CONTRL/NJNTS,NMBS 其中，IOFILE是输入输出设备通道号公用区，CONTRL是主控参数公用区. 各分数组在IA中的定位可通过下面的语句来实现，形式为： CALL DEFINI (NAME,NA,NR,NC)CALL DEFINE('NAME',NA,NR,NC) CALL DEFINH (NAMEE,NA,NR,NC) 其中，NAME为用户自定的数组名，NA为该数组在IA中的起始位置，NR为该数组的 行数，NC为该数组的列数.3个子程序（略）分别计算整型、实型和字符型分数组在A 中所占的长度和位置，并同时形成分数组目录，记录于IA的末端.分数组在IA中的定位 和存放形式如图1所示· 数组A 数组B 数组C 数组数组 数组 可以利用的剩余空间 目 存放区 存放区 存放区 目录 目录 图1 内存空间的数组动态定位 Fig.1 Dymamic lcation and dimension for arrays in core第 期 马 明军等 岩体动态 响应分析程序 的微机化及其应 用 内存空 间的数据处理 与大 、 中型机相 比 ， 微机 的主要 缺 点是 内存容量较小 ， 运算 速度较低 ， 因此 ， 微机数值 分析应用程序 的开发则必须适应微机的这些 特点 在微机上 实现运行大 、 中型 算题 的主要技 术途径可概括 为 以下 几个方 面 优化 内存空 间的数据处理 改 变 传 统 的程 序 结构 变集 中运行为分块运行 发展新 的数值方法或藕合方 法 改进求解方法 下 文 介绍一种 内存空 间的数据处理方法 内存空 间的数据处理要求解 决 以下 几个 问题 在 内存 限 制 的 条件 下 最 大 可 能 地 利 用 内存空 间 程序 内模块 间的数据通讯方便 避 免传 统程 序 设 计 中多 而 杂 的公 用 语句 ， 这些数组所 占的存储空 间应能 随后被其他将要 用到 的数组取代 实施方法和主体子程序 洲 … ， 洲 其 中 ， 为用 户 自定 的程序名 ， 认 为大 型 一 维数 组 在 整 个程 序 中 包括 主 程 序 和子程序 ， 所有根据需要 设定 的分数组 都存放于 数组 中 ， 主要 的数据处理 操 作 将 在 中进行 为 的大小 ， 为数组类型 整 型 、 实型 、 字符型 ， 它将用 于各分数组 在 中的定位 与主程序相 对应 ， 各子程 序 中的公用语句 形式 为 ， ， 认 此外 ， 在 主程序 中另外 两个有 名公 用 语句也是 必要 的 子程 序 可 选 择加人 ， 形 式 为 ， … 丁 ， … 其 中 ， 是 输入输 出设备通道 号公用 区 ， 丁 是 主控参数公用 区 各分数组 在 中的定位 可 通过下 面 的语句来 实现 ， 形 式 为 卜 ’ ’， ， ， 刊 ’ ’ ， ， ， ， ， ， 其 中 ， 为用 户 自定 的 数组 名 ， 为 该 数组 在 中 的 起 始 位 置 ， 为 该 数 组 的 行数 ， 为该数组 的列 数 个 子 程 序 略 分 别 计算 整 型 、 实 型 和 字 符 型 分 数 组 在 中所 占的长度和位置 ， 并 同时形成分数 组 目录 ， 记 录 于 的末 端 分 数组 在 中 的定 位 和存放形式 如 图 所示 数组 数组 数组 可 以 利 用 的剩余空 间 存放 区 存放 区 存放 区 数组 目录 数组 目录 数组 目录 图 内存空 间的数组动态定位 ’ 功阿 位犯 日 成恤 叨 俪 日 ， 班℃