SYNSPEC54.F 提取摘要 ============================================================ 源文件: synspec/synspec54.f 总单元数: 168 总行数: 23918 名称 类型 文件 行数 ------------------------------------------------------------ SYNSPEC PROGRAM synspec.f 174 START SUBROUTINE start.f 107 INITIA SUBROUTINE initia.f 339 RDATA SUBROUTINE rdata.f 472 NSTPAR SUBROUTINE nstpar.f 136 COUNT_WORDS SUBROUTINE count_words.f 16 GETWRD SUBROUTINE getwrd.f 47 STATE0 SUBROUTINE state0.f 546 INIMOD SUBROUTINE inimod.f 68 STATE SUBROUTINE state.f 95 TINT SUBROUTINE tint.f 22 INIBL0 SUBROUTINE inibl0.f 456 INIBL1 SUBROUTINE inibl1.f 117 RESOLV SUBROUTINE resolv.f 86 RTE SUBROUTINE rte.f 594 OUTPRI SUBROUTINE outpri.f 116 CROSET SUBROUTINE croset.f 35 CROSEW SUBROUTINE crosew.f 33 SIGK FUNCTION sigk.f 171 GAUNT FUNCTION gaunt.f 42 GNTK FUNCTION gntk.f 18 SPSIGK SUBROUTINE spsigk.f 34 CARBON SUBROUTINE carbon.f 52 SGHE12 FUNCTION sghe12.f 17 HIDALG FUNCTION hidalg.f 74 REIMAN FUNCTION reiman.f 67 SBFHE1 FUNCTION sbfhe1.f 146 HEPHOT FUNCTION hephot.f 164 TOPBAS FUNCTION topbas.f 49 OPDATA SUBROUTINE opdata.f 65 YLINTP FUNCTION ylintp.f 29 OPAC SUBROUTINE opac.f 223 OPACW SUBROUTINE opacw.f 199 OPACON SUBROUTINE opacon.f 126 SGMERG FUNCTION sgmerg.f 34 GFREE FUNCTION gfree.f 21 SFFHMI_OLD FUNCTION sffhmi_old.f 9 LYMLIN SUBROUTINE lymlin.f 68 FEAUTR FUNCTION feautr.f 40 HYLSET SUBROUTINE hylset.f 64 HYLSEW SUBROUTINE hylsew.f 58 HYDLIN SUBROUTINE hydlin.f 369 HYDLIW SUBROUTINE hydliw.f 258 HE2SET SUBROUTINE he2set.f 92 HE2SEW SUBROUTINE he2sew.f 86 HE2LIN SUBROUTINE he2lin.f 201 HE2LIW SUBROUTINE he2liw.f 196 STARK0 SUBROUTINE stark0.f 90 STARKA FUNCTION starka.f 54 STARKIR FUNCTION starkir.f 33 DIVSTR SUBROUTINE divstr.f 34 HYDINI SUBROUTINE hydini.f 191 HYDTAB SUBROUTINE hydtab.f 48 INTHYD SUBROUTINE inthyd.f 92 YINT FUNCTION yint.f 17 HE1INI SUBROUTINE he1ini.f 55 WTOT FUNCTION wtot.f 40 EXTPRF FUNCTION extprf.f 21 PHE1 FUNCTION phe1.f 158 HE2INI SUBROUTINE he2ini.f 91 INTHE2 SUBROUTINE inthe2.f 82 DIVHE2 SUBROUTINE divhe2.f 29 PHE2 SUBROUTINE phe2.f 98 ISPEC FUNCTION ispec.f 59 HESET SUBROUTINE heset.f 150 INISET SUBROUTINE iniset.f 354 READPH SUBROUTINE readph.f 150 INILIN SUBROUTINE inilin.f 607 INILIN_GRID SUBROUTINE inilin_grid.f 383 INIBLA SUBROUTINE inibla.f 46 IDTAB SUBROUTINE idtab.f 97 INIBLH SUBROUTINE iniblh.f 125 NLTSET SUBROUTINE nltset.f 403 PHTION SUBROUTINE phtion.f 46 NLTE SUBROUTINE nlte.f 95 LINOP SUBROUTINE linop.f 158 LINOPW SUBROUTINE linopw.f 241 PROFIL SUBROUTINE profil.f 54 GRIEM SUBROUTINE griem.f 18 GAMHE SUBROUTINE gamhe.f 69 EPS FUNCTION eps.f 23 XK2DOP FUNCTION xk2dop.f 33 INKUR SUBROUTINE inkur.f 65 INPMOD SUBROUTINE inpmod.f 160 INPBF SUBROUTINE inpbf.f 35 LEVSOL SUBROUTINE levsol.f 37 CHANGE SUBROUTINE change.f 100 RATMAT SUBROUTINE ratmat.f 37 SABOLF SUBROUTINE sabolf.f 115 SBFHMI_OLD FUNCTION sbfhmi_old.f 22 OPADD SUBROUTINE opadd.f 210 WN FUNCTION wn.f 53 WNSTOR SUBROUTINE wnstor.f 39 QUIT SUBROUTINE quit.f 11 VOIGTE FUNCTION voigte.f 90 SIGAVS SUBROUTINE sigavs.f 202 PHTX SUBROUTINE phtx.f 101 GETLAL SUBROUTINE getlal.f 93 ALLARD SUBROUTINE allard.f 228 LYAHHE SUBROUTINE lyahhe.f 61 READBF SUBROUTINE readbf.f 20 PRETAB SUBROUTINE pretab.f 39 VOIGTK FUNCTION voigtk.f 41 RTECD SUBROUTINE rtecd.f 452 RTEDFE SUBROUTINE rtedfe.f 168 PARTF SUBROUTINE partf.f 845 PFFE SUBROUTINE pffe.f 298 MATINV SUBROUTINE matinv.f 76 LINEQS SUBROUTINE lineqs.f 63 EXPINT FUNCTION expint.f 18 INTERP SUBROUTINE interp.f 82 INTRP SUBROUTINE intrp.f 44 PFSPEC SUBROUTINE pfspec.f 1702 PARTDV SUBROUTINE partdv.f 29 PFNI SUBROUTINE pfni.f 326 PFHEAV SUBROUTINE pfheav.f 367 FRAC1 SUBROUTINE frac1.f 88 FRACTN SUBROUTINE fractn.f 155 DWNFR0 SUBROUTINE dwnfr0.f 24 DWNFR1 SUBROUTINE dwnfr1.f 41 CHCKAB SUBROUTINE chckab.f 49 MOLINI SUBROUTINE molini.f 78 INMOLI SUBROUTINE inmoli.f 346 MOLSET SUBROUTINE molset.f 143 INIBLM SUBROUTINE iniblm.f 31 IDMTAB SUBROUTINE idmtab.f 86 MOLOP SUBROUTINE molop.f 61 SBFHMI FUNCTION sbfhmi.f 42 SFFHMI FUNCTION sffhmi.f 70 MPARTF SUBROUTINE mpartf.f 134 MOLEQ SUBROUTINE moleq.f 262 RUSSEL SUBROUTINE russel.f 230 SETWIN SUBROUTINE setwin.f 70 SETRAY SUBROUTINE setray.f 211 WGTJH1 SUBROUTINE wgtjh1.f 102 TRIDAG SUBROUTINE tridag.f 24 RESOLW SUBROUTINE resolw.f 187 RTESCA SUBROUTINE rtesca.f 241 RTEWIN SUBROUTINE rtewin.f 248 VELSET SUBROUTINE velset.f 204 RADTEM SUBROUTINE radtem.f 55 SBFCH FUNCTION sbfch.f 279 SBFOH FUNCTION sbfoh.f 328 XENINI SUBROUTINE xenini.f 120 INTXEN SUBROUTINE intxen.f 49 GOMINI SUBROUTINE gomini.f 95 GHYDOP SUBROUTINE ghydop.f 50 INGRID SUBROUTINE ingrid.f 334 OUGRID SUBROUTINE ougrid.f 38 FINGRD SUBROUTINE fingrd.f 131 ABNCHN SUBROUTINE abnchn.f 52 DENSIT SUBROUTINE densit.f 57 TODENS SUBROUTINE todens.f 109 RHONEN SUBROUTINE rhonen.f 41 ELDENS SUBROUTINE eldens.f 210 TIMING SUBROUTINE timing.f 25 EOSPRI SUBROUTINE eospri.f 247 CIA_H2H2 SUBROUTINE cia_h2h2.f 89 LOCATE SUBROUTINE locate.f 26 CIA_H2HE SUBROUTINE cia_h2he.f 90 CIA_H2H SUBROUTINE cia_h2h.f 87 CIA_HHE SUBROUTINE cia_hhe.f 89 H2MINUS SUBROUTINE h2minus.f 99 H2OPF SUBROUTINE h2opf.f 22 VOPF SUBROUTINE vopf.f 22 GVDW FUNCTION gvdw.f 32 EXOPF SUBROUTINE exopf.f 78 IRWPF SUBROUTINE irwpf.f 165 按类型统计: PROGRAM: 1 SUBROUTINE: 134 FUNCTION: 33