4.3  Subroutines LIBEM2, LIBEM3 and LIBEMA