LCOV - code coverage report
Current view: top level - inpgen - inpgen_help.f90 (source / functions) Hit Total Coverage
Test: combined.info Lines: 13 30 43.3 %
Date: 2019-09-08 04:53:50 Functions: 1 1 100.0 %

          Line data    Source code
       1             : !--------------------------------------------------------------------------------
       2             : ! Copyright (c) 2017 Peter Grünberg Institut, Forschungszentrum Jülich, Germany
       3             : ! This file is part of FLEUR and available as free software under the conditions
       4             : ! of the MIT license as expressed in the LICENSE file in more detail.
       5             : !--------------------------------------------------------------------------------
       6             : MODULE m_inpgen_help
       7             :   IMPLICIT NONE
       8             : CONTAINS
       9           3 :   SUBROUTINE inpgen_help()
      10             :     USE m_compile_descr
      11             :     USE m_constants
      12             :     USE m_juDFT
      13             :     USE m_check_arguments
      14             :     IMPLICIT NONE
      15           3 :     CHARACTER(:), ALLOCATABLE:: infostring
      16             : 
      17           3 :     PRINT *,"     Welcome to FLEUR - inpgen   (www.flapw.de)   "
      18           3 :     PRINT *, version_const_MaX
      19             :     
      20           3 :     CALL new_argument(0,"-genEnpara","Generate an 'enpara' file for the energy parameters","") 
      21           3 :     CALL new_argument(0,"-explicit","Write out k-point list, symmetry operations, and optional input to inp.xml","") 
      22           3 :     CALL new_argument(0,"-gw","Set GW mode 1 and add alternative k point set for GW in all outputs for the XML input file","")
      23           3 :     CALL new_argument(0,"-noco","write out noco parameters into inp.xml","")
      24           3 :     CALL new_argument(0,"-electronConfig","explicitely write the electron configuration into inp.xml","")
      25           3 :     CALL new_argument(0,"-fast_defaults","generate more aggressive (and less stable) input parameters for faster calculations","")
      26           3 :     CALL new_argument(0,"-h","Print this help message","")
      27             :     
      28           3 :     IF (.NOT.check_arguments()) CALL judft_warn("Invalid command line arguments",hint="Use -h option to see valid choices")
      29           3 :     IF (.NOT. juDFT_was_argument("-h")) RETURN
      30             : 
      31             :     !now print version info and help on command line arguments:
      32             :     CALL get_compile_desc_string(infostring)
      33           0 :     WRITE(*,'(a)') infostring
      34           0 :     WRITE(*,'(a)')
      35           0 :     WRITE(*,'(a)')"------------------------------------------------------"
      36           0 :     WRITE(*,'(a)')"inpgen usage info:"
      37           0 :     WRITE(*,'(a)')"The following command line options are known:"
      38           0 :     WRITE(*,'(a)')""
      39           0 :     CALL print_argument("-genEnpara")
      40           0 :     CALL print_argument("-explicit")
      41           0 :     CALL print_argument("-noco")
      42           0 :     CALL print_argument("-electronConfig")
      43           0 :     CALL print_argument("-fast_defaults")
      44           0 :     CALL print_argument("-gw")
      45           0 :     CALL print_argument("-h")
      46           0 :     WRITE(*,'(a)')""
      47           0 :     WRITE(*,'(a)')"Please check the documentation on www.flapw.de for more details"
      48             : 
      49           0 :     CALL juDFT_error("help was written")
      50           0 :   END SUBROUTINE inpgen_help
      51             : END MODULE m_inpgen_help

Generated by: LCOV version 1.13