Различия
Здесь показаны различия между двумя версиями данной страницы.
| Предыдущая версия справа и слева Предыдущая версия Следующая версия | Предыдущая версия | ||
|
sensors:pt:opx_cpx_putirka [2015/10/08 12:02] admin |
sensors:pt:opx_cpx_putirka [2018/11/12 15:07] (текущий) |
||
|---|---|---|---|
| Строка 1: | Строка 1: | ||
| - | ====== Opx-Cpx: Putirka, 2009 RiMG ====== | + | ====== Opx-Cpx: Putirka, 2009 ====== |
| - | Global regression, based on the partitioning of enstatite + ferrosilite (Fm2Si2O6 = EnFs; FmO = FeO + MgO + MnO) between clinopyroxene and orthopyroxene. Cpx with Mg#>0.75. | + | Global regression, based on the partitioning of enstatite + ferrosilite (Fm2Si2O6 = EnFs; FmO = FeO + MgO + MnO) between clinopyroxene and orthopyroxene. Cpx with Mg#>0.75 for best accuracy. |
| === Details === | === Details === | ||
| - | ^ Article | Keith D. Putirka Thermometers and Barometers for Volcanic Systems, Mineralogy & Geochemistry Vol. 69 pp. 61-120, 2008 | | + | ^ Article | <ref:putirka2008> | |
| - | ^ Reference | {{:sources:putirka2008.pdf}} | | + | |
| ^ Collibration | 483 points from different sources | | ^ Collibration | 483 points from different sources | | ||
| - | ^ Presition | ± 60 °C, ±3.2 kbar | | + | ^ Accuracy | ± 60 °C, ±3.2 kbar | |
| ^ Ranges | P < 70 kbar, 700 °C < T < 2000 °C | | ^ Ranges | P < 70 kbar, 700 °C < T < 2000 °C | | ||
| + | ^ Used sensors | [[sensors:p:opx_cpx_putirka]] [[sensors:t:opx_cpx_putirka]] | | ||
| + | ^ Method | Simple interation. Start: P = 1 kbar, T = 700 °C. Count = 15 | | ||
| ^ Renew sensors | | | ^ Renew sensors | | | ||
| - | ^[[:ppy:mod_sensors#pt_opx_cpx_putirka|Calculate]] ^ ^ | + | |
| + | <use:sensors.pt.opx_cpx_putirka> | ||
| + | <test:sensors.pt.opx_cpx_putirka> | ||
| + | |||
| + | <WRAP center round todo 60%> | ||
| + | Для улучшения этой статьи следует: | ||
| + | * Добавить подробное описание | ||
| + | * Добавить тест | ||
| + | </WRAP> | ||
| Строка 23: | Строка 32: | ||
| stopifnot(usePFU == F); | stopifnot(usePFU == F); | ||
| - | P = 2; | + | P <- 1; |
| - | Temp = 1000; | + | Temp <- 700; |
| interations <- 1; | interations <- 1; | ||
| - | repeat { | + | repeat{ |
| - | P = sensors.p.opx_cpx_putirka(Opx, Cpx, Temp = Temp); | + | P_DF <- sensors.p.opx_cpx_putirka(Opx, Cpx, Temp = Temp); |
| - | Temp = sensors.t.opx_cpx_putirka(Opx, Cpx, P = P); | + | Temp_DF <- sensors.t.opx_cpx_putirka(Opx, Cpx, P = P); |
| - | interations = interations + 1; | + | P <- P_DF$P_calc_Opx_Cpx_Putirka; |
| - | if (interations == 10){ | + | Temp <- Temp_DF$T_calc_Opx_Cpx_Putirka; |
| - | break; | + | |
| - | } | + | interations <- interations + 1; |
| + | if (interations > 15) {break;} | ||
| } | } | ||
| Строка 43: | Строка 53: | ||
| ars <- list(); | ars <- list(); | ||
| ars$minerals = c('Opx','Cpx'); | ars$minerals = c('Opx','Cpx'); | ||
| - | ars$ranges = list(); | + | ars$ranges = c(); |
| return(ars); | return(ars); | ||
| } | } | ||
| </Code> | </Code> | ||