Mofia 2.0 has been developed and is running on the DEC alpha and linux platforms. We have not significantly changed that code which is largely common to E787 and deals with event handling, skimming, run control and I/O assignments, CFM, and YBOS initializations. This is the code found in the main/ subdirectory. It has had many years of testing and debugging, so there is little to be gained from changing it. Procedures that are unique to E614 such as read_det_geom and begin_run have had USE statments added to give them access to the f90 procedures, and setup_geometry has been rewritten to use the new data types and moved to main_f90. The namelist procedure has been rewritten as a module; it is simplified through use of the new control structures and it is easier to interface to new parameters required for the user routines. USE statements are added to interpret.F. The BLOCK DATA routine kdata.F will be used only for initialization of the common blocks filled in the main/ directory-it may be convenient in future to use a module instead for this purpose so that it can be loaded from a library. All of the code in main/ remains in fixed format with extension .F
Common blocks and parameter definitions are implemented through include directives using cpp. Many of these are required outside of main/. The include files have therefore been modified to be compatible with both fixed and free source formats by removing continuation lines and using ! to delimit comment lines. For commons extending over several lines, because line continuation is different in fixed and free formats, the COMMONS have been extended on separate lines; ie COMMON /AAA/ A,B,C COMMON /AAA/ E,F,G is OK in both and equivalnet to COMMON /AAA/ A,B,C,D,E,F
I have tried to develop a convenient style based on O-O concepts and abstracting from f90 code examples, and then described the result in module-coding-rules. Please look at some examples: tdc_mod.f90 and det_geom_mod.f90.Mofia 2.0 also compiles on linux using the Absoft compiler. The YBOS, BRU, CFM, and GPLOT libraries have been modified to compile under f90 and link properly. Absoft f90 versions of the CERN 1999 and 2000 libraries have been built.