1 $ diff BNDLYR.f BNDLYR.f_org 149c149 < !$omp parallel do & --- > !$omp parallel do 261c261 < !$omp parallel do & --- > !$omp parallel do 300c300 < !$omp parallel do & --- > !$omp parallel do 302c302 < !!$omp& --- > !$omp& 2 $ diff CALCAPE.f CALCAPE.f_org 227,229c227,229 < !$omp parallel do & < !$omp& private(apebtk,apespk,bqk,bqs00k,bqs10k,iq,it,ittbk,lmhk, & < !$omp& p00k,p01k,p10k,p11k,pkl,psfck,qbtk,sqk,sqs00k, & --- > !$omp parallel do > !$omp& private(apebtk,apespk,bqk,bqs00k,bqs10k,iq,it,ittbk,lmhk, > !$omp& p00k,p01k,p10k,p11k,pkl,psfck,qbtk,sqk,sqs00k, 315c315 < !$omp parallel do & --- > !$omp parallel do 329c329 < !$omp parallel do & --- > !$omp parallel do 412c412 < !$omp parallel do & --- > !$omp parallel do 435c435 < !$omp parallel do & --- > !$omp parallel do 3 $ diff CALHEL.f CALHEL.f_org 211c211 < !$omp parallel do & --- > !$omp parallel do 316c316 < !$omp parallel do & --- > !$omp parallel do 399c399 < !$omp parallel do & --- > !$omp parallel do 4 $ diff CALMCVG.f CALMCVG.f_org 94c94 < !$omp parallel do & --- > !$omp parallel do 132c132 < !$omp parallel do & --- > !$omp parallel do 151c151 < !$omp parallel do & --- > !$omp parallel do 5 $ diff CALRCH.f CALRCH.f_org 97,98c97,98 < !$omp& private(cs,ct,dthvkl,dukl,dvkl,dzkl,elkl,elklsq, & < !$omp& q2kl,qroot,rdzkl,ri,uhkl,ulkl,vhkl,vlkl, & --- > !$omp& private(cs,ct,dthvkl,dukl,dvkl,dzkl,elkl,elklsq, > !$omp& q2kl,qroot,rdzkl,ri,uhkl,ulkl,vhkl,vlkl, 6 $ diff CALWXT.f CALWXT.f_org 174,175c174,175 < !$omp& private(area1,areap4,areas8,dzkl,ifrzl,iwrml,lice, & < !$omp& lmhk,pintk1,pintk2,pm150,psfck,surfc,surfw, & --- > !$omp& private(area1,areap4,areas8,dzkl,ifrzl,iwrml,lice, > !$omp& lmhk,pintk1,pintk2,pm150,psfck,surfc,surfw, 7 $ diff CALWXT_BOURG.f CALWXT_BOURG.f_org 104c104 < !$omp& private(a,lmhk,tlmhk,iwrml,psfck,lhiwrm,pintk1,pintk2,area1, & --- > !$omp& private(a,lmhk,tlmhk,iwrml,psfck,lhiwrm,pintk1,pintk2,area1, 8 $ diff CALWXT_REVISED.f CALWXT_REVISED.f_org 173,174c173,174 < !$omp& private(area1,areap4,areap0,areas8,dzkl,ifrzl,iwrml,lice, & < !$omp& lmhk,pintk1,pintk2,pm150,psfck,surfc,surfw, & --- > !$omp& private(area1,areap4,areap0,areas8,dzkl,ifrzl,iwrml,lice, > !$omp& lmhk,pintk1,pintk2,pm150,psfck,surfc,surfw, 9 $ diff FRZLVL.f FRZLVL.f_org 96,98c96,98 < !$omp& private(alpfrz,alph,alpl,delalp,delq,delt,delz, & < !$omp& delzp,dzabv,dzfr,htsfc,l,llmh,psfc,qfrz, & < !$omp& qsat,qsfc,qsfrz,rhsfc,rhz,tsfc, & --- > !$omp& private(alpfrz,alph,alpl,delalp,delq,delt,delz, > !$omp& delzp,dzabv,dzfr,htsfc,l,llmh,psfc,qfrz, > !$omp& qsat,qsfc,qsfrz,rhsfc,rhz,tsfc, 10 $ diff NGMFLD.f NGMFLD.f_org 130,133c130,133 < !$omp& private(dz,p100,p18,p47,p84,p85, & < !$omp& p96,p98,pm,qdiv,qk,qkhn,qkhs,qkm1,qm,qm8510, & < !$omp& qmcvg,qs,qudx,qvdy,r2dx,r2dy,rh,rh1847,rh4710, & < !$omp& rh4796,rh8498,tm,tmt0,tmt15,z1847,z4710,z4796, & --- > !$omp& private(dz,p100,p18,p47,p84,p85, > !$omp& p96,p98,pm,qdiv,qk,qkhn,qkhs,qkm1,qm,qm8510, > !$omp& qmcvg,qs,qudx,qvdy,r2dx,r2dy,rh,rh1847,rh4710, > !$omp& rh4796,rh8498,tm,tmt0,tmt15,z1847,z4710,z4796, 11 $ diff NGMSLP.f NGMSLP.f_org 119,120c119,120 < !$omp& private(llmh,pavg,psfc,qavg,rhoavg,rrhog, & < !$omp& tau,tauavg,tausfc,tausl,tavg,tvrbar,tvrsfc,tvrsl, & --- > !$omp& private(llmh,pavg,psfc,qavg,rhoavg,rrhog, > !$omp& tau,tauavg,tausfc,tausl,tavg,tvrbar,tvrsfc,tvrsl, 12 $ diff TRPAUS.f TRPAUS.f_org 94,95c94,95 < !$omp& private(delt,delt2,dz,dz2,ie,iw,l,llmh,pm,rsqdif, & < !$omp& tlapse,tlapse2,u0,u0l,uh,uh0,ul, & --- > !$omp& private(delt,delt2,dz,dz2,ie,iw,l,llmh,pm,rsqdif, > !$omp& tlapse,tlapse2,u0,u0l,uh,uh0,ul, 13 $ diff TTBLEX.f TTBLEX.f_org 55c55 < !$omp& private(bthe00k,bthe10k,bthk,ip,iptbk,ith,pk,sthe00k,sthe10k, & --- > !$omp& private(bthe00k,bthe10k,bthk,ip,iptbk,ith,pk,sthe00k,sthe10k, 14 $ diff WETBULB.f WETBULB.f_org 59,61c59,61 < !$omp& private(apebtk,apespk,bqk,bqs00k,bqs10k,iq,iqtbk,it,ittb1,ittbk, & < !$omp& karr,khres,klres,knumh,knuml,p00k,p01k,p10k,p11k,ppk, & < !$omp& presk,qbtk,qqk,sqk,sqs00k,sqs10k,tbtk,thesp,tpspk, & --- > !$omp& private(apebtk,apespk,bqk,bqs00k,bqs10k,iq,iqtbk,it,ittb1,ittbk, > !$omp& karr,khres,klres,knumh,knuml,p00k,p01k,p10k,p11k,ppk, > !$omp& presk,qbtk,qqk,sqk,sqs00k,sqs10k,tbtk,thesp,tpspk, 15 $ diff WETFRZLVL.f WETFRZLVL.f_org 73c73 < !$omp& private(delt,delz,htsfc,l,llmh & --- > !$omp& private(delt,delz,htsfc,l,llmh 16 $ diff MDL2AGL.f MDL2AGL.f_org 781c781 < CALL & --- > CALL 17 $ diff CALPBL.f CALPBL.f_org 90,100c90,100 < !$omp& private(uhkl,ulkl,vhkl,vlkl,rib,ubot,utop,vbot,vtop, & < !$omp& betta,ricr,ustarr,wmin,tvhtop,ztop, & < !$omp& wndsl,wndslp,betta,ricr,ustarr,wmin & < !$omp& ,IFRSTLEV & < !$omp& ,ICALPBL & < !$omp& ,LVLP & < !$omp& ,RIF & < !$omp& ,RIBP & < !$omp& ,UBOT1 & < !$omp& ,VBOT1 & < !$omp& ,ZBOT1 & --- > !$omp& private(uhkl,ulkl,vhkl,vlkl,rib,ubot,utop,vbot,vtop, > !$omp& betta,ricr,ustarr,wmin,tvhtop,ztop, > !$omp& wndsl,wndslp,betta,ricr,ustarr,wmin > !$omp& ,IFRSTLEV > !$omp& ,ICALPBL > !$omp& ,LVLP > !$omp& ,RIF > !$omp& ,RIBP > !$omp& ,UBOT1 > !$omp& ,VBOT1 > !$omp& ,ZBOT1 18 $ diff CALPBLREGIME.f CALPBLREGIME.f_org 84,94c84,94 < !$omp& private(uhkl,ulkl,vhkl,vlkl,rib,ubot,utop,vbot,vtop, & < !$omp& betta,ricr,ustarr,wmin,tvhtop,ztop, & < !$omp& wndsl,wndslp,betta,ricr,ustarr,wmin & < !$omp& ,IFRSTLEV & < !$omp& ,ICALPBL & < !$omp& ,LVLP & < !$omp& ,RIF & < !$omp& ,RIBP & < !$omp& ,UBOT1 & < !$omp& ,VBOT1 & < !$omp& ,ZBOT1 & --- > !$omp& private(uhkl,ulkl,vhkl,vlkl,rib,ubot,utop,vbot,vtop, > !$omp& betta,ricr,ustarr,wmin,tvhtop,ztop, > !$omp& wndsl,wndslp,betta,ricr,ustarr,wmin > !$omp& ,IFRSTLEV > !$omp& ,ICALPBL > !$omp& ,LVLP > !$omp& ,RIF > !$omp& ,RIBP > !$omp& ,UBOT1 > !$omp& ,VBOT1 > !$omp& ,ZBOT1