Function Sam-P

Part of:

package elprep
( sam-p < object > )
Default predicate for struct sam.