how to change hisfile for his_****.nc to his_*****.nc

[feroda]

Help!

Because my history results takes a long time and output is too much, I run ROMS from his_0001.nc to his_10000.nc.
But history result can only give his_9999.nc. SO how to change hisfile for his_****.nc to his_*****.nc?
Which fortran program can easily solved this problem ?
Thank you!

[kate]

The change is in output.F:

Code: Select all

@@ -103,7 +110,12 @@
             ifile=(iic(ng)-1)/ndefHIS(ng)+1
             IF (Master) THEN
               WRITE (HIS(ng)%name,10) TRIM(HIS(ng)%base), ifile
+#if defined NEP5 || defined NEP6 || defined CASPIAN || defined CHUKCHI \
+           || defined CORAL || defined NWA || defined ARC_NATL
+  10          FORMAT (a,'_',i5.5,'.nc')
+#else
   10          FORMAT (a,'_',i4.4,'.nc')
+#endif
             END IF
 # ifdef DISTRIBUTE
             CALL mp_bcasts (ng, iNLM, HIS(ng)%name)