Implied do loop of FORTRAN

2024-03-25 15:18
文章标签 loop fortran implied

本文主要是介绍Implied do loop of FORTRAN,希望对大家解决编程问题提供一定的参考价值,需要的开发者们随着小编来一起学习吧!

与传统的DO语句相比,Implied DO语句结构简单(仅一行代码)。

示例:

program mainimplicit noneinteger :: iinteger(dimension = 3) :: iarrayiarray = 4print *, (iarry(i), i = 1, 3)
end program main

将打印出:

4    4    4


这篇关于Implied do loop of FORTRAN的文章就介绍到这儿,希望我们推荐的文章对编程师们有所帮助!



http://www.chinasem.cn/article/845402

相关文章

SWAP作物生长模型安装教程、数据制备、敏感性分析、气候变化影响、R模型敏感性分析与贝叶斯优化、Fortran源代码分析、气候数据降尺度与变化影响分析

查看原文>>>全流程SWAP农业模型数据制备、敏感性分析及气候变化影响实践技术应用 SWAP模型是由荷兰瓦赫宁根大学开发的先进农作物模型,它综合考虑了土壤-水分-大气以及植被间的相互作用;是一种描述作物生长过程的一种机理性作物生长模型。它不但运用Richard方程,使其能够精确的模拟土壤中水分的运动,而且耦合了WOFOST作物模型使作物的生长描述更为科学。 本文让更多的科研人员和农业工作者

myEclipse失去焦点时报错Unhandled event loop exception的解决方案

一句话:百度杀毒惹的祸。。。。果断卸载后问题解决。

多表连接的三种方式hash join,merge join,nested loop

多表之间的连接有三种方式:Nested Loops,Hash Join和 Sort Merge Join. 下面来介绍三种不同连接的不同:     一. NESTED LOOP: 对于被连接的数据子集较小的情况,嵌套循环连接是个较好的选择。在嵌套循环中,内表被外表驱动,外表返回的每一行都要在内表中检索找到与它匹配的行,因此整个查询返回的结果集不能太大(大于1 万不适合),要把返回

vivado error:Combinatorial Loop Alert:1 LUT cells form a combinatorial loop

VIVADO ERROR :Combinatorial Loop Alert:1 LUT cells form a combinatorial loop vivao生成bit流时发生报错,如下图所示定位原因解决 vivao生成bit流时发生报错,如下图所示 定位原因 在三段式状态机中,组合逻辑代码if else 语句未写全只写了if…elsif…,没有写else,导致错误

js- 宏微任务和事件loop

宏微任务和事件loop 目录 文章目录 前言推荐阅读宏微任务的定义宏微任务的区别常见面试代码 宏任务微任务`Event-Loop`在浏览器中的表现`Node`中的表现setImmediate与setTimeout的区别`process.nextTick``async/await`函数小节 前言 面试常问三问题宏微任务面对异步事件宏微事件、Event-Loop 推荐阅读 j

Scala并发编程react、loop代码实战详解

示例代码及注释: //scala并发编程中的react和loop,共同特点://通过线程存用的方式让性能有所提升。//Actor本身的运行,被actor子系统管理的时候,会有一个或者多个远程的线程让当前的actor使用//一般情况下每个Actor都有自己的线程。只有有自己的线程时,我们的Actor中的actor方法才会执行。//但是,这样线程的开销会非常大,所以为了共用线

oracle存储过程Loop循环一张表插入到另外一张表

oracle存储过程Loop循环一张表插入到另外一张表   1、创建一个存储过程   Sql代码   create or replace procedure inserttest as   cursor cs is SELECT sales_id FROM t02salesinfo_backup;sales_id varchar(128);   begin   for c in c

汇编语言04——[BX]和loop指令

整理自fishcc论坛课件 首先展示一个新的程序: assume cs:codesg codesg segment start: mov ax,2000H mov ds,ax mov al,[0] mov bl,[1] mov cl,[2] mov dl,[3] mov ax,4C00H int 21H codesg ends end start 使用masm进行

sh handle_data.sh: 2: handle_data.sh: Syntax error: Bad for loop variable

今天写了个简单shell处理数据,如下: #!/bin/shfor((i=1;i<220;i++));do/usr/bin/php /var/artisan handle_data 1;done; 结果报错 sh handle_data.sh: 2: handle_data.sh: Syntax error: Bad for loop variable 查询后发现是Ubun

node.js中Event loop机制

(1)所有同步任务都在主线程上执行,形成一个执行栈 (2)主线程之外,还存在一个"任务队列",只要异步任务有了运行结果,就在"任务队列"之中放置一个事件。 (3)一旦"执行栈"中的所有同步任务执行完毕,系统就会读取"任务队列",看看里面有哪些事件。那些对应的异步任务,于是结束等待状态,进入执行栈,开始执行。 (4)主线程不断重复上面的第三步。 "任务队列"是一个事件的队列(