Forked from HYCAR-Hydro / airGR
Source project has a limited visibility.
example_TransfoParam_CemaNeige.R 579 bytes
require(airGR)
## transformation Raw->Transformed for the CemaNeige module
    Xraw  <- matrix( c( 0.19, 1.73,
                        0.39, 2.51,
                        0.74, 4.06),
                        ncol=2,byrow=TRUE)
    Xtran <- TransfoParam_CemaNeige(ParamIn=Xraw ,Direction="RT")
## transformation Transformed->Raw for the CemaNeige module
    Xtran <- matrix( c( -6.26, +0.55,
                        -2.13, +0.92,
                        +4.86, +1.40)
                        ,ncol=2,byrow=TRUE)
    Xraw  <- TransfoParam_CemaNeige(ParamIn=Xtran,Direction="TR")