<html>
<body>
Jordi,<br>
You have run into an annoyance of Fortran. As soon as you leave
the Type subroutine, the allocatable array disappears. What you need to
do is define the allocatable array globally in a "data only
module" Your ALLOCATE instruction stays where it is but then the
array doesn't disappear. You can see what I mean if you look at the file
TRNSYSData.for. You will see the lines:<br><br>
<font face="Arial, Helvetica" color="#008000">C ********* DECLARE
ALLOCATABLE ARRAYS FOR USE IN DYNDATA <br>
</font><font face="Arial, Helvetica" color="#0000FF"><b>DOUBLE
PRECISION</b></font><font face="Arial, Helvetica">,
</font><font face="Arial, Helvetica" color="#0000FF"><b>ALLOCATABLE</b>
</font><font face="Arial, Helvetica"> :: X1dd( : ,: ),X2dd( : ,: ),X3dd(
: ,: )<br>
</font><font face="Arial, Helvetica" color="#0000FF"><b>DOUBLE
PRECISION</b></font><font face="Arial, Helvetica">,
</font><font face="Arial, Helvetica" color="#0000FF"><b>ALLOCATABLE</b>
</font><font face="Arial, Helvetica"> :: X4dd( : ,: ),YDATAdd( : ,:
),DATAINdd( : )<br>
</font><font face="Arial, Helvetica" color="#0000FF"><b>INTEGER</b></font>
<font face="Arial, Helvetica">,
</font><font face="Arial, Helvetica" color="#0000FF"><b>ALLOCATABLE</b>
</font><font face="Arial, Helvetica"> :: LUSTORdd( : ), IPTdd( :
)<br><br>
</font>those lines declare the allocatable arrays that are actually used
in the DynamicData routine.<br>
Cheers,<br>
David<br><br>
At 11:03 5/24/2007, jordi cipriano wrote:<br>
<blockquote type=cite class=cite cite=""><font size=2>Dear Trnsys users,
<br>
</font> <br>
<font size=2>I have a question concerning to the use of Dynamic arrays in
new Trnsys types. I'm programming a new Type with fortran 90 and I'm
using the instruction ALLOCATABLE to define the dimension of some arrays.
This dimension is depending on an input defined in the proforma. <br>
</font> <br>
<font size=2>The issue is that I don't exactly know at which step
iteration should I define the array dimension so that this dimenson keeps
saved in each iteration. In other words, if I define the array dimension
just bellow the variables definition, each time the trnsys call my type,
the matrix appear as "Undefined pointer/array" until trnsys
finds the ALLOCATE instruction. This happens even if I've already defined
the dimension in previous iteration callings. This fact affects all the
calculations because one of the arrays is the STORED array, which I use
to update the temporary terms of my ecuations. <br>
</font> <br>
<font size=2>Does anybody know who to solve this problem?<br>
</font> <br>
<font size=2>Many thanks, <br>
</font> <br>
<font size=2>Jordi Cipriano<br>
BEE-Group<br>
CIMNE-Terrassa<br>
CIMNE. Spain <br>
</font><br>
_______________________________________________<br>
TRNSYS-users mailing list<br>
TRNSYS-users@engr.wisc.edu<br>
<a href="https://www.cae.wisc.edu/mailman/listinfo/trnsys-users" eudora="autourl">
https://www.cae.wisc.edu/mailman/listinfo/trnsys-users</a></blockquote>
<x-sigsep><p></x-sigsep>
****************************************************************************************<br>
Thermal Energy System Specialists (TESS), LLC <br>
David
BRADLEY
2916 Marketplace Drive - Suite 104 <br>
Partner
Madison, WI 53719 <br>
Phone: (608) 274-2577 USA <br>
Fax: (608) 278-1475 <br>
E-mail: bradley@tess-inc.com <br>
Web Pages:
<a href="http://www.tess-inc.com/" eudora="autourl">
http://www.tess-inc.com</a>
and
<a href="http://www.trnsys.com/" eudora="autourl">
http://www.trnsys.com<br><br>
</a>"Providing software solutions for today's energy engineering
projects" <br>
****************************************************************************************<br>
</body>
</html>