Help:The meaning of LOUT and INC statements

From: DanFortran (fort_at_ran)
Date: 11/28/03 

Date: 27 Nov 2003 22:29:54 -0600

Hi,

This is a small example (.f90) that is actually compiling on the Intel compiler.
There is an warning (Comment 18 : The statement function is obsolescent in Fortran 95)
but is linking ok.

      PROGRAM TEST_LOUT
      CALL OUTPUT(2,1)
      END PROGRAM TEST_LOUT

      SUBROUTINE OUTPUT(KOUT,INCRS)
      LOUT(N)=KOUT/N-(KOUT/(N*10))*10;
      INC(N)=((INCRS/N)*N)/INCRS+1/INCRS;
      M=LOUT(1000);
      IF(M.NE.0) M=INC(M);
      END SUBROUTINE OUTPUT

I can not understand what is with LOUT and INC, how can "LOUT(N)" compile, what is with "N" ???.
I've tried to search on the web but I've found nothing.

The assembler output seems to generate very strange instructions and the debugger
actually is skipping the LOUT(N) and INC(N) lines.(or incorrect generated line numbers)

If I put anything between the LOUT(N) and INC(N) lines it does not compile anymore
(Error 395 :This entity is not an array and must not be subscripted).

These instructions are striped down from a serious reference book so I believe that
they are actually doing something :)

Is there any equivalent statement(s)/logic for the LOUT/INC (even in other languages?)

Thanks
Dan

----== Posted via Newsfeed.Com - Unlimited-Uncensored-Secure Usenet News==----
http://www.newsfeed.com The #1 Newsgroup Service in the World! >100,000 Newsgroups
---= 19 East/West-Coast Specialized Servers - Total Privacy via Encryption =---

Relevant Pages

  • Re: DDK W2k3 bug? WNET and WXP build ok, W2k doesnt work
    ... > Linking Executable - ...
    (microsoft.public.development.device.drivers)
  • DDK W2k3 bug? WNET and WXP build ok, W2k doesnt work
    ... W2k does only work for executables and some of the libraries. ... Compiling message file - src\input\kbdclass\kbdlog.mc for all platforms ...
    (microsoft.public.development.device.drivers)
  • Re: linking issue
    ... mapped into the WinCE API's. ... this library it is giving me linking issues. ... which i have to include while compiling or any flags issue. ... Please do tell me all the paths and flags needed to compile code on ...
    (microsoft.public.windowsce.embedded.vc)
  • Re: Fun with CLISP FFI
    ... compiling and custom linking at all. ... mem image, and generate the script to invoke clisp with that mem image. ...
    (comp.lang.lisp)
  • Re: linking error (using interbase 6.0 API library)
    ... > I'm compiling a C program that is using Interbase 6.0 APIS. ... > the following errors at the time of linking. ... > If I set the option not to generate the underscore (function prefixed ... > Linker Error: Undefined symbol strlen in module TEST.C ...
    (comp.lang.c)