libsim  Versione8.0.0

◆ grid_id_encode_data()

subroutine grid_id_class::grid_id_encode_data ( type(grid_id), intent(inout)  this,
real, dimension(:,:), intent(in)  field 
)

Encode a data array into a grid_id object.

The input array field must have a size matching the size of the dataset.

Parametri
[in,out]thisgridinfo object
[in]fielddata array to be encoded

Definizione alla linea 988 del file grid_id_class.F90.

988 IF (iscansnegatively == 0) THEN
989  x1 = 1
990  x2 = SIZE(field,1)
991  xs = 1
992 ELSE
993  x1 = SIZE(field,1)
994  x2 = 1
995  xs = -1
996 ENDIF
997 IF (jscanspositively == 0) THEN
998  y1 = SIZE(field,2)
999  y2 = 1
1000  ys = -1
1001 ELSE
1002  y1 = 1
1003  y2 = SIZE(field,2)
1004  ys = 1
1005 ENDIF
1006 
1007 
1008 IF (any(field == rmiss)) THEN

Generated with Doxygen.