DELPHI和FORTRAN语言的混合编程（二）[8]

　　       ！dec＄attributes alias:’sub_name’::sub_name

  real(8),dimension(:)::x1,x2

  character(len=*) str

  real(8),intent(out)::x3,x4

在delphi中相应的接口过程定义为：

procedure sub_name(const x1,x2:pointer;

str:string;

len:integer;

 var x3, x4:double);