For edenite + 4 quartz = tremolite + albite (A) and edenite + albite = richterite + anorthite (B) equilibrium. Based on Al in Amp.
Article | Tim Holland, Jon Blundy Non-ideal interactions in calcic amphiboles and their bearing on amphibole-plagioclase thermometry, 1994 [ref] |
---|---|
Collibration | |
Precision | ± 50 °C |
Ranges | 1 < P < 16 kbar, 400 °C < T < 1100 °C |
Renew sensors | Blundy and Holland (1990), Kohn and Spear (1989, 1990). |
source('recalc_amp_holland_blundy.r'); sensors.p.amp_pl_holland_blundy <- function(Amp, Temp, usePFU = FALSE, ...){ if(!usePFU) Amp <- recalc.amp_holland_blundy(Amp); P <- 4.76*Amp$Al_pfu-3.01-((Temp-675)/85)*(0.53*Amp$Al_pfu+0.005294*(Temp-675)) return (data.frame(Name=Amp$Name, T_seq=Temp, P_calc_Holland_Blundy=P)); } sensors.p.amp_pl_holland_blundy.args <- function() { ars <- list(); ars$minerals = c('Amp'); ars$ranges = c('Temp'); return(ars); }