gyrokinetics / gs2 / 2078172070

coverage: 10.835% (+0.03%) from 10.806%
2078172070

push

gitlab-ci

David Dickinson 
Merged in experimental/user_controlled_output_base_name (pull request #1184)

5049 of 46599 relevant lines covered (10.83%)

119786.99 hits per line

Source File
Press 'n' to go to next uncovered line, 'b' for previous

0.0
/src/programs/write_default_input_file.fpp
1 
program write_default_input_file
×
2 
  use mp, only: init_mp, finish_mp, proc0
×
3 
  use file_utils, only: close_output_file
4 
  use config_collection, only: gs2_config_type
5 
  implicit none
6 
  type(gs2_config_type) :: the_config
×
7 
  integer :: local_output_unit
8 









9



  call init_mp




×







10



  if (proc0) then




×







11



     open(newunit = local_output_unit, action = "write", file = "defaults.in")




×







12



     call the_config%write_to_unit(local_output_unit)




×







13



     call close_output_file(local_output_unit)




×







14



  end if










15



  call finish_mp




×







16



end program write_default_input_file




×





















    

  • 

    •