chw21
2020-11-28 13:24:54
文件名数组的长度为(m)，这是你要读取哪个文件的伪参数。
因此，例如，如果you call My_Reader(3)，它只会为初始化一个3元素数组filename，那么当你向6th元素写入内容时，任何事情都会发生。
你可以filename在子例程声明块中简单地确定数组的大小：
character(len=256) :: filename(6)
但是我会做一些完全不同的事情，我将使用aselect case在子例程中分配文件名：
subroutine my_reader(m)
integer, intent(in) :: m
character(len=256) :: filename
select case (m)
case(3)
filename = 'C:\Users\spaudel\Documents\S3.txt'
case(6)
filename = 'C:\Users\spaudel\Documents\S6.txt'
case default
print *, 'incorrect selection of file number: `, m
STOP
end select
open(unit=m*10, file=filename, ...)
end subroutine my_reader
热门帖子
热门github
1
2
3
5
6
7
8
11
13
14
15
Mamba is a new state space model architecture showing promising performance on information-dense data such as language modeling, where previous subquadratic models fall short of Transformers. It is based on the line of progress on structured state space models, with an efficient hardware-aware design and implementation in the spirit of FlashAttention.
(翻译：Mamba 是一种新的状态空间模型架构，在信息密集型数据（例如语言建模）上显示出良好的性能，而之前的二次模型在 Transformers 方面存在不足。它基于结构化状态空间模型的进展，并本着FlashAttention的精神进行高效的硬件感知设计和实现。)
非常感谢chw21。有效。你为我节省了很多时间。小心。