forums.silverfrost.com

[LitusSaxonicum]

I agree that it is desirable that it should be all or nothing as far as IMPLICIT NONE is concerned, the point was that if you want it, it is possible to implement it routine-by-routine AND still keep the old implicit type conventions. As for me, the certain knowledge of what is INTEGER is invaluable, as I still use codes I wrote well over 40 years ago. My only type assumption error was declaring lambda to be REAL, and that drove me nearly mad. I'd lost access to machines where single precision was 48 or 60 bits, and 32 bits wasn't good enough to converge the calculation. The problem wasn't even that I thought it was INTEGER, I knew I'd 'sorted it out' a decade before. IMPLICIT NONE wouldn't have helped, as the type was declared (to be the useless 32 bit standard precision REAL).

I think that your suggestion that in Plato the different variable type could be shown colour coded is an excellent one (for those afflicted by IMPLICIT NONE). Perhaps in response to a switch. I hope that Paul takes notice.

As for everyone looking like a man, I didn't know that you had spent time in an East German Olympics squad!

Eddie

[JohnCampbell]

I am a bit lost about this IMPLICIT NONE discussion.

You can put an IMPLICIT NONE at the start of each (or some) routine.
You then have to explicitly define the type of all variables being used, be they in MODULE, COMMON or local.

There is no requirement to make I a real variable or A1 an integer.
You just have to declare their type.

What you are effectively doing is providing a dictionary of allowable variable names for each routine, so if the variable name is not in the "dictionary", then you get an error report.

If you use include files for COMMON or modules, then declaring all variables listed in the include file replicates the work for all routines that use these includes. With modules, there is less work, as a module is typically a list of declarations.

You are then left to declare the local variables in each routine. As for 1000's of variables, how can that work ? I have always had a coding strategy of a routine can fit onto a page ( 60 lines of code ) hard to get 1000's of local variables into a single routine.
I do have modules that are 1000+ lines long, with derived type definitions and global variables. I need a dictionary in this case.
I think you would be surprised how many spelling errors you have in your code.

Really not sure how this destroys the spirit of I being an integer ?

John

[LitusSaxonicum]

Precisely, John. The issue of how you name your variables of different types is separate from whether or not you use IMPLICIT NONE or not, and as well as incrementally incorporating IMPLICIT NONE in your code routine-by-routine, you are right that you can do it in INCLUDE files.

E

[DanRRight]

What if i forget to declare I123453423 ?
Why i need to go to another file, module or function or hell knows where to see was I123453423 declared or not and if yes then how?
Why when debug or update the code i have to search I123453423 among 1000 other variables like I123423, I423343412, I52345345, I52345234534, I345345453452345, I23453456q4356w4565467e3567, i5345345345345345345, i545345w3234423234234234, i43423542345634632465, I332wersdssdfsdfsdfsdf, Ir4233423424234, I342342342345_1234, I23423434563456235423452, I2431234234234234, I423434234234. My modules have many pages of declarations only computer search can find anything there.

We have better things to do as /undef and /73 will find us more then just stupid typos without even thinking about all of the above

[LitusSaxonicum]

Calm down, Dan! You don't have to - well, at least not currently. But if you wanted to, you don't have to do it all at once. And if the Fortran Committee dictate, maybe you'll have to. As for me, I'll never use IMPLICIT NONE. It's snake oil.
Fortunately, my needs will have expired long before the Fortran Committee get round to outlawing Fortran as we know it and replacing the source form with cascading columns of mixed Hiragana, Katakana and Kanji,only in green!

[JohnCampbell]