Fortran指针

时间:2013-07-01 12:09:14

标签: pointers fortran

我正在尝试使用现有的common块编写子例程。我不明白他们如何使用指针功能。

有一个这样的部分:

parameter (ncvarmx=101) 
pointer (pfmxarcval,fmxarcval(ncvarmx,*))! max/min values for current postvalue and body
                                               ! min for this inc and ibody
                                               ! max for this inc and ibody
                                               ! min from begin to this inc and ibody
                                               ! max from begin to this inc and ibody
common/marc_archp/parcelcd,parcellbl,parcndcd,parcndlbl,pfmxarcval 
real*8 fmxarcval

我基本上需要来自fmxarcval的值。我假设它们中有3个,虽然它不是矢量。

我如何使用这样的指针?

0 个答案:

没有答案