diff --git a/prep/adcprep.F b/prep/adcprep.F index 26199ec6..2b4aa241 100755 --- a/prep/adcprep.F +++ b/prep/adcprep.F @@ -326,10 +326,6 @@ PROGRAM ADCPREP C-- If required write a Local fort.21 file for each PE C - IF (NWP.EQ.1) THEN - print *, "Ready to Write Local UNIT 21 File for each PE" - CALL PREP21() - ENDIF C C-- If required write a Local Wind Stress file for each PE C