| 查看: 1576 | 回复: 5 | |||
| 当前主题已经存档。 | |||
xirainbow木虫 (正式写手)
|
[交流]
【求助】如何读大型的fortran写的源程序？
|
||
|
本人只读过一本fortran入门的书籍 我现在想读一个大型开源软件(PWscf中的pw.x)的源程序 但是其中含有一百多个.f90文件，我不知道哪个.f90是我应该读的第一个文件：（ (我只知道C语言一般是从main文件开始读，根据main中的code，就可以知道接着该读哪个文件了) 还有，这种软件如何才能像matlab中的debug模式一样， 让其执行一行，然后自动停住，等待键盘指令再执行下一行。 还请多多指教！ 它的Makefile文件如下所示。 我不知道是否还需要提供更多的信息，才能回到我提出的问题：） # Makefile for PW include ../make.sys PWOBJS = \ a2fmod.o \ add_bfield.o \ add_efield.o \ add_vuspsi.o \ add_vuspsi_nc.o \ addusdens.o \ addusforce.o \ addusstress.o \ allocate_bp_efield.o \ allocate_fft.o \ allocate_locpot.o \ allocate_nlpot.o \ allocate_wfc.o \ atomic_rho.o \ atomic_wfc.o \ average_pp.o \ becmod.o \ bp_c_phase.o \ bp_calc_btq.o \ bp_qvan3.o \ bp_strings.o \ buffers.o \ c_bands.o \ c_phase_field.o \ ccgdiagg.o \ cdiagh.o \ cdiaghg.o \ cegterg.o \ cft3.o \ cft3s.o \ checkallsym.o \ checksym.o \ clean_pw.o \ close_files.o \ compute_becsum.o \ compute_dip.o \ compute_rho.o \ compute_rho_new.o \ compute_fes_grads.o \ compute_scf.o \ compute_qdipol.o \ compute_qdipol_so.o \ compute_ux.o \ coset.o \ cryst_to_car.o \ cubicsym.o \ d_matrix.o \ data_structure.o \ davcio.o \ deriv_drhoc.o \ divide_class.o \ divide_class_so.o \ realus.o \ diropn.o \ divide.o \ divide_et_impera.o \ dndepsilon.o \ dndtau_of_k.o \ dprojdepsilon.o \ dprojdtau.o \ dqvan2.o \ drhoc.o \ dvloc_of_g.o \ dynamics_module.o \ efermig.o \ efermit.o \ electrons.o \ eqvect.o \ ewald.o \ ewald_dipole.o \ exx.o \ find_group.o \ forces_bp_efield.o \ force_cc.o \ force_corr.o \ force_ew.o \ force_hub.o \ force_lc.o \ force_us.o \ forces.o \ g_psi.o \ g_psi_mod.o \ gen_at_dj.o \ gen_at_dy.o \ gen_us_dj.o \ gen_us_dy.o \ get_locals.o \ ggen.o \ gk_sort.o \ gradcorr.o \ gweights.o \ g2_kin.o \ h_epsi_her_apply.o \ h_epsi_her_set.o \ h_1psi.o \ h_psi.o \ h_psi_meta.o \ hexsym.o \ hinit0.o \ hinit1.o \ init_ns.o \ init_run.o \ init_us_1.o \ init_us_2.o \ init_at_1.o \ init_vloc.o \ input.o \ interpolate.o \ inverse_s.o \ io_rho_xml.o \ ions.o \ irrek.o \ iweights.o \ kpoint_grid.o \ lchk_tauxk.o \ make_pointlists.o \ makov_payne.o \ memory_report.o \ mix_pot.o \ mix_rho.o \ mode_group.o \ move_ions.o \ multable.o \ n_plane_waves.o \ new_ns.o \ ns_adj.o \ newd.o \ noncol.o \ non_scf.o \ openfil.o \ orthoatwfc.o \ output_tau.o \ para.o \ paw_init.o \ paw_onecenter.o \ potinit.o \ print_clock_pw.o \ print_ks_energies.o \ psymrho.o \ psymrho_mag.o \ punch.o \ pw_restart.o \ pwcom.o \ qvan2.o \ rcgdiagg.o \ rdiagh.o \ rdiaghg.o \ read_conf_from_file.o \ read_file.o \ read_pseudo.o \ regterg.o \ remove_atomic_rho.o \ report_mag.o \ reset_k_points.o \ restart_from_file.o \ restart_in_electrons.o \ restart_in_ions.o \ rgen.o \ rho2zeta.o \ rotate_wfc.o \ rotate_wfc_k.o \ rotate_wfc_gamma.o \ ruotaijk.o \ s_1psi.o \ s_axis_to_ca.o \ s_psi.o \ save_in_cbands.o \ save_in_electrons.o \ save_in_ions.o \ scale_h.o \ scf_mod.o \ seqopn.o \ set_defaults_pw.o \ set_fft_dim.o \ set_hubbard_l.o \ set_kplusq.o \ set_kup_and_kdw.o \ set_rhoc.o \ set_vrs.o \ setlocal.o \ setqf.o \ setup.o \ setupkpt.o \ sgam_at.o \ sgam_at_mag.o \ sgam_ph.o \ sgama.o \ smallg_q.o \ spinor.o \ sph_ind.o \ startup.o \ stop_run.o \ stres_cc.o \ stres_ewa.o \ stres_gradcorr.o \ stres_har.o \ stres_hub.o \ stres_knl.o \ stres_loc.o \ stres_us.o \ stress.o \ struct_fact.o \ sum_band.o \ sumkg.o \ sumkt.o \ summary.o \ symmetrize_at.o \ symrho.o \ symrho_mag.o \ symscalar.o \ symtns.o \ symvect.o \ symz.o \ tabd.o \ transform_becsum_so.o \ transform_becsum_nc.o \ trntns.o \ trnvecc.o \ trnvect.o \ tweights.o \ update_pot.o \ usnldiag.o \ v_of_rho.o \ vcsmd.o \ vcsubs.o \ vhpsi.o \ vhpsi_nc.o \ vloc_of_g.o \ vloc_psi.o \ w0gauss.o \ w1gauss.o \ wfcinit.o \ wgauss.o \ write_ns.o \ wsweight.o \ weights.o \ MODULES = \ ../Modules/atom.o \ ../Modules/autopilot.o \ ../Modules/basic_algebra_routines.o \ ../Modules/berry_phase.o \ ../Modules/bfgs_module.o \ ../Modules/cell_base.o \ ../Modules/check_stop.o \ ../Modules/clocks.o \ ../Modules/constants.o \ ../Modules/constraints_module.o \ ../Modules/control_flags.o \ ../Modules/descriptors.o \ ../Modules/dspev_drv.o \ ../Modules/electrons_base.o \ ../Modules/error_handler.o \ ../Modules/exc_t.o \ ../Modules/fft_base.o \ ../Modules/fft_parallel.o \ ../Modules/fft_scalar.o \ ../Modules/fft_types.o \ ../Modules/functionals.o \ ../Modules/input_parameters.o \ ../Modules/io_files.o \ ../Modules/io_global.o \ ../Modules/ions_base.o \ ../Modules/ions_nose.o \ ../Modules/kind.o \ ../Modules/mp_global.o \ ../Modules/mp_wave.o \ ../Modules/mp.o \ ../Modules/mp_base.o \ ../Modules/metagga.o \ ../Modules/metadyn_base.o \ ../Modules/metadyn_io.o \ ../Modules/metadyn_vars.o \ ../Modules/path_base.o \ ../Modules/path_formats.o \ ../Modules/path_variables.o \ ../Modules/path_opt_routines.o \ ../Modules/path_io_routines.o \ ../Modules/path_reparametrisation.o \ ../Modules/parallel_include.o \ ../Modules/parameters.o \ ../Modules/parser.o \ ../Modules/paw_variables.o \ ../Modules/printout_base.o \ ../Modules/pseudo_types.o \ ../Modules/ptoolkit.o \ ../Modules/radial_grids.o \ ../Modules/random_numbers.o \ ../Modules/read_cards.o \ ../Modules/read_namelists.o \ ../Modules/read_ncpp.o \ ../Modules/read_upf_v1.o \ ../Modules/read_upf_v2.o \ ../Modules/read_uspp.o \ ../Modules/recvec.o \ ../Modules/shmem_include.o \ ../Modules/splinelib.o \ ../Modules/stick_base.o \ ../Modules/task_groups.o \ ../Modules/timestep.o \ ../Modules/upf_to_internal.o \ ../Modules/uspp.o \ ../Modules/upf.o \ ../Modules/version.o \ ../Modules/vxc_t.o \ ../Modules/vxcgc.o \ ../Modules/wavefunctions.o \ ../Modules/wave_base.o \ ../Modules/write_upf_v2.o \ ../Modules/xml_io_base.o \ ../Modules/zhpev_drv.o TLDEPS=bindir mods libs libiotk all : tldeps pw.x pw.x : pwscf.o libpw.a $(LIBOBJS) $(LD) $(LDFLAGS) -o $@ \ pwscf.o $(MODULES) libpw.a $(LIBOBJS) $(LIBS) - ( cd ../bin; ln -fs ../PW/$@ . ) libpw.a : $(PWOBJS) $(AR) $(ARFLAGS) $@ $? $(RANLIB) $@ tldeps: test -n "$(TLDEPS)" && ( cd .. ; $(MAKE) $(MFLAGS) $(TLDEPS) || exit 1) || : clean : - /bin/rm -f pw.x *.o *.a *~ *.F90 *.d *.mod *.i *.L include make.depend # DO NOT DELETE [ Last edited by xirainbow on 2010-2-16 at 14:42 ] |
回复此楼» 猜你喜欢
求调剂 有机化学考研356分
已经有4人回复
-
0703 化学 求调剂，一志愿山东大学 342 分
已经有4人回复
-
086000生物与医药调剂
已经有7人回复
-
305求调剂
已经有7人回复
-
348求调剂
已经有3人回复
-
332求调剂
已经有6人回复
-
各位老师好，我的一志愿为北京科技大学085601材料专硕
已经有6人回复
-
085600 材料与化工 329分求调剂
已经有10人回复
-
356求调剂
已经有3人回复
-
一志愿武汉理工，总分321，英一数二，求老师收留。
已经有7人回复
2楼2010-02-18 21:21:47
xirainbow
木虫 (正式写手)
- 应助: 0 (幼儿园)
- 贵宾: 0.03
- 金币: 2132.6
- 红花: 2
- 帖子: 775
- 在线: 6.1小时
- 虫号: 431211
- 注册: 2007-08-11
- 专业: 光谱学
3楼2010-02-19 14:09:14
yalefield
金虫 (文坛精英)
老汉一枚
- 程序强帖: 3
- 应助: 129 (高中生)
- 贵宾: 0.17
- 金币: 21238.9
- 散金: 3440
- 红花: 66
- 帖子: 12101
- 在线: 759.1小时
- 虫号: 96063
- 注册: 2005-10-07
- 专业: 高等教育学
- 管辖: 计算模拟
4楼2010-02-19 18:14:28
xirainbow
木虫 (正式写手)
- 应助: 0 (幼儿园)
- 贵宾: 0.03
- 金币: 2132.6
- 红花: 2
- 帖子: 775
- 在线: 6.1小时
- 虫号: 431211
- 注册: 2007-08-11
- 专业: 光谱学
★ ★ ★
jjdg(金币+2):辛苦了，感谢分享！ 2010-02-20 23:01
jjdg(金币+1):春节快乐 2010-02-20 23:02
jjdg(金币+2):辛苦了，感谢分享！ 2010-02-20 23:01
jjdg(金币+1):春节快乐 2010-02-20 23:02
|
谢谢，问题已经解决 详细过程http://muchong.com/bbs/viewthread.php?tid=1842033 |
5楼2010-02-20 21:18:07
★
jjdg(金币+1):春节快乐 2010-02-21 19:04
jjdg(金币+1):春节快乐 2010-02-21 19:04
| 恭喜恭喜 |
6楼2010-02-21 14:09:06
