<div dir="ltr"><div><div><div><div><div><div>Hello all,<br><br>I am very used to dynamic linking scilab and Fortran, and call the external function by the "call" function in SciLab.<br><br></div>Although, this is the first time I try to send string matrices as fortran arguments, and I can't get it working. Maybe any of you can please help?<br>
<br></div><div>I want to pass a column-vector where each row contains a 4-char string. Example:<br><br></div><div>ident=['STR1';'STR2';'STR3';...]<br></div><div><br></div>Now the F90 code I'm trying:<br>
</div><br></div>subroutine fhdg_dist(napt,ident,ret_val)<br>implicit none<br>INTEGER,INTENT(IN)::napt<br>character(len=4),intent(in),dimension(napt,1)::ident<br></div>integer,intent(out)::ret_val<br><br></div>ret_val=0<br>
<div><div><br></div><div>end subroutine fhdg_dist<br clear="all"></div><div><div><div><div><div><div><br><br></div><div>the call statement:<br><br>[ret_val]=call('fhdg_dist',napt,1,'i',ident,2,'c','out',[1,1],3,'i')<br>
</div><div><br></div><div>So, even if I'm not trying to use the matrix data, when calling the external function with this call, I get "incompatible dimensions" message.<br><br>Any clues, please?<br><br>Regards.<br>
</div><div><br><br>-- <br>Eduardo Torrecillas<br>AER-09
</div></div></div></div></div></div></div></div>