forums.silverfrost.com

Hi Group,

I am having problems with the following code, it is creating the run time error *ERR* IO-09 in the command window, I have indicated in the code were the problem occurs by using a PAUSE st ...

Thank you for the clarification.

Hi Group,

The following code is designed to read data from a file:

* FILE: READ_ID.FOR
* SUBROUTINE TO READ FIRST TO RECORD OF A FILE
****************************************************** ...

Thanks to everyone for the information

The following code was originally written for the Watcom compiler and I assume worked ok:

SUBROUTINE RECTANG(I)

IMPLICIT NONE
COMMON T1,N,NM_N,M,NM_M ...

That fixes the problem, I just did not realize that passing the argument in that format effected the syntax for usage.

Thanks to everyone for their input, most appreciated.

Thanks for that davidb.

Would I be correct in assuming that if the code was wrtten as follows it would work ok:

arg3 = 0D0
T_CCHK = DCHK(T_STG,T_LEN,arg3)

Apologies for the delay in responding I have been trying to resolve the problem but without success.

I have posted the files which produce the problem at:

https://www.dropbox.com/sh/rx7cam71dnhp ...

I have changed the variable name through-out from SIGN to PT_SIGN but still get the same problem?

When running my program I am getting the following error:

Error 14 Attempt to alter an actual argument that is constant, an expression, an INTENT(IN) argument, or a DO variable

The first rou ...

Thank you for the advise and assistance from all

Thank you for that I understand the logic.

The file xx.F95 which I posted is a file which itself is used by a main program and accessed by using INCLUDE, if I understand the application logic for t ...

I have posted the source files at:

https://www.dropbox.com/sh/rx7cam71dnhp7nz/AABPTwDXAkD_kRrQKAXda442a?dl=0

There are three files:

xx.F95 // program calling Include files
C_AC ...

Thanks for your comments, below is the compiler transcript:

Compiling file: xx.F95
C:\Zepf2012\DR-AWDE\FTN95_Source\Includes\xx.F95(1) : warning 767 - The argument PITCH has not been used
C:\Zepf ...

I have listed below part of the routine causing the problem. The include file content can be seen commented out below the include files in the routine.

I have noticed that if I comment out the incl ...