#R
# $HeadURL: https://hedgehog.fhcrc.org/bioconductor/branches/RELEASE_3_4/madman/Rpacks/specL/inst/unitTests/test_peptideStd.R $
# $Id: test_peptideStd.R 98110 2015-01-07 11:36:37Z c.panse $
# $Date: 2015-01-07 06:36:37 -0500 (Wed, 07 Jan 2015) $


test_peptideStd <-
function(){
    # peptideStd[[133]]$peptideModSeq <- "YAM[+16.0]LDVLNTGAMIGQTLIDLTNK"
    # ionlibrary(L)[[133]]@group_id,  "YAM[+16.0]LDVLNTGAMIGQTLIDLTNK.3;837.765213"
}

#test_peptideStd()
