[TRNSYS-users] Setting storageSize

David BRADLEY d.bradley at tess-inc.com
Mon Mar 5 13:16:40 PST 2018


Tom,

  I think the problem may be in how you declared the SPEICHER() array at 
the top of your code. Can you send an excerpt of the code used to 
declare SPEICHER()?

kind regards,

  David



On 03/02/2018 14:28, s0537085 via TRNSYS-users wrote:
>
> Hello,
>
> I try to set my storage size properly. So far I receive the massage: 
> The shapes of the array expressions do not conform.
>
> My idea is to user-specific number of nodes in my modell, which is 
> PAR(1). Each node has 5 variables.
>
> To set the storage size I write: size=PAR(1)*5.
>
> At initial timestep I want to set the 5 variables to their initial 
> values, using a loop.
>
> SIZE=PAR(1)*5
>
>           CALLsetStorageSize(SIZE,INFO)
>
> AN=JFIX(PAR(1)+0.1)
>
> ILAMDAA=0
>
> IXA=AN
>
>           ITETAA=AN*2
>
>           IAA=AN*3
>
>    IBB=AN*4
>
> DOI=1,AN
>
>               ILAMDAA=ILAMDAA+1
>
> IXA=IXA+1
>
>               ITETAA=ITETAA+1
>
>               IAA=IAA+1
>
>               IBB=IBB+1
>
> SPEICHER(ILAMDAA)=LAMDAA
>
> SPEICHER(IXA)=XA
>
> SPEICHER(ITETAA)=TETAA
>
> SPEICHER(IAA)=AA
>
> SPEICHER(IBB)=BB
>
> END DO
>
> CALLsetStorageVars(SPEICHER,SIZE,INFO)
>
> RETURN1
>
> I already tried to get inspiration from Type4, but didn´t work.
>
> Can someone help, please.
>
> Kind regards
>
> Tom
>
>
>
> _______________________________________________
> TRNSYS-users mailing list
> TRNSYS-users at lists.onebuilding.org
> http://lists.onebuilding.org/listinfo.cgi/trnsys-users-onebuilding.org

-- 
***************************
David BRADLEY
Principal
Thermal Energy Systems Specialists, LLC
22 North Carroll Street - suite 370
Madison, WI  53703 USA

P:+1.608.274.2577
F:+1.608.278.1475
d.bradley at tess-inc.com

http://www.tess-inc.com
http://www.trnsys.com

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.onebuilding.org/pipermail/trnsys-users-onebuilding.org/attachments/20180305/cb61f26e/attachment.html>


More information about the TRNSYS-users mailing list