Changes between Initial Version and Version 1 of Ticket #587
- Timestamp:
- 04/28/13 18:09:59 (12 years ago)
Legend:
- Unmodified
- Added
- Removed
- Modified
-
Ticket #587
- Property Resolution → Fixed
- Property Status new → closed
-
Ticket #587 – Description
initial v1 1 In revision 658, ticket 584, an extra optional argument named KeyWord was added to the find_file function in ROMS/Utility/inp_par.F. However optional arguments are only valid for external functions with an explicit interface (eg. those declared inside a module) which does not apply in this case.1 In revision '''658''', ticket '''584''', an extra optional argument named '''!KeyWord''' was added to the '''find_file''' function in '''ROMS/Utility/inp_par.F'''. However optional arguments are only valid for external functions with an explicit interface (eg. those declared inside a module) which does not apply in this case. 2 2 3 3 The interesting thing is that this violation of the Fortran standard does not cause any problems on some compilers (eg. Gfortran). However with xlf on AIX on a case I have run, the length of the file name argument inside find_file is incorrect at run-time, meaning that the file is reported to be missing when in fact it exists. 4 4 5 Noting that all the calls to find_filein the ROMS code do actually have the extra argument, the simplest solution is to remove the optional keyword.5 Noting that all the calls to '''find_file''' in the ROMS code do actually have the extra argument, the simplest solution is to remove the optional keyword. 6 6 7 (Putting all the procedures in inp_par.Finside a module would be a good idea, too, but I vaguely recall that there is a reason not to do this.)7 (Putting all the procedures in '''inp_par.F''' inside a module would be a good idea, too, but I vaguely recall that there is a reason not to do this.)