<?xml version="1.0" encoding="utf-8"?>
<feed xmlns="http://www.w3.org/2005/Atom">
	<title type="html"><![CDATA[Approximatrix Forums — Unusual Syntax Behavior]]></title>
	<link rel="self" href="https://forums.approximatrix.com/extern.php?action=feed&amp;tid=833&amp;type=atom" />
	<updated>2021-12-30T03:03:18Z</updated>
	<generator>PunBB</generator>
	<id>https://forums.approximatrix.com/viewtopic.php?id=833</id>
		<entry>
			<title type="html"><![CDATA[Re: Unusual Syntax Behavior]]></title>
			<link rel="alternate" href="https://forums.approximatrix.com/viewtopic.php?pid=3834#p3834" />
			<content type="html"><![CDATA[<p>Jeff,</p><p>Great news, I was hoping for a straight forward answer.&nbsp; From now on, I&#039;ll be more conscientious about using the lower case &#039;f&#039; for &#039;.f90&#039; and not &#039;F90&#039;.&nbsp; Perhaps other users may also find this informative. </p><p>As the year comes to an end, I would like to thank you and all your effort in developing SimplyFortran. It&#039;s brought life back to FORTRAN revealing its utility for scientific computation.&nbsp; From the 1950&#039;s until 2022, it&#039;s hear to stay.</p><p>Frank</p>]]></content>
			<author>
				<name><![CDATA[drfrank]]></name>
				<uri>https://forums.approximatrix.com/profile.php?id=223</uri>
			</author>
			<updated>2021-12-30T03:03:18Z</updated>
			<id>https://forums.approximatrix.com/viewtopic.php?pid=3834#p3834</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: Unusual Syntax Behavior]]></title>
			<link rel="alternate" href="https://forums.approximatrix.com/viewtopic.php?pid=3833#p3833" />
			<content type="html"><![CDATA[<p>Frank,</p><p>The problem is actually occurring because of the file extension you&#039;ve chosen.&nbsp; With our compiler (and many others), using a Fortran extension with capitalized letters, like <em>.<strong>F</strong>90</em>, will cause the C preprocessor to run through the Fortran code prior to compilation.&nbsp; The C preprocessor considers backslash characters to be line continuation characters when nothing follows them.&nbsp; When I stored your subroutine in a file with the extension <em>.<strong>f</strong>90</em>, it compiled just fine.</p>]]></content>
			<author>
				<name><![CDATA[jeff]]></name>
				<uri>https://forums.approximatrix.com/profile.php?id=2</uri>
			</author>
			<updated>2021-12-30T02:03:16Z</updated>
			<id>https://forums.approximatrix.com/viewtopic.php?pid=3833#p3833</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: Unusual Syntax Behavior]]></title>
			<link rel="alternate" href="https://forums.approximatrix.com/viewtopic.php?pid=3832#p3832" />
			<content type="html"><![CDATA[<p>Jeff,</p><p>The comma after the &#039;IE&#039; was a transcription error.&nbsp; The issue persists even when there is no comma after &#039;IE&#039;. The code is entered in free-format with a &#039;.F90&#039; appended to the file name. To see if you can reproduce this nuisance syntax, I&#039;ve placed some mock code below that produces the problem on my MS Surface Pro running Windows 10.&nbsp; In the example code below, when the &#039;?&#039; marks after the backslash are removed, the Warnings appear, &#039;Symbol B has no Implicit type.&#039;.&nbsp; Let me know what you find.</p><p>BTW, thanks for the detailed explanation of the Resilient Process Creation.</p><p>Wishing you and your family a Happy and Healthy New Year 2022!</p><p>Frank</p><p>&nbsp; &nbsp; &nbsp; &nbsp; SUBROUTINE SPCFFT( N, U, ISIN, WORK )<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; IMPLICIT NONE</p><p>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; INTEGER, PARAMETER :: I4 = Selected_Int_Kind(9)&nbsp; &nbsp; &nbsp; &nbsp;<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; INTEGER, PARAMETER :: I4B&nbsp; = KIND(1_I4)&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; INTEGER, PARAMETER :: p6 = Selected_Real_Kind(6,30)&nbsp; &nbsp;<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; INTEGER, PARAMETER :: SP = KIND(1.0_p6)&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; INTEGER, PARAMETER :: p15 = Selected_Real_Kind(15,30) <br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; INTEGER, PARAMETER :: DP = KIND(1.0_p15)&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; </p><p>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; INTEGER(I4B), INTENT(IN)&nbsp; &nbsp; &nbsp; :: N<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; INTEGER(I4B), INTENT(IN)&nbsp; &nbsp; &nbsp; :: ISIN<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; COMPLEX(DP), INTENT(IN OUT)&nbsp; &nbsp;:: U(N)<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; COMPLEX(DP), INTENT(OUT)&nbsp; &nbsp; &nbsp; :: WORK(N)</p><p>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; !--- Warning: backslash and newline separated by space?<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; INTEGER(I4B) :: A&nbsp; &nbsp; &nbsp; ! After&nbsp; &nbsp; \ ???<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; INTEGER(I4B) :: B&nbsp; &nbsp; &nbsp; ! Before&nbsp; &nbsp; &gt;&nbsp; Factors of N<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; INTEGER(I4B) :: C&nbsp; &nbsp; &nbsp; ! Current&nbsp; /<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; REAL(DP)&nbsp; :: D</p><p>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; A = 1<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; B = N<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; C = 1<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; D = 0.0_DP</p><p>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; IF (ISIN &lt;= 0) THEN<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; D = 1.0_DP<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; END IF</p><p>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; !--- Calculate Fourier transform<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; !--- Code removed for illustration purposes!</p><p>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; RETURN<br />&nbsp; &nbsp; &nbsp; &nbsp; END SUBROUTINE SPCFFT</p>]]></content>
			<author>
				<name><![CDATA[drfrank]]></name>
				<uri>https://forums.approximatrix.com/profile.php?id=223</uri>
			</author>
			<updated>2021-12-29T23:54:26Z</updated>
			<id>https://forums.approximatrix.com/viewtopic.php?pid=3832#p3832</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: Unusual Syntax Behavior]]></title>
			<link rel="alternate" href="https://forums.approximatrix.com/viewtopic.php?pid=3831#p3831" />
			<content type="html"><![CDATA[<p>Frank,</p><p>The first error is caused by the comma trailing the declaration of <em>IE</em>.&nbsp; Because of a continuation character, the compiler thinks you&#039;re trying to declare <em>A</em> with an initial value of 1.</p><p>The second error is not one I&#039;m really seeing.&nbsp; Are you entering this code as free-format Fortran (with a <em>.f90</em>, amongst others) or as fixed-format Fortran (with a <em>.f</em> extension)?</p><p>The Resilient Process Creation system basically launches a thread which subsequently attempts to launch your executable.&nbsp; Simply Fortran&#039;s main thread then waits for a few seconds for the launching thread to return.&nbsp; If the launching thread never returns, the process creation operation never worked.&nbsp; </p><p>The reason for the feature is that many consumer-grade virus scanners will simply block a new executable (like one you just compiled) from executing at all without so much as a notice to the user.&nbsp; This routine will guess that a virus scanner has interfered and let the user know. This methodology is only necessary on Windows, of course.</p>]]></content>
			<author>
				<name><![CDATA[jeff]]></name>
				<uri>https://forums.approximatrix.com/profile.php?id=2</uri>
			</author>
			<updated>2021-12-29T15:41:10Z</updated>
			<id>https://forums.approximatrix.com/viewtopic.php?pid=3831#p3831</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Unusual Syntax Behavior]]></title>
			<link rel="alternate" href="https://forums.approximatrix.com/viewtopic.php?pid=3830#p3830" />
			<content type="html"><![CDATA[<p>Hi Jeff,<br />I&#039;ve encountered a syntax issue when using the extended line character symbol &#039;&amp;&#039; followed by a backslash &#039;\&#039; and a space &#039; &#039;.&nbsp; I receive Warning messages regarding the backslash and newline are separated by space. In the example code below, when the &#039;?&#039; mark after the backslash is removed, the Warnings appear. Once the Warnings appear, then I also get the following error messages:<br />&nbsp; &#039;Error Symbol &#039;a&#039; at (1) already has basic type of Integer&#039;<br />&nbsp; &#039;Error: Symbol &#039;ia&#039; at (1) has no Implicit type&#039;</p><p>Do you have an explanation for this behavior in the Simply Fortran editor?</p><p>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; INTEGER, PARAMETER :: I4 = Selected_Int_Kind(9)&nbsp; &nbsp;<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; INTEGER, PARAMETER :: I4B&nbsp; = KIND(1_I4)&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; </p><p>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; !--- Warning: backslash and newline separated by space<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; INTEGER(I4B) :: A&nbsp; &nbsp; &nbsp; ! After&nbsp; &nbsp; \ ?<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; INTEGER(I4B) :: B&nbsp; &nbsp; &nbsp; ! Before&nbsp; &nbsp; &gt;&nbsp; Factors<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; INTEGER(I4B) :: C&nbsp; &nbsp; &nbsp; ! Current&nbsp; / </p><p>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; !--- Warning: backslash and newline separated by space<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; INTEGER(I4B) :: &amp;&nbsp; &nbsp;! \ ?<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; IA,&nbsp; &nbsp; &amp;&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; !&nbsp; \ ?<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; IB,&nbsp; &nbsp; &amp;&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; !&nbsp; &nbsp;\&nbsp; DO loop indicies.<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; IC,&nbsp; &nbsp; &amp;&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; !&nbsp; &nbsp;/<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; IE,&nbsp; &nbsp; &amp;&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; !&nbsp; /</p><p>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; !--- Initialize parameters<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; !--- Error Symbol &#039;a&#039; at (1) already has basic type of Integer<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; A = 1<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; B = 1<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; C = 1<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; !--- Error: Symbol &#039;ia&#039; at (1) has no Implicit type<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; IA = 1<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; IB = 1<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; IC = 1<br />&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; IE = 1</p><p>On a different subject, what does the following option do?<br />Options-&gt;Appearance &amp; Behavior-&gt;Launching-&gt; [X] Use resilient process creation</p><p>Happy New Year 2022!<br />Frank</p>]]></content>
			<author>
				<name><![CDATA[drfrank]]></name>
				<uri>https://forums.approximatrix.com/profile.php?id=223</uri>
			</author>
			<updated>2021-12-28T19:47:49Z</updated>
			<id>https://forums.approximatrix.com/viewtopic.php?pid=3830#p3830</id>
		</entry>
</feed>
