18 lines
711 B
Fortran
18 lines
711 B
Fortran
SUBROUTINE PK_GRIB2
|
|
C
|
|
C ================================= RCS keyword statements ==========
|
|
CHARACTER*68 RCSKW1,RCSKW2
|
|
DATA RCSKW1,RCSKW2 / '
|
|
.$Source: /fs/hseb/ob72/wfo_rfc/precip_proc/source/gribit/src/RCS/gribit_stubs.f,v $
|
|
. $', '
|
|
.$Id: gribit_stubs.f,v 1.1 2006/05/03 13:43:58 gsood Exp $
|
|
. $' /
|
|
C ===================================================================
|
|
C
|
|
write (*,*) 'ERROR: routine PK_GRIB2 is a stub.'
|
|
RETURN
|
|
END
|
|
SUBROUTINE UNPK_GRIB2
|
|
write (*,*) 'ERROR: routine UNPK_GRIB2 is a stub.'
|
|
RETURN
|
|
END
|