Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/fortran/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
在fortran中为粒子指定名称_Fortran_Fortran90 - Fatal编程技术网

在fortran中为粒子指定名称

在fortran中为粒子指定名称,fortran,fortran90,Fortran,Fortran90,我只想为配置中的粒子指定一个名称。例如。 我有例如N=125三维立方体结构中的粒子,我有两种粒子a和B。 我想使用随机生成器r=ran(0,1),如果r您描述的是对派生类型的调用: type particle real x(3) character*4 color end type 声明粒子类型的数组: type particle p(1000) 然后将坐标引用为 p(i)%x(j) = 0. 颜色/名称如下: p(i)%color = 'red' 当然,您可以选择老式的方

我只想为配置中的粒子指定一个名称。例如。 我有例如
N=125
三维立方体结构中的粒子,我有两种粒子
a
B

我想使用随机生成器
r=ran(0,1)
,如果
r您描述的是对派生类型的调用:

 type particle
 real x(3)
 character*4 color
 end type
声明粒子类型的数组:

 type particle p(1000)
然后将坐标引用为

 p(i)%x(j) = 0.
颜色/名称如下:

 p(i)%color = 'red'
当然,您可以选择老式的方式,只需使用一个单独的数组:

 real p(3,1000)
 integer color(1000)

 p(j,i)=0
 color(i)='red'

这是非常不清楚的。你能给我们看一些代码吗?你的粒子是什么,它是派生类型还是一堆变量?亲爱的乔治,谢谢,但我不明白你所说的
x(3)
是什么意思。是坐标吗?当然。如果您愿意,您可以定义
rx,ry,rz
,然后您将拥有
p(i)%rx=等。
 p(i)%color = 'red'
 real p(3,1000)
 integer color(1000)

 p(j,i)=0
 color(i)='red'