/dports/science/quantum-espresso/q-e-qe-6.7.0/Modules/ |
H A D | trimcheck.f90 | 9 FUNCTION trimcheck ( directory ) function 18 CHARACTER (LEN=256) :: trimcheck local 28 IF ( l > LEN( trimcheck ) ) & 31 trimcheck = TRIM ( ADJUSTL(directory) ) 37 IF ( trimcheck(i:i) == '/' ) trimcheck(i:i) = separator 44 IF ( l < LEN( trimcheck ) ) THEN 45 trimcheck(l+1:l+1) = separator 53 END FUNCTION trimcheck
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/PP/src/ |
H A D | initial_state.f90 | 33 CHARACTER(LEN=256), EXTERNAL :: trimcheck variable 60 tmp_dir = trimcheck (outdir)
|
H A D | fermi_proj.f90 | 50 CHARACTER(LEN=256), EXTERNAL :: trimcheck local 83 tmp_dir = trimcheck (outdir) 216 CHARACTER(LEN=256), EXTERNAL :: trimcheck variable
|
H A D | pw2critic.f90 | 54 CHARACTER(LEN=256), EXTERNAL :: trimcheck variable 79 tmp_dir = trimcheck(outdir)
|
H A D | fermi_velocity.f90 | 43 CHARACTER(LEN=256), EXTERNAL :: trimcheck variable 53 tmp_dir = trimcheck(outdir)
|
H A D | dos.f90 | 41 CHARACTER(LEN=256), EXTERNAL :: trimcheck variable 82 tmp_dir = trimcheck (outdir)
|
H A D | postproc.f90 | 44 CHARACTER(LEN=256), EXTERNAL :: trimcheck local 96 tmp_dir = trimcheck ( outdir )
|
H A D | wfck2r.f90 | 63 CHARACTER(LEN=256), external :: trimcheck variable 103 tmp_dir = trimcheck (outdir)
|
H A D | plan_avg.f90 | 35 CHARACTER(LEN=256), EXTERNAL :: trimcheck variable 69 tmp_dir = trimcheck (outdir)
|
H A D | open_grid.f90 | 43 CHARACTER(LEN=256), EXTERNAL :: trimcheck variable 84 tmp_dir = trimcheck(outdir)
|
H A D | wannier_plot.f90 | 29 CHARACTER(LEN=256), EXTERNAL :: trimcheck variable 66 tmp_dir = trimcheck (outdir)
|
H A D | fermisurface.f90 | 58 CHARACTER(LEN=256), EXTERNAL :: trimcheck local 79 tmp_dir = trimcheck (outdir)
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/GWW/head/ |
H A D | phq_readin.f90 | 86 CHARACTER(LEN=256), EXTERNAL :: trimcheck local 393 tmp_dir = trimcheck (outdir) 399 drho_star%dir=trimcheck(drho_star%dir) 400 dvscf_star%dir=trimcheck(dvscf_star%dir) 587 wpot_dir = trimcheck(wpot_dir) 615 ahc_dir = trimcheck(ahc_dir) 670 tmp_dir_ph= trimcheck( TRIM (tmp_dir) // '_ph' // int_to_char(my_image_id) ) 698 tmp_dir_phq= trimcheck ( TRIM(tmp_dir_ph) // TRIM(prefix) // &
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/PHonon/PH/ |
H A D | phq_readin.f90 | 86 CHARACTER(LEN=256), EXTERNAL :: trimcheck local 384 tmp_dir = trimcheck (outdir) 390 drho_star%dir=trimcheck(drho_star%dir) 391 dvscf_star%dir=trimcheck(dvscf_star%dir) 578 wpot_dir = trimcheck(wpot_dir) 606 ahc_dir = trimcheck(ahc_dir) 661 tmp_dir_ph= trimcheck( TRIM (tmp_dir) // '_ph' // int_to_char(my_image_id) ) 689 tmp_dir_phq= trimcheck ( TRIM(tmp_dir_ph) // TRIM(prefix) // &
|
H A D | ph_restart.f90 | 1034 CHARACTER(LEN=256), EXTERNAL :: trimcheck local 1039 dirname = trimcheck ( TRIM( tmp_dir_ph ) // TRIM( prefix ) // '.phsave' ) 1139 CHARACTER(LEN=256), EXTERNAL :: trimcheck local 1158 dir_phq= trimcheck ( TRIM (tmp_dir_ph) // TRIM(prefix) // & 1290 CHARACTER(LEN=256), EXTERNAL :: trimcheck local 1296 dirname = trimcheck ( TRIM( tmp_dir_ph ) // TRIM( prefix ) // '.phsave' )
|
H A D | dfile_star.f90 | 160 CHARACTER(len=256),EXTERNAL :: trimcheck local 172 descr%dir = trimcheck(descr%dir) 174 IF (ionode) INQUIRE(file=trimcheck(descr%dir)//'.', exist = exst)
|
H A D | check_initial_status.f90 | 111 CHARACTER (LEN=256), EXTERNAL :: trimcheck local 221 tmp_dir_phq= trimcheck ( TRIM (tmp_dir_ph) // TRIM(prefix) // & 330 tmp_dir_phq= trimcheck ( TRIM (tmp_dir_ph) // TRIM(prefix) // &
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/GWW/simple_bse/ |
H A D | input_simple_exc.f90 | 36 CHARACTER(LEN=256), EXTERNAL :: trimcheck local 45 outdir = trimcheck(simple_in%outdir)
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/GWW/simple_ip/ |
H A D | input_simple_ip.f90 | 39 CHARACTER(LEN=256), EXTERNAL :: trimcheck local 48 outdir = trimcheck(simpleip_in%outdir)
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/test-suite/not_epw_comp/ |
H A D | phq_readin.f90 | 80 CHARACTER(LEN=256), EXTERNAL :: trimcheck local 353 tmp_dir = trimcheck (outdir) 359 drho_star%dir=trimcheck(drho_star%dir) 360 dvscf_star%dir=trimcheck(dvscf_star%dir) 588 tmp_dir_ph= trimcheck( TRIM (tmp_dir) // '_ph' // int_to_char(my_image_id) ) 616 tmp_dir_phq= trimcheck ( TRIM(tmp_dir_ph) // TRIM(prefix) // &
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/GWW/simple/ |
H A D | simple.f90 | 37 CHARACTER(LEN=256), EXTERNAL :: trimcheck variable 68 tmp_dir = trimcheck( outdir )
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/HP/src/ |
H A D | hp_readin.f90 | 33 CHARACTER(LEN=256), EXTERNAL :: trimcheck local 96 tmp_dir = trimcheck (outdir)
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/TDDFPT/src/ |
H A D | lr_readin.f90 | 59 CHARACTER(LEN=256), EXTERNAL :: trimcheck local 216 outdir = trimcheck(outdir) 390 wfc_dir = trimcheck ( wfcdir )
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/PHonon/Gamma/ |
H A D | cg_readin.f90 | 30 CHARACTER(LEN=256), EXTERNAL :: trimcheck local 64 tmp_dir = trimcheck (outdir)
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/XSpectra/src/ |
H A D | read_input_and_bcast.f90 | 36 CHARACTER(LEN=256), EXTERNAL :: trimcheck local 153 tmp_dir = trimcheck(outdir) !TRIM(outdir)
|