Commit 97358215 authored by ulrich_y's avatar ulrich_y
Browse files

Minimise use

parent b58849c0
MODULE gpl_module MODULE gpl_module
use globals use globals
use utils
use maths_functions
use shuffle
use mpl_module
use ieps use ieps
use utils
use shuffle, only: shuffle_product, shuffle_with_zero
use maths_functions, only: plog1, polylog, zeta
use mpl_module, only: mpl
implicit none implicit none
INTERFACE G INTERFACE G
......
MODULE maths_functions MODULE maths_functions
use globals use globals
use utils use ieps
use utils, only: factorial
implicit none implicit none
interface polylog interface polylog
module procedure polylog1, polylog2 module procedure polylog1, polylog2
......
MODULE mpl_module MODULE mpl_module
use globals use globals
use utils use ieps
use maths_functions
implicit none implicit none
CONTAINS CONTAINS
......
MODULE shuffle MODULE shuffle
use globals use globals
use utils use ieps
implicit none implicit none
CONTAINS CONTAINS
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment