Ý ’k820309 919.0^\®e  module_cu_osas.f90MODULE_CU_OSAS#@2#DT#ITIMESTEP#STEPCU#RTHCUTEN#RQVCUTEN #RQCCUTEN #RQICUTEN#RUCUTEN#RVCUTEN#RAINCV#PRATEC#HTOP#HBOT#U3D#V3D#W#T3D#QV3D#QC3D#QI3D#PI3D#RHO3D#DZ8W#PCPS#P8W #XLAND!#CU_ACT_FLAG"#P_QC##STORE_RAND$#MOMMIX%#P_QI&#P_FIRST_SCALAR'#IDS(#IDE)#JDS*#JDE+#KDS,#KDE-#IMS #IME #JMS#JME #KMS#KME#ITS.#ITE/#JTS0#JTE1#KTS2#KTE3     D 5“p)r5“p,r5“p+rp5“p+r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p+r5“p,r&5“p)r5“p*r 5“p(r 5“p'r p5“p,r5“p+rp5“p*r 5“p)rp D  5“p)r5“p,r5“p+rp5“p+r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p+r5“p,r&5“p)r5“p*r 5“p(r 5“p'r p5“p,r5“p+rp5“p*r 5“p)rp D  5“p)r5“p,r5“p+rp5“p+r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p+r5“p,r&5“p)r5“p*r 5“p(r 5“p'r p5“p,r5“p+rp5“p*r 5“p)rp D 5“p)r5“p,r5“p+rp5“p+r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p+r5“p,r&5“p)r5“p*r 5“p(r 5“p'r p5“p,r5“p+rp5“p*r 5“p)rp  5“p+r5“p*r 5“p)rp5“p)r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p)r5“p*r &5“p+r5“p,r5“p(r 5“p'r p5“p*r 5“p)rp5“p,r5“p+rp  5“p+r5“p*r 5“p)rp5“p)r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p)r5“p*r &5“p+r5“p,r5“p(r 5“p'r p5“p*r 5“p)rp5“p,r5“p+rp D 5“p)r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p)r5“p*r 5“p(r 5“p'r p5“p*r 5“p)rp D 5“p)r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p)r5“p*r 5“p(r 5“p'r p5“p*r 5“p)rp D 5“p)r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p)r5“p*r 5“p(r 5“p'r p5“p*r 5“p)rp D 5“p)r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p)r5“p*r 5“p(r 5“p'r p5“p*r 5“p)rp  5“p)r5“p,r5“p+rp5“p+r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p+r5“p,r&5“p)r5“p*r 5“p(r 5“p'r p5“p,r5“p+rp5“p*r 5“p)rp  5“p)r5“p,r5“p+rp5“p+r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p+r5“p,r&5“p)r5“p*r 5“p(r 5“p'r p5“p,r5“p+rp5“p*r 5“p)rp  5“p)r5“p,r5“p+rp5“p+r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p+r5“p,r&5“p)r5“p*r 5“p(r 5“p'r p5“p,r5“p+rp5“p*r 5“p)rp  5“p)r5“p,r5“p+rp5“p+r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p+r5“p,r&5“p)r5“p*r 5“p(r 5“p'r p5“p,r5“p+rp5“p*r 5“p)rp  5“p)r5“p,r5“p+rp5“p+r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p+r5“p,r&5“p)r5“p*r 5“p(r 5“p'r p5“p,r5“p+rp5“p*r 5“p)rp  5“p)r5“p,r5“p+rp5“p+r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p+r5“p,r&5“p)r5“p*r 5“p(r 5“p'r p5“p,r5“p+rp5“p*r 5“p)rp  5“p)r5“p,r5“p+rp5“p+r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p+r5“p,r&5“p)r5“p*r 5“p(r 5“p'r p5“p,r5“p+rp5“p*r 5“p)rp  5“p)r5“p,r5“p+rp5“p+r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p+r5“p,r&5“p)r5“p*r 5“p(r 5“p'r p5“p,r5“p+rp5“p*r 5“p)rp  5“p)r5“p,r5“p+rp5“p+r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p+r5“p,r&5“p)r5“p*r 5“p(r 5“p'r p5“p,r5“p+rp5“p*r 5“p)rp  5“p)r5“p,r5“p+rp5“p+r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p+r5“p,r&5“p)r5“p*r 5“p(r 5“p'r p5“p,r5“p+rp5“p*r 5“p)rp  5“p)r5“p,r5“p+rp5“p+r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p+r5“p,r&5“p)r5“p*r 5“p(r 5“p'r p5“p,r5“p+rp5“p*r 5“p)rp   5“p)r5“p,r5“p+rp5“p+r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p+r5“p,r&5“p)r5“p*r 5“p(r 5“p'r p5“p,r5“p+rp5“p*r 5“p)rp ! 5“p)r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p)r5“p*r 5“p(r 5“p'r p5“p*r 5“p)rp D" 5“p)r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p)r5“p*r 5“p(r 5“p'r p5“p*r 5“p)rp # $ 5“p)r5“p(r 5“p'r p5“p'r &5“p'r 5“p(r &5“p)r5“p*r 5“p(r 5“p'r p5“p*r 5“p)rp %  & ' ( ) * + , -          . / 0 1 2 3#@4#@5#IM6#IX7#KM8#JCAP9#DELT:#DEL;#PRSL<#PS=#PHIL>#QL?#Q1@#T1A#U1B#V1C#RCSD#CLDWRKE#RNF#KBOTG#KTOPH#KUOI#SLIMSKJ#DOTK#XKT2L#NCLOUDM 6 7 @8@9:  ; ;p5“pr7p5“pr75“pr85“pr75“pr8 < <p5“pr7p5“pr75“pr85“pr75“pr8 = :p5“pr65“pr6 > Hp5“pr7p5“pr75“pr85“pr75“pr8 D? =p5“pr8p5“pr7p5“pr75“pr8p5“pr75“pr8p D@ >p5“pr7p5“pr75“pr85“pr75“pr8 D@A ?p5“pr7p5“pr75“pr85“pr75“pr8 DB @p5“pr7p5“pr75“pr85“pr75“pr8 DC Ap5“pr7p5“pr75“pr85“pr75“pr8 D Bp5“pr65“pr6 DE Cp5“pr65“pr6 DF Dp5“pr65“pr6 DG7p5“pr65“pr6 DH8p5“pr65“pr6 DI9p5“pr65“pr6 J Ep5“pr65“pr6 K Fp5“pr7p5“pr75“pr85“pr75“pr8 L Gp5“pr65“pr6M#@N #IMO#IXP#KMQ#DTR#DELS#PRSIT#PRSLU#PRSLKV#KUOW#QX#TY#DPSHCZ O P QR  S ªp5“prPp5“prP5“prQ5“prP5“prQ T «p5“prPp5“prP5“prQn15“prP5“prQn1 U ¬p5“prPp5“prP5“prQ5“prP5“prQ V ­p5“prPp5“prP5“prQ5“prP5“prQ W©p5“prO5“prO DX ®p5“prPp5“prP5“prQ5“prP5“prQ DY ¯p5“prPp5“prP5“prQ5“prP5“prQZ #@[#RTHCUTEN\#RQVCUTENc#RQCCUTENd#RQICUTENe#RUCUTENf#RVCUTENg#RESTARTh#P_QCi#P_QIj#P_FIRST_SCALARk#ALLOWED_TO_READl#IDSm#IDEn#JDSo#JDEp#KDSq#KDEr#IMSa#IME`#JMS]#JMEb#KMS_#KME^#ITSs#ITEt#JTSu#JTEv#KTSw#KTEx D\ 15“pr]5“pr^5“pr_p5“pr_5“pr`5“prap5“pra&5“pra5“pr`&5“pr_5“pr^&5“pr]5“prb5“pr`5“prap5“pr^5“pr_p5“prb5“pr]p Dc 25“pr]5“pr^5“pr_p5“pr_5“pr`5“prap5“pra&5“pra5“pr`&5“pr_5“pr^&5“pr]5“prb5“pr`5“prap5“pr^5“pr_p5“prb5“pr]p Dd 35“pr]5“pr^5“pr_p5“pr_5“pr`5“prap5“pra&5“pra5“pr`&5“pr_5“pr^&5“pr]5“prb5“pr`5“prap5“pr^5“pr_p5“prb5“pr]p De 45“pr]5“pr^5“pr_p5“pr_5“pr`5“prap5“pra&5“pra5“pr`&5“pr_5“pr^&5“pr]5“prb5“pr`5“prap5“pr^5“pr_p5“prb5“pr]p Df 55“pr_5“prb5“pr]p5“pr]5“pr`5“prap5“pra&5“pra5“pr`&5“pr]5“prb&5“pr_5“pr^5“pr`5“prap5“prb5“pr]p5“pr^5“pr_p Dg 65“pr_5“prb5“pr]p5“pr]5“pr`5“prap5“pra&5“pra5“pr`&5“pr]5“prb&5“pr_5“pr^5“pr`5“prap5“prb5“pr]p5“pr^5“pr_p h i j k l m n o p q r a ` ] b _ ^ s @t u @v w @x#@y #IMz#KM{#K1|#K2}#PRSL~#PRSLK#TENV€#QENV#KLCL‚#KBOTƒ#KTOP„#TCLD…#QCLD† z {|} ~ Åp5“przp5“prz5“pr{5“prz5“pr{ @ Æp5“przp5“prz5“pr{5“prz5“pr{ @€ Çp5“przp5“prz5“pr{5“prz5“pr{  Èp5“przp5“prz5“pr{5“prz5“pr{ D‚Ëp5“prz5“prz DƒÌp5“prz5“prz D„Íp5“prz5“prz D… Ép5“przp5“prz5“pr{5“prz5“pr{ D† Êp5“przp5“prz5“pr{5“prz5“pr{#@‡ #Lˆ#N‰#CLŠ#CM‹#CUŒ#R1#R2Ž#AU#A1#A2‘ ˆ ‰ Š ½p5“prˆp5“prˆ&p5“pr‰5“prˆ5“pr‰pp ‹ ¾p5“prˆp5“prˆ5“pr‰5“prˆ5“pr‰ Œ ¿p5“prˆp5“prˆ5“pr‰n15“prˆ5“pr‰n1  Àp5“prˆp5“prˆ5“pr‰5“prˆ5“pr‰ Ž Áp5“prˆp5“prˆ5“pr‰5“prˆ5“pr‰ D Âp5“prˆp5“prˆ5“pr‰n15“prˆ5“pr‰n1 D Ãp5“prˆp5“prˆ5“pr‰5“prˆ5“pr‰ D‘ Äp5“prˆp5“prˆ5“pr‰5“prˆ5“pr‰ *fn#fnÊDCU_OSAS@aCU_OSAS%DT"N@aCU_OSAS%ITIMESTEPŽ@aCU_OSAS%STEPCU!ÎaCU_OSAS%RTHCUTEN!âaCU_OSAS%RQVCUTEN!ö aCU_OSAS%RQCCUTEN! aCU_OSAS%RQICUTEN aCU_OSAS%RUCUTEN 2aCU_OSAS%RVCUTENFaCU_OSAS%RAINCVZaCU_OSAS%PRATECnaCU_OSAS%HTOP‚aCU_OSAS%HBOT–aCU_OSAS%U3Dª"aCU_OSAS%V3D¾%aCU_OSAS%WÒ(aCU_OSAS%T3Dæ+aCU_OSAS%QV3Dú.aCU_OSAS%QC3D2aCU_OSAS%QI3D"5aCU_OSAS%PI3D68aCU_OSAS%RHO3DJ;aCU_OSAS%DZ8W^>aCU_OSAS%PCPSrAaCU_OSAS%P8W†DaCU_OSAS%XLAND$šFaCU_OSAS%CU_ACT_FLAG®H@aCU_OSAS%P_QC#îHaCU_OSAS%STORE_RANDK@aCU_OSAS%MOMMIXBK@aCU_OSAS%P_QI'‚K@aCU_OSAS%P_FIRST_SCALARÂK@aCU_OSAS%IDSL@aCU_OSAS%IDEBL@aCU_OSAS%JDS‚L@aCU_OSAS%JDEÂL@aCU_OSAS%KDSM@aCU_OSAS%KDEBM@aCU_OSAS%IMS‚M@aCU_OSAS%IMEÂM@aCU_OSAS%JMSN@aCU_OSAS%JMEBN@aCU_OSAS%KMS‚N@aCU_OSAS%KMEÂN@aCU_OSAS%ITSO@aCU_OSAS%ITEBO@aCU_OSAS%JTS‚O@aCU_OSAS%JTEÂO@aCU_OSAS%KTSP@aCU_OSAS%KTE!BPHINIT_RANDOM_SEEDŠPOSASCNVžR@aOSASCNV%IMÞR@aOSASCNV%IXS@aOSASCNV%KM^S@aOSASCNV%JCAPžS@aOSASCNV%DELTÞS$aOSASCNV%DELU$aOSASCNV%PRSL&V´aOSASCNV%PSÚV$aOSASCNV%PHILþWtaOSASCNV%QLrY$aOSASCNV%Q1–Z$aOSASCNV%T1º[$aOSASCNV%U1Þ\$aOSASCNV%V1^´aOSASCNV%RCS¶^´aOSASCNV%CLDWRKj_´aOSASCNV%RN`´aOSASCNV%KBOTÒ`´aOSASCNV%KTOP†a´aOSASCNV%KUO:b´aOSASCNV%SLIMSKîb$aOSASCNV%DOTd´aOSASCNV%XKT2Æd@aOSASCNV%NCLOUDe®SHALCV´f@aSHALCV%IMôf@aSHALCV%IX4g@aSHALCV%KMtg@aSHALCV%DT´g$aSHALCV%DELØh–aSHALCV%PRSInj$aSHALCV%PRSL’k$aSHALCV%PRSLK¶l´aSHALCV%KUOjm$aSHALCV%QŽn$aSHALCV%T²o@aSHALCV%DPSHCòo†OSASINIT"xqaOSASINIT%RTHCUTEN"ŒtaOSASINIT%RQVCUTEN" waOSASINIT%RQCCUTEN"´zaOSASINIT%RQICUTEN!È}aOSASINIT%RUCUTEN!Ü€aOSASINIT%RVCUTEN!ðƒ@aOSASINIT%RESTART0„@aOSASINIT%P_QCp„@aOSASINIT%P_QI(°„@aOSASINIT%P_FIRST_SCALAR)ð„@aOSASINIT%ALLOWED_TO_READ0…@aOSASINIT%IDSp…@aOSASINIT%IDE°…@aOSASINIT%JDSð…@aOSASINIT%JDE0†@aOSASINIT%KDSp†@aOSASINIT%KDE°†@aOSASINIT%IMSð†@aOSASINIT%IME0‡@aOSASINIT%JMSp‡@aOSASINIT%JME°‡@aOSASINIT%KMSð‡@aOSASINIT%KME0ˆ@aOSASINIT%ITSpˆ@aOSASINIT%ITE°ˆ@aOSASINIT%JTSðˆ@aOSASINIT%JTE0‰@aOSASINIT%KTSp‰@aOSASINIT%KTE°‰×MSTADBT3‡‹@aMSTADBT3%IMÇ‹@aMSTADBT3%KMŒ@aMSTADBT3%K1GŒ@aMSTADBT3%K2‡Œ$aMSTADBT3%PRSL«$aMSTADBT3%PRSLKÏŽ$aMSTADBT3%TENVó$aMSTADBT3%QENV‘´aMSTADBT3%KLCLË‘´aMSTADBT3%KBOT’´aMSTADBT3%KTOP3“$aMSTADBT3%TCLDW”$aMSTADBT3%QCLD{•®TRIDI2T3)–@aTRIDI2T3%Li–@aTRIDI2T3%N©–TaTRIDI2T3%CLý—$aTRIDI2T3%CM!™–aTRIDI2T3%CU·š$aTRIDI2T3%R1Û›$aTRIDI2T3%R2ÿœ–aTRIDI2T3%AU•ž$aTRIDI2T3%A1¹Ÿ$aTRIDI2T3%A2