From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mail-yw1-x1133.google.com (mail-yw1-x1133.google.com [IPv6:2607:f8b0:4864:20::1133]) by sourceware.org (Postfix) with ESMTPS id A1C5A388DD11 for ; Sat, 27 Aug 2022 13:23:55 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.1 sourceware.org A1C5A388DD11 Authentication-Results: sourceware.org; dmarc=pass (p=none dis=none) header.from=gmail.com Authentication-Results: sourceware.org; spf=pass smtp.mailfrom=gmail.com Received: by mail-yw1-x1133.google.com with SMTP id 00721157ae682-33dc345ad78so97428827b3.3 for ; Sat, 27 Aug 2022 06:23:55 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20210112; h=cc:to:subject:message-id:date:from:in-reply-to:references :mime-version:from:to:cc; bh=WiOuT/crorJa6Y9eKSyhRQ/3Pe78B6HZ8Iuj0dgO3zg=; b=SaIiq8Ql5WGhpGi5SB3ERF632b69yfETSS3AS/bLlKZbop/NCXusjdYEmR+neFLrLz XYwueKASGvIRF2Bc7L+uyHd1QompKBszIUbG6gjBB8AN1cEi1mmkomIsbUCQ/GtaRdoX c6bWFiL996/Gu3rZLq6qgM7AB4ZJFO0BZAbHIqDYf/G1ImUcUV8LeMx4bZ2EnvXxvHIF qSKnbr4PbQKxwhfQDE8cdUP+8NzvI4pnuehxI2pDjEhJvcG5L912FQDGMppk6/f3FabH nCb/A2fGIQ2RJWFAju6J1pTMcJ9H5gsRBXgTEGTg1mfcujL4crAB9fi+5iqcMx8e1Vd/ OKKA== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20210112; h=cc:to:subject:message-id:date:from:in-reply-to:references :mime-version:x-gm-message-state:from:to:cc; bh=WiOuT/crorJa6Y9eKSyhRQ/3Pe78B6HZ8Iuj0dgO3zg=; b=zuTaedqI7Enbd5Kr8OmrRkz8IfpPFvJs9ewSrnI4ArUZW4h7cuywVAONM/TbCBkt7S xJTV/tW3UfIuIgYBcJh7Bj0o9zKMB3cB8cERHRz46XicszG0Rgz67TnrRE6Ik4DI1GcH NItSxx9VqgSb/43JQvzNxmgmpAKn05+TFG1aQtI8eolFj00sZTq69opKPtDW9vyNRQNl yZwvuUK/1RrgJ2Oj0symGEMVWprKezcA3PWTgeXUFQhYDnnZQHa77chMVRmGR9hnOdsL uTNhKuXORkqlfJeUpBMXamQf1lFelAmzuHogHgSmXHdh/ZaHNpUMksSU38C6ocJMskwu qK0g== X-Gm-Message-State: ACgBeo04cd/RHsBjqWhhmvG1mBeNLiOsbgU6Jx8KNdk3eeOKTwCiWZId d4IeNBLfbAMpOJs4TqqwJzSMEUhL60B5XwVHscA= X-Google-Smtp-Source: AA6agR6PyQ/BwFbytw8NO1wGAUmq7wBT/2atiSiUjAef0hlsPTpmL7CnJIvxkzO/+O51jvQsg8s1cYzNr1L01m7AzvQ= X-Received: by 2002:a5b:74c:0:b0:695:9aa3:8b76 with SMTP id s12-20020a5b074c000000b006959aa38b76mr3220231ybq.103.1661606634299; Sat, 27 Aug 2022 06:23:54 -0700 (PDT) MIME-Version: 1.0 References: In-Reply-To: From: Arjen Markus Date: Sat, 27 Aug 2022 15:23:44 +0200 Message-ID: Subject: Re: Fortran issue To: Lars G Golmen Cc: Fortran List Content-Type: multipart/alternative; boundary="00000000000031a4a405e738f146" X-Spam-Status: No, score=0.2 required=5.0 tests=BAYES_00,DKIM_SIGNED,DKIM_VALID,DKIM_VALID_AU,DKIM_VALID_EF,FREEMAIL_ENVFROM_END_DIGIT,FREEMAIL_FROM,HTML_MESSAGE,KAM_SHORT,RCVD_IN_DNSWL_NONE,SPF_HELO_NONE,SPF_PASS,TXREP,T_SCC_BODY_TEXT_LINE autolearn=ham autolearn_force=no version=3.4.6 X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on server2.sourceware.org List-Id: Message-ID: <20220827132344.ZN0lczeRsCW_HaM7XBSQ8sJ8AsgAuKghu3yb40GsQD0@z> --00000000000031a4a405e738f146 Content-Type: text/plain; charset="UTF-8" Content-Transfer-Encoding: quoted-printable The backslash is probably an extension to keep the cursor on the same. You can achieve that by using advance=3D'no' in the write statement. Note that some compilers may require a flush statement to actually make the text visible. Regards, Arjen Op za 27 aug. 2022 15:19 schreef Lars G Golmen : > > Hello > I have an old, small Fortran 4 program doing some statistics on time > series: Aandstat. > The .EXE file ran on 32 bits PC with like XP-OS, but not anymore on 64 > bits. > > A colleague on mine tried compile the attached code in gfortran. > The gfortran compilation gave a couple of error messages, gfortran does > not seem to accept the =E2=80=9C\=E2=80=9D sign. > Is there a valid replacement for that sign (command) we can use, to get > quickly forward? > > Sorry for any inconvenience. > > Best regards > Lars Golmen > > -------------------------------------------------------------------------= --------------------------- > Lars G. Golmen, oceanographer, senior research scientist, Adj. professor > NIVA, Norwegian Institute for Water Research - Bergen and Runde branch, > Tel: (47) 4789 0957, Address: c/o Runde milj=C3=B8senter, N-6096 Runde, N= orway > Tokyo University of Marine Science and Technology, 4-5-7 Konan, Minato, > Tokyo. > http://www.niva.no > http://www.rundecentre.no > https://www.kaiyodai.ac.jp/english/ > << Fil: AANDSTAT.FOR >> > _____________________________________________ > Fr=C3=A5: Shamil Iakubov > Send: torsdag 25. august 2022 20:35 > Til: Lars G Golmen > Emne: RE: Fortran > > > Hi Lars! > > Fortran is exciting, in fact it has evolved significantly during the last > few years and it fits modern standards nowadays, except for the building > system probably. Also, some of the most in demand machine learning > libraries still use Fortran code. > > Regarding your problem. I have tried to compile it with gfortran, it is a > free open source compiler. It throws some errors: > > ``` > (base) lmsh@l5:~/src/lars_fortran$ gfortran AANDSTAT.FOR -std=3Dlegacy -o > program > AANDSTAT.FOR:27:22: > > 27 | 10 WRITE(*,'(//,A\)')' OPPGI FILNAMN FOR INPUT DATA-->' > | 1 > Error: Unexpected element =E2=80=98\=E2=80=99 in format string at (1) > AANDSTAT.FOR:30:17: > > 30 | WRITE(*,'(A\)')' OPPGI FILNAMN FOR RESULTAT (NY FIL)-->' > | 1 > Error: Unexpected element =E2=80=98\=E2=80=99 in format string at (1) > (base) lmsh@l5:~/src/lars_fortran$ > > Some googling proved that the code is compiler specific. It can be > compiled with the Intel compiler (ifort). Sadly it is not free now. I > believe NIVA has VisualStudio license with ifort so your files can be > compiled with visual studio solutions building system, but currently I > don=E2=80=99t have access to these facilities. > > Cheers, > Shamil > > _____________________________________________ > From: Lars G Golmen > > Sent: torsdag 25. august 2022 13:29 > To: Shamil Iakubov > > Subject: Fortran > > > Hei Shamil > Nice to know you do Fortran. > I worked with Fortran many years ago, Fortran 4.. on old computers. My > compliler no longer works. > Is it possible for you to recompile some source code I have, to work on > present OS? > I attach an example, just one program, no subroutines to map here. To make > some special statistics on a equidistant time series. Input file name to = be > provided, 2 columns w ascii data. > OK? > (I have several others..=F0=9F=99=82) > > Helsing > Lars G > << File: AANDSTAT.FOR >> > > --00000000000031a4a405e738f146--