<div dir="ltr"><div class="gmail_quote"><div dir="ltr"><pre><i style="color:rgb(0,0,0);white-space:pre-wrap">Dear all,
</i><i style="color:rgb(0,0,0);white-space:pre-wrap"> I'm trying to create a sludge dryer, using g95 as</i><i style="color:rgb(0,0,0);white-space:pre-wrap"> compiler, running the following script (compile.bat) into g95</i><i><font color="#000000"><span style="white-space:pre-wrap">. But, the Type214.dll WAS NOT CREATED. I am using the steps from the attached file. What is the problem? My TRNSYS Version is 17.02. My system computer is Windows 8. Do you have a more simple sollution to create a new type?  </span></font></i></pre>set TRNSYS_TYPE=214<br>G95 -fcase-upper -fno-underscoring -M TrnsysData.for <br>G95 -fcase-upper -fno-underscoring -M TrnsysFunctions.f90 <br>G95 -fcase-upper -fno-underscoring -M TrnsysConstants.f90 <br>G95 -fcase-upper -fno-underscoring -c TrnsysFunctions.f90 <br>G95 -fcase-upper -fno-underscoring -c TrnsysData.for <br>G95 -fcase-upper -fno-underscoring -c TrnsysConstants.f90 <br>G95 -fcase-upper -fno-underscoring -shared -mrtd -o Type%TRNSYS_TYPE%.dll Type%TRNSYS_TYPE%.for TrnsysConstants.o TrnsysFunctions.o TrnsysData.o -L. TRNDll.dll <pre style="white-space:pre-wrap;color:rgb(0,0,0)"><div style="color:rgb(34,34,34);font-family:arial,sans-serif;white-space:normal"><div style="font-size:12.8px;margin:2px 0px 0px"><div>________</div><div><h1 style="margin-bottom:0pt;margin-top:0pt"><span style="font-family:Arial">Using G95 to create TRNSYS TYPES</span><span style="font-family:Arial"></span></h1><p style="margin-bottom:0pt;margin-top:0pt"><span style="font-family:"Times New Roman""> </span></p><p style="margin-bottom:0pt;margin-top:0pt"><span style="font-family:"Times New Roman"">1. </span><span style="font-family:"Times New Roman"">Download and install G95 from </span><a href="http://www.g95.org/" target="_blank"><span style="color:rgb(0,0,255);font-family:"Times New Roman"">http://www.g95.org/</span></a><span style="font-family:"Times New Roman""><br></span><span style="font-family:"Times New Roman"">(Downloads -> binaries, Stable Version 0.91, March 2008, Self-extracting Windows x86, or just click here : </span><a href="http://ftp.g95.org/v0.91/g95-MinGW-41.exe" target="_blank"><span style="color:rgb(0,0,255);font-family:"Times New Roman"">http://ftp.g95.org/v0.91/g95-MinGW-41.exe</span></a><span style="font-family:"Times New Roman""> </span><span style="font-family:"Times New Roman""><br></span><span style="font-family:"Times New Roman""></span></p><p style="margin-bottom:0pt;margin-top:0pt"><span style="font-family:"Times New Roman"">2. </span><span style="font-family:"Times New Roman"">Start TRNSYS Simulation Studio and create a Proforma for your type. Be sure to set the type number.</span><span style="font-family:"Times New Roman""><br></span><span style="font-family:"Times New Roman""><br></span><span style="font-family:"Times New Roman""></span></p><p style="margin-bottom:0pt;margin-top:0pt"><span style="font-style:italic;font-family:"Times New Roman"">3. </span><span style="font-style:italic;font-family:"Times New Roman"">Save As…</span><span style="font-family:"Times New Roman"">  .TMF file into .\Trnsys16\Studio\Proformas (or a subdirectory thereof)</span><span style="font-family:"Times New Roman""></span></p><p style="margin-bottom:0pt;margin-top:0pt"><span style="font-family:"Times New Roman"">4. </span><span style="font-family:"Times New Roman"">Unzip G95-TRNSYS.zip to a directory you can remember, e.g. \tmp\G95\Type242. It contains slightly modified versions of the TrnsysConstants, TrnsysData and TrnsysFunctions modules. </span><span style="font-family:"Times New Roman""></span></p><p style="margin-bottom:0pt;margin-top:0pt"><span style="font-family:"Times New Roman"">5. </span><span style="font-family:"Times New Roman"">Use File/Export As… FORTRAN ; specify the directory you remembered in step 4. Ignore the warnig about Visual FORTRAN not starting (if you have Visual FORTRAN, it may start – just close it again). Ignore the generated .dsw and .opt files.</span><span style="font-family:"Times New Roman""></span></p><p style="margin-bottom:0pt;margin-top:0pt"><span style="font-family:"Times New Roman"">6. </span><span style="font-family:"Times New Roman"">Edit the FORTRAN template file produced to implement your type. Make sure continuation lines are preceded by 5 space characters, such as </span><span style="font-family:"Times New Roman""><br></span><span style="font-family:Courier">     1   STORED(NSTORED),T(ND),DTDT(ND)</span><span style="font-family:Courier"><br></span><span style="color:rgb(0,0,255);font-family:Courier">12345</span><span style="color:rgb(255,0,0);font-family:Courier">6</span><span style="color:rgb(255,0,0);font-family:Courier"><br></span><span style="font-family:"Times New Roman"">in line 68 of the example.</span><span style="color:rgb(255,0,0);font-family:Courier"><br></span><span style="font-family:"Times New Roman"">This convention differs from other compilers.</span><span style="color:rgb(255,0,0);font-family:Courier"> </span><span style="font-family:"Times New Roman""></span></p><p style="margin-bottom:0pt;margin-top:0pt"><span style="font-family:"Times New Roman"">7. </span><span style="font-family:"Times New Roman"">Edit the first line of compile.bat to set the correct type number, e.g. </span><span style="font-family:"Times New Roman""><br></span><span style="font-family:"Times New Roman"">set TRNSYS_TYPE=242</span><span style="font-family:"Times New Roman""></span></p><p style="margin-bottom:0pt;margin-top:0pt"><span style="font-family:"Times New Roman"">8. </span><span style="font-family:"Times New Roman"">Copy your TRNDll.Dll (from .\Trnsys16\Exe) to the directory you remembered in step 4. </span><span style="font-family:"Times New Roman""></span></p><p style="margin-bottom:0pt;margin-top:0pt"><span style="font-family:"Times New Roman"">9. </span><span style="font-family:"Times New Roman"">Run the Batch file</span><span style="font-family:"Times New Roman""></span></p><p style="margin-bottom:0pt;margin-top:0pt"><span style="font-family:"Times New Roman"">10. </span><span style="font-family:"Times New Roman"">Correct the errors you made in the source code and go back to step 8.</span><span style="font-family:"Times New Roman""></span></p><p style="margin-bottom:0pt;margin-top:0pt"><span style="font-family:"Times New Roman"">11. </span><span style="font-family:"Times New Roman"">Copy the resulting Dll (still from the directory remembered in step 4), \tmp\G95\Type242\Type242.dll in our example) to .\Trnsys16\Userlib\RekleaseDlls</span><span style="font-family:"Times New Roman""></span></p><p style="margin-bottom:0pt;margin-top:0pt"><span style="font-family:"Times New Roman""> </span></p><p style="margin-bottom:0pt;margin-top:0pt"><span style="font-family:"Times New Roman"">The Proforma can now be used in a simulation project in Simulation Studio. You can of course automate this using your favourite text editor, for example. </span></p></div></div></div><i>
</i><i>Any suggestion?
</i><i>Thanks,</i></pre><div class="gmail_extra"><br clear="all"><div><div data-smartmail="gmail_signature"><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div>Atenciosamente,<br>________________________________________________<br>
</div><div><b><i>Prof. Antonio Marcos de Oliveira Siqueira</i>,</b></div><b><font size="2">Programa de Pós-Graduação em Engenharia Química - PPGEnQ</font></b></div><div dir="ltr"><b><font size="2">Laboratório de Simulação Numérica e Fenômenos de Transporte - LabSim</font></b><br style="font-family:"Courier New",Courier,monospace;font-size:medium">Universidade Federal de Viçosa - UFV<br>Departamento de Química - DEQ, sala 208<br>Av. P. H. Rolfs - S/N, Campus Universitário<br>

CEP 36570-900, Viçosa - MG - Brasil<div>Fone: 31-3899-2370<br>
Email: <br><a href="mailto:antonio.siqueira@ufv.br" target="_blank">antonio.siqueira@ufv.br</a><br></div><div><img src="cid:image002.png@01D0B345.934DA900" alt="Rodapé"><br></div></div></div></div></div></div></div></div></div></div>
</div><br></div>