320 lines
19 KiB
Plaintext
320 lines
19 KiB
Plaintext
SYNSPEC54.F 提取摘要
|
|
============================================================
|
|
|
|
源文件: tlusty/tlusty208.f
|
|
总单元数: 304
|
|
总行数: 50011
|
|
|
|
名称 类型 文件 行数
|
|
------------------------------------------------------------
|
|
TLUSTY PROGRAM tlusty.f 61
|
|
_UNNAMED_BLOCK_DATA_ BLOCK DATA _unnamed_block_data_.f 40
|
|
START SUBROUTINE start.f 18
|
|
INITIA SUBROUTINE initia.f 879
|
|
RDATA SUBROUTINE rdata.f 628
|
|
NSTPAR SUBROUTINE nstpar.f 373
|
|
NSTOUT SUBROUTINE nstout.f 123
|
|
GETWRD SUBROUTINE getwrd.f 47
|
|
STATE SUBROUTINE state.f 809
|
|
INPMOD SUBROUTINE inpmod.f 170
|
|
KURUCZ SUBROUTINE kurucz.f 143
|
|
INCLDY SUBROUTINE incldy.f 74
|
|
CHANGE SUBROUTINE change.f 286
|
|
RESOLV SUBROUTINE resolv.f 227
|
|
INILAM SUBROUTINE inilam.f 341
|
|
OSCCOR SUBROUTINE osccor.f 64
|
|
ROSSTD SUBROUTINE rosstd.f 131
|
|
NEWPOP SUBROUTINE newpop.f 42
|
|
SWITCH SUBROUTINE switch.f 87
|
|
SABOLF SUBROUTINE sabolf.f 144
|
|
OPACF1 SUBROUTINE opacf1.f 382
|
|
LEVSOL SUBROUTINE levsol.f 54
|
|
STEQEQ SUBROUTINE steqeq.f 112
|
|
PZERT SUBROUTINE pzert.f 86
|
|
RATMAT SUBROUTINE ratmat.f 206
|
|
RATMAL SUBROUTINE ratmal.f 38
|
|
ELCOR SUBROUTINE elcor.f 93
|
|
REFLEV SUBROUTINE reflev.f 276
|
|
LEVGRP SUBROUTINE levgrp.f 82
|
|
RATES1 SUBROUTINE rates1.f 188
|
|
RATSP1 SUBROUTINE ratsp1.f 247
|
|
ALIST1 SUBROUTINE alist1.f 253
|
|
ALIST2 SUBROUTINE alist2.f 785
|
|
ALISK1 SUBROUTINE alisk1.f 162
|
|
ALISK2 SUBROUTINE alisk2.f 204
|
|
DOPGAM SUBROUTINE dopgam.f 120
|
|
GAMSP SUBROUTINE gamsp.f 14
|
|
PROFIL FUNCTION profil.f 74
|
|
VOIGT FUNCTION voigt.f 64
|
|
VOIGTE FUNCTION voigte.f 92
|
|
PROFSP FUNCTION profsp.f 86
|
|
UBETA FUNCTION ubeta.f 40
|
|
LAGRAN SUBROUTINE lagran.f 16
|
|
LINSET SUBROUTINE linset.f 272
|
|
LINSPL SUBROUTINE linspl.f 45
|
|
LINPRO SUBROUTINE linpro.f 215
|
|
SIGK FUNCTION sigk.f 195
|
|
VERNER FUNCTION verner.f 237
|
|
VERN26 FUNCTION vern26.f 94
|
|
VERN16 FUNCTION vern16.f 74
|
|
VERN18 FUNCTION vern18.f 77
|
|
VERN20 FUNCTION vern20.f 85
|
|
GAUNT FUNCTION gaunt.f 45
|
|
GNTK FUNCTION gntk.f 17
|
|
SPSIGK SUBROUTINE spsigk.f 33
|
|
HIDALG FUNCTION hidalg.f 79
|
|
REIMAN FUNCTION reiman.f 68
|
|
CARBON SUBROUTINE carbon.f 53
|
|
SGHE12 FUNCTION sghe12.f 18
|
|
SBFHE1 FUNCTION sbfhe1.f 157
|
|
HEPHOT FUNCTION hephot.f 163
|
|
CKOEST FUNCTION ckoest.f 59
|
|
TOPBAS FUNCTION topbas.f 51
|
|
OPDATA SUBROUTINE opdata.f 66
|
|
YLINTP FUNCTION ylintp.f 31
|
|
GFREE0 SUBROUTINE gfree0.f 62
|
|
GFREE1 FUNCTION gfree1.f 21
|
|
GFREED SUBROUTINE gfreed.f 26
|
|
FFCROS FUNCTION ffcros.f 13
|
|
SBFHMI_OLD FUNCTION sbfhmi_old.f 22
|
|
SBFHMI FUNCTION sbfhmi.f 42
|
|
SFFHMI FUNCTION sffhmi.f 73
|
|
COLIS SUBROUTINE colis.f 443
|
|
HCTRECOM FUNCTION hctrecom.f 36
|
|
HCTION FUNCTION hction.f 28
|
|
CTDATA BLOCK DATA ctdata.f 234
|
|
COLH SUBROUTINE colh.f 522
|
|
BUTLER SUBROUTINE butler.f 141
|
|
COLHE SUBROUTINE colhe.f 355
|
|
CEH12 FUNCTION ceh12.f 25
|
|
CSPEC SUBROUTINE cspec.f 89
|
|
COLLHE SUBROUTINE collhe.f 314
|
|
CHEAV FUNCTION cheav.f 148
|
|
CHEAVJ FUNCTION cheavj.f 111
|
|
MATINV SUBROUTINE matinv.f 90
|
|
MINV3 SUBROUTINE minv3.f 36
|
|
LINEQS SUBROUTINE lineqs.f 87
|
|
EXPINT FUNCTION expint.f 30
|
|
INTERP SUBROUTINE interp.f 94
|
|
OUTPUT SUBROUTINE output.f 117
|
|
OUTPRI SUBROUTINE outpri.f 257
|
|
SOLVE SUBROUTINE solve.f 314
|
|
SOLVES SUBROUTINE solves.f 341
|
|
MATGEN SUBROUTINE matgen.f 178
|
|
BRTE SUBROUTINE brte.f 618
|
|
BRTEZ SUBROUTINE brtez.f 574
|
|
BHE SUBROUTINE bhe.f 174
|
|
BHED SUBROUTINE bhed.f 342
|
|
BHEZ SUBROUTINE bhez.f 283
|
|
BRE SUBROUTINE bre.f 301
|
|
BREZ SUBROUTINE brez.f 273
|
|
BPOP SUBROUTINE bpop.f 79
|
|
BPOPE SUBROUTINE bpope.f 187
|
|
BPOPF SUBROUTINE bpopf.f 106
|
|
BPOPT SUBROUTINE bpopt.f 200
|
|
BPOPC SUBROUTINE bpopc.f 109
|
|
OPACFD SUBROUTINE opacfd.f 521
|
|
ALIFR1 SUBROUTINE alifr1.f 1134
|
|
ALIFR3 SUBROUTINE alifr3.f 1127
|
|
ALIFR6 SUBROUTINE alifr6.f 653
|
|
ALIFRK SUBROUTINE alifrk.f 51
|
|
EMAT SUBROUTINE emat.f 39
|
|
RHSGEN SUBROUTINE rhsgen.f 722
|
|
PRCHAN SUBROUTINE prchan.f 86
|
|
OPADD SUBROUTINE opadd.f 274
|
|
OPADD0 SUBROUTINE opadd0.f 110
|
|
PARTF SUBROUTINE partf.f 983
|
|
PFCNO SUBROUTINE pfcno.f 165
|
|
PFSPEC SUBROUTINE pfspec.f 44
|
|
PFFE SUBROUTINE pffe.f 306
|
|
PFNI SUBROUTINE pfni.f 326
|
|
OPFRAC SUBROUTINE opfrac.f 293
|
|
PFHEAV SUBROUTINE pfheav.f 365
|
|
XK2DOP FUNCTION xk2dop.f 32
|
|
LTEGR SUBROUTINE ltegr.f 294
|
|
ROSSOP SUBROUTINE rossop.f 97
|
|
CONTMP SUBROUTINE contmp.f 222
|
|
CONTMD SUBROUTINE contmd.f 144
|
|
ELDENS SUBROUTINE eldens.f 259
|
|
ENTENE SUBROUTINE entene.f 59
|
|
MEANOP SUBROUTINE meanop.f 43
|
|
MEANOPT SUBROUTINE meanopt.f 38
|
|
CONVEC SUBROUTINE convec.f 66
|
|
CONVC1 SUBROUTINE convc1.f 67
|
|
TRMDER SUBROUTINE trmder.f 79
|
|
CUBIC SUBROUTINE cubic.f 62
|
|
CONOUT SUBROUTINE conout.f 130
|
|
ERFCX FUNCTION erfcx.f 20
|
|
MATCON SUBROUTINE matcon.f 224
|
|
TEMCOR SUBROUTINE temcor.f 99
|
|
CONCOR SUBROUTINE concor.f 48
|
|
CONREF SUBROUTINE conref.f 328
|
|
PZEVAL SUBROUTINE pzeval.f 49
|
|
PZEVLD SUBROUTINE pzevld.f 176
|
|
LEMINI SUBROUTINE lemini.f 85
|
|
INTLEM SUBROUTINE intlem.f 33
|
|
INTHYD SUBROUTINE inthyd.f 90
|
|
YINT FUNCTION yint.f 18
|
|
STARK0 SUBROUTINE stark0.f 51
|
|
STARKA FUNCTION starka.f 55
|
|
DIVSTR SUBROUTINE divstr.f 41
|
|
OPAHST SUBROUTINE opahst.f 131
|
|
WNSTOR SUBROUTINE wnstor.f 64
|
|
WN FUNCTION wn.f 41
|
|
DWNFR SUBROUTINE dwnfr.f 44
|
|
ODF1 SUBROUTINE odf1.f 179
|
|
ODFHST SUBROUTINE odfhst.f 54
|
|
ODFFR SUBROUTINE odffr.f 97
|
|
CHCKSE SUBROUTINE chckse.f 86
|
|
ACCEL2 SUBROUTINE accel2.f 110
|
|
ACCELP SUBROUTINE accelp.f 103
|
|
TIMING SUBROUTINE timing.f 24
|
|
QUIT SUBROUTINE quit.f 10
|
|
ODFSET SUBROUTINE odfset.f 224
|
|
ODFHYS SUBROUTINE odfhys.f 136
|
|
ODFMER SUBROUTINE odfmer.f 22
|
|
ODFHYD SUBROUTINE odfhyd.f 96
|
|
INDEXX SUBROUTINE indexx.f 45
|
|
SIGAVE SUBROUTINE sigave.f 93
|
|
READBF SUBROUTINE readbf.f 29
|
|
CORRWM SUBROUTINE corrwm.f 125
|
|
IJALIS SUBROUTINE ijalis.f 78
|
|
IJALI2 SUBROUTINE ijali2.f 131
|
|
LEVSET SUBROUTINE levset.f 177
|
|
DWNFR0 SUBROUTINE dwnfr0.f 25
|
|
DWNFR1 SUBROUTINE dwnfr1.f 31
|
|
SGMER0 SUBROUTINE sgmer0.f 45
|
|
SGMER1 SUBROUTINE sgmer1.f 14
|
|
SGMERD SUBROUTINE sgmerd.f 15
|
|
TDPINI SUBROUTINE tdpini.f 38
|
|
OPAINI SUBROUTINE opaini.f 155
|
|
TRAINI SUBROUTINE traini.f 46
|
|
RTEDF1 SUBROUTINE rtedf1.f 405
|
|
RTEDF2 SUBROUTINE rtedf2.f 256
|
|
RTEFR1 SUBROUTINE rtefr1.f 752
|
|
RTEINT SUBROUTINE rteint.f 357
|
|
OPACF0 SUBROUTINE opacf0.f 358
|
|
SRTFRQ SUBROUTINE srtfrq.f 263
|
|
INIFRC SUBROUTINE inifrc.f 360
|
|
INIFRS SUBROUTINE inifrs.f 503
|
|
INIFRT SUBROUTINE inifrt.f 263
|
|
CROSS FUNCTION cross.f 18
|
|
CROSSD FUNCTION crossd.f 31
|
|
DIETOT SUBROUTINE dietot.f 28
|
|
RADPRE SUBROUTINE radpre.f 223
|
|
LINSEL SUBROUTINE linsel.f 343
|
|
PRINC SUBROUTINE princ.f 156
|
|
LUCY SUBROUTINE lucy.f 268
|
|
IROSET SUBROUTINE iroset.f 203
|
|
LEVCD SUBROUTINE levcd.f 249
|
|
INKUL SUBROUTINE inkul.f 168
|
|
OPACFL SUBROUTINE opacfl.f 280
|
|
RDATAX SUBROUTINE rdatax.f 120
|
|
BKHSGO SUBROUTINE bkhsgo.f 66
|
|
CION FUNCTION cion.f 93
|
|
DIELRC SUBROUTINE dielrc.f 379
|
|
EXPO FUNCTION expo.f 10
|
|
IRC SUBROUTINE irc.f 48
|
|
SZIRC SUBROUTINE szirc.f 41
|
|
EXPINX SUBROUTINE expinx.f 38
|
|
EINT SUBROUTINE eint.f 18
|
|
COMSET SUBROUTINE comset.f 164
|
|
ANGSET SUBROUTINE angset.f 44
|
|
GAULEG SUBROUTINE gauleg.f 34
|
|
RTE_SC SUBROUTINE rte_sc.f 53
|
|
RTESOL SUBROUTINE rtesol.f 87
|
|
RTEFE2 SUBROUTINE rtefe2.f 75
|
|
RTECF0 SUBROUTINE rtecf0.f 171
|
|
INICOM SUBROUTINE inicom.f 29
|
|
RTECOM SUBROUTINE rtecom.f 171
|
|
RTECF1 SUBROUTINE rtecf1.f 451
|
|
RTECMC SUBROUTINE rtecmc.f 178
|
|
COMPT0 SUBROUTINE compt0.f 107
|
|
TAUFR1 SUBROUTINE taufr1.f 90
|
|
RTECMU SUBROUTINE rtecmu.f 206
|
|
RTEANG SUBROUTINE rteang.f 64
|
|
PRD SUBROUTINE prd.f 144
|
|
PRDINI SUBROUTINE prdini.f 54
|
|
GAMI FUNCTION gami.f 45
|
|
INPDIS SUBROUTINE inpdis.f 189
|
|
COLUMN SUBROUTINE column.f 50
|
|
GRCOR SUBROUTINE grcor.f 123
|
|
DMDER SUBROUTINE dmder.f 39
|
|
SIGMAR FUNCTION sigmar.f 91
|
|
LAGUER SUBROUTINE laguer.f 58
|
|
LTEGRD SUBROUTINE ltegrd.f 513
|
|
TEMPER SUBROUTINE temper.f 164
|
|
TLOCAL SUBROUTINE tlocal.f 52
|
|
QUARTC SUBROUTINE quartc.f 35
|
|
NEWDM SUBROUTINE newdm.f 205
|
|
NEWDMT SUBROUTINE newdmt.f 115
|
|
GRIDP SUBROUTINE gridp.f 54
|
|
HESOLV SUBROUTINE hesolv.f 212
|
|
HESOL6 SUBROUTINE hesol6.f 378
|
|
PSOLVE SUBROUTINE psolve.f 45
|
|
ZMRHO SUBROUTINE zmrho.f 107
|
|
BETAH FUNCTION betah.f 33
|
|
ERFCIN FUNCTION erfcin.f 20
|
|
RADTOT SUBROUTINE radtot.f 105
|
|
COOLRT SUBROUTINE coolrt.f 103
|
|
OPACFA SUBROUTINE opacfa.f 323
|
|
VISINI SUBROUTINE visini.f 107
|
|
DMEVAL SUBROUTINE dmeval.f 69
|
|
GREYD SUBROUTINE greyd.f 66
|
|
RHONEN SUBROUTINE rhonen.f 42
|
|
QUASIM SUBROUTINE quasim.f 57
|
|
GETLAL SUBROUTINE getlal.f 107
|
|
ALLARD SUBROUTINE allard.f 217
|
|
ALLARDT SUBROUTINE allardt.f 158
|
|
HEDIF SUBROUTINE hedif.f 92
|
|
RAPH FUNCTION raph.f 17
|
|
TABINI SUBROUTINE tabini.f 326
|
|
RAYINI SUBROUTINE rayini.f 42
|
|
TABINT SUBROUTINE tabint.f 89
|
|
CHCTAB SUBROUTINE chctab.f 171
|
|
RAYSET SUBROUTINE rayset.f 68
|
|
RAYLEIGH SUBROUTINE rayleigh.f 46
|
|
OPCTAB SUBROUTINE opctab.f 116
|
|
OPACT1 SUBROUTINE opact1.f 39
|
|
OPACTD SUBROUTINE opactd.f 95
|
|
SETTRM SUBROUTINE settrm.f 84
|
|
RHOEOS FUNCTION rhoeos.f 38
|
|
SETDRT SUBROUTINE setdrt.f 18
|
|
TRMDRT SUBROUTINE trmdrt.f 65
|
|
PRSENT SUBROUTINE prsent.f 59
|
|
MOLEQ SUBROUTINE moleq.f 318
|
|
RUSSEL SUBROUTINE russel.f 217
|
|
MPARTF SUBROUTINE mpartf.f 138
|
|
TIOPF SUBROUTINE tiopf.f 148
|
|
RYBSOL SUBROUTINE rybsol.f 202
|
|
RYBMAT SUBROUTINE rybmat.f 390
|
|
RYBENE SUBROUTINE rybene.f 203
|
|
RYBCHN SUBROUTINE rybchn.f 161
|
|
TRIDAG SUBROUTINE tridag.f 22
|
|
OPACTR SUBROUTINE opactr.f 180
|
|
RYBHEQ SUBROUTINE rybheq.f 142
|
|
PGSET SUBROUTINE pgset.f 92
|
|
LOCATE SUBROUTINE locate.f 26
|
|
XENINI SUBROUTINE xenini.f 104
|
|
INTXEN SUBROUTINE intxen.f 51
|
|
GOMINI SUBROUTINE gomini.f 104
|
|
GHYDOP SUBROUTINE ghydop.f 56
|
|
SBFCH FUNCTION sbfch.f 278
|
|
SBFOH FUNCTION sbfoh.f 327
|
|
ELDENC SUBROUTINE eldenc.f 150
|
|
SFFHMI_ADD FUNCTION sffhmi_add.f 72
|
|
CIA_H2H2 SUBROUTINE cia_h2h2.f 89
|
|
CIA_H2HE SUBROUTINE cia_h2he.f 90
|
|
CIA_H2H SUBROUTINE cia_h2h.f 89
|
|
CIA_HHE SUBROUTINE cia_hhe.f 89
|
|
H2MINUS SUBROUTINE h2minus.f 100
|
|
PRNT SUBROUTINE prnt.f 73
|
|
RECHCK SUBROUTINE rechck.f 35
|
|
LYMLIN SUBROUTINE lymlin.f 115
|
|
|
|
按类型统计:
|
|
PROGRAM: 1
|
|
BLOCK DATA: 2
|
|
SUBROUTINE: 251
|
|
FUNCTION: 50
|