1 MODULE usr 2 ! 3 ! Declare the user-defined namelist variables (usrnlst.inc) in this module. 4 ! Also Include user-defined variables in this module. To access the 5 ! variables from a subroutine add the statement "Use usr". If allocatable 6 ! arrays are defined in this module allocate them in usr0. To turn on the 7 ! user defined subroutines (usr0, usr1, and usr2) set call_usr to true in 8 ! mfix.dat. 9 ! 10 ! a dummy variable listed in usrnlst.inc 11 DOUBLE PRECISION DUMMY_DP 12 13 END MODULE usr 14