Fortran Wiki
Singleton pattern