IPMERGE2

The IPMERGE2 routine merges two bitmapped fields into one.
             where both input fields are valid, the first field is taken.
             where neither input field is valid, the output is invalid.

USAGE:    CALL IPMERGE2(NO,NF,M1,L1,F1,M2,L2,F2,MO,LO,FO)

   Input argument list:
      NO       - INTEGER NUMBER OF POINTS IN EACH FIELD
      NF       - INTEGER NUMBER OF FIELDS MERGES
      M1       - INTEGER FIRST DIMENSION OF FIELD 1 ARRAYS
      L1       - LOGICAL(1) (M1,NF) BITMAP FOR FIELD 1
      F1       - REAL (M1,NF) DATA FOR FIELD 1
      M2       - INTEGER FIRST DIMENSION OF FIELD 2 ARRAYS
      L2       - LOGICAL(1) (M2,NF) BITMAP FOR FIELD 2
      F2       - REAL (M2,NF) DATA FOR FIELD 2
      MO       - INTEGER FIRST DIMENSION OF OUTPUT FIELD ARRAYS
 
   Output argument list:
      LO       - LOGICAL(1) (MO,NF) BITMAP FOR OUTPUT FIELD
      FO       - REAL (MO,NF) DATA FOR OUTPUT FIELD

 


  
iplib.tar
  
Library contains subroutines to be used for
   interpolating almost any grids used at NCEP. (Fortran90) 

   Date posted: 2/22/2007