INTERFACE:
subroutine print_mask(mask) IMPLICIT NONEDESCRIPTION:
Prints a integer mask in a human readable form. INPUT PARAMETERS:
integer, intent(in), dimension(E2DFIELD) :: maskREVISION HISTORY:
22Apr99 Karsten Bolding & Hans Burchard Initial code.LOCAL VARIABLES:
integer :: i,j