a variacional del estado de transición a la - Páxinas persoais - USC ...

More documents

Recommendations

Info

116 C.2. CONFORATEC TSif (nat_ts.gt.1) thendo i=1,n_tsif (lints(i).eq.0) nfreq=3*nat_ts-5if (lints(i).eq.1) nfreq=3*nat_ts-6call zpen(nfreq,i,wts,ts_zpe)write(6,9) i,ts_zpeenddoendifwrite(6,4)CC Loop over the TemperaturesCdo i=1,ntempC Reactant-AC Moleculeif (nat_ra.gt.1) thendo j=1,n_raC Rotational Partition FunctionC REACT-Aif (lina(j).eq.0) thenC 1: Lineal Moleculeqrota(j,i)=zrotlin(dmira(j,1),temp(i))nfreq=3*nat_ra-5elseC 2: Non-Linear Moleculeqrota(j,i)=zrotnolin(dmira(j,1),dmira(j,2),dmira(j,3),temp(i))nfreq=3*nat_ra-6endifCCVibrational Partition FunctionREACT-Aqviba(j,i)=1.D0do m=1,nfreqqvibap(j,i,m)=qqvib(wa(j,m),j,temp(i))C Torsinal modes!!!!!C Aproximation to lower frequenciesqviba(j,i)=qviba(j,i)*qvibap(j,i,m)enddoqa(j,i)=qrota(j,i)*qviba(j,i)CCCCCCCCElectronic Partition FunctionREACT-Aif (iop6.eq.1) thenqeleca=qelect(numsta,dega,difena,temp(i))qa(j,i)=qa(j,i)*qelecaendifif (j.eq.1) write (6,310) temp(i)write (6,311) jwrite(6,34) qrota(j,i),qviba(j,i),qeleca,qa(j,i)write (6,32)do m=1,nfreqwrite (6,33) m,wa(j,m),qvibap(j,i,m)enddoNumber of symmetryqa(j,i)=qa(j,i)/ansyma(j)REACT-A
C. Programas 117call wgt(qa(j,i),temp(i),enra(j))enddoC Atomselse if (nat_ra.eq.1) thenqa(j,i)=1.D0/ansyma(j)if (iop6.eq.1) thenqeleca=qelect(numsta,dega,difena,temp(i))qa(j,i)=qa(j,i)*qelecaendifendifCC Bimolecular reactionCC Reactant Bif (iop1.eq.2) thendo j=1,n_rbC Moleculeif (nat_rb.gt.1) thenCC Rotational Partition FunctionCC REACT-Bif (linb(j).eq.0) thenC 1: Linear Moleculeqrotb(j,i)=zrotlin(dmirb(j,1),temp(i))nfreq=3*nat_rb-5elseC 2: Non-Linear Moleculeqrotb(j,i)=zrotnolin(dmirb(j,1),dmirb(j,2),dmirb(j,3),& temp(i))nfreq=3*nat_rb-6endifCCCCCVibrational Partition Functionqvibb(j,i)=1.D0do m=1,nfreqqvibbp(j,i,m)=qqvib(wb(j,m),j,temp(i))qvibb(j,i)=qvibb(j,i)*qvibbp(j,i,m)enddoAtomelse if (nat_rb.eq.1) thenqb(j,i)=1.D0qrotb(j,i)=1.D0qvibb(j,i)=1.D0endifTraslational Partition Functionamatot=0.D0ambtot=0.D0do k=1,nat_raamatot=amatot+amasa(j,k)enddodo k=1,nat_rbambtot=ambtot+amasb(j,k)enddoqtrans=ztrans(amatot,ambtot,temp(i))qb(j,i)=qrotb(j,i)*qvibb(j,i)Electronic Partition Function
Page 5:
VANTONIO FEZNÁNDEZ RAMOS Y SAULO A
Page 9 and 10:
Índice general1. Introducción y o
Page 12 and 13:
XIIÍNDICE DE FIGURAS3.4. Confórme
Page 15 and 16:
Capítulo 1Introducción y objetivo
Page 17 and 18:
1. Introducción y objetivos 3su ef
Page 19 and 20:
1. Introducción y objetivos 5Tabla
Page 21 and 22:
1. Introducción y objetivos 7algun
Page 23 and 24:
1. Introducción y objetivos 91.3.
Page 25 and 26:
1. Introducción y objetivos 11Tabl
Page 27 and 28:
1. Introducción y objetivos 13la p
Page 29 and 30:
1. Introducción y objetivos 15C 8
Page 31 and 32:
1. Introducción y objetivos 17Tabl
Page 33 and 34:
1. Introducción y objetivos 19C 8
Page 35 and 36:
1. Introducción y objetivos 21Figu
Page 37 and 38:
1. Introducción y objetivos 23medi
Page 39 and 40:
Capítulo 2Métodos teóricosPara a
Page 41 and 42:
2. Métodos teóricos 27Sin embargo
Page 43 and 44:
2. Métodos teóricos 29mínimo. Mi
Page 45 and 46:
2. Métodos teóricos 31podrán omi
Page 47 and 48:
2. Métodos teóricos 33Para poder
Page 49 and 50:
2. Métodos teóricos 35esférica d
Page 51 and 52:
2. Métodos teóricos 37recibe el n
Page 53 and 54:
2. Métodos teóricos 39Las integra
Page 55 and 56:
2. Métodos teóricos 41electrón l
Page 57 and 58:
2. Métodos teóricos 43son de áto
Page 59 and 60:
2. Métodos teóricos 45e INDO. Sin
Page 61 and 62:
2. Métodos teóricos 47centros y c
Page 63 and 64:
2. Métodos teóricos 492.3.3. Mét
Page 65 and 66:
2. Métodos teóricos 51cierto tama
Page 67 and 68:
2. Métodos teóricos 53Teorema var
Page 69 and 70:
2. Métodos teóricos 55el funciona
Page 71 and 72:
2. Métodos teóricos 57• Por úl
Page 73 and 74:
2. Métodos teóricos 59este nivel
Page 75 and 76:
2. Métodos teóricos 61transición
Page 77 and 78:
2. Métodos teóricos 63generalizad
Page 79 and 80: 2. Métodos teóricos 65expresión
Page 81 and 82: 2. Métodos teóricos 67(o 2) rotac
Page 83 and 84: 2. Métodos teóricos 69partición
Page 85 and 86: 2. Métodos teóricos 71en un incre
Page 87: 2. Métodos teóricos 73La segunda
Page 90 and 91: 76 3.1. Superficie de energía pote
Page 98 and 99: Tabla 3.2: Energías en kcal/mol y
Page 104 and 105: Figura 3.9: Estructuras conformacio
Page 106 and 107: Tabla 3.3: Energías y principales
Page 108 and 109: 94 3.2. Cálculos de dinámica dire
Page 114 and 115: 100 3.2. Cálculos de dinámica dir
Page 117 and 118: Apéndice AMétodo simplex descende
Page 119: A. Método simplex descendente mult
Page 122 and 123: 108el que se encuentra en favor de
Page 124 and 125: 110 C.1. MORATE2end programCsubrout
Page 126 and 127: 112 C.1. MORATE2if (i.eq.icurt.or.i
Page 128 and 129: 114 C.2. CONFORATE& ,wts(nconfs,nfr
Page 132 and 133: 118 C.2. CONFORATECCCCif (iop6.eq.1
Page 134 and 135: 120 C.2. CONFORATEakp_vtst(n,i)=ct(
Page 136 and 137: 122 C.2. CONFORATECCwrite(6,30) tem
Page 138 and 139: 124 C.2. CONFORATEC Compute traslat
Page 140 and 141: 126 C.2. CONFORATEC Read input data
Page 142 and 143: 128 C.2. CONFORATECCCCenddoelsewrit
Page 144 and 145: 130 C.2. CONFORATEstop1011 write(6,
Page 146 and 147: 132 C.2. CONFORATElin=0C write(6,*)
Page 148 and 149: 134 C.2. CONFORATE& ,numsta,numstb,
Page 150 and 151: 136 C.2. CONFORATEwrite(6,33) (dmir
Page 152 and 153: 138 C.2. CONFORATEendC Compute the
Page 154 and 155: 140 C.2. CONFORATEC Full F matrixdo
Page 156 and 157: 142 C.2. CONFORATE* NAGOYA UNIVERSI
Page 158 and 159: 144 C.2. CONFORATE* * * * * * * * *
Page 160 and 161: 146 C.2. CONFORATEDO 400 J=1,N400 V
Page 162 and 163: 148 C.2. CONFORATE298. 63.0843 # Co
Page 165 and 166: Bibliografía[1] C. Funk, “On the
Page 167 and 168: BIBLIOGRAFÍA 153[24] A. Verloop, A
Page 169 and 170: BIBLIOGRAFÍA 155[47] D. Hartree,
Page 171: BIBLIOGRAFÍA 157G. Liu, A. Liashen
show all

a variacional del estado de transición a la - Páxinas persoais - USC ...

Create successful ePaper yourself

Delete template?

Save as template?