Added a dump of the PRESCALE string

ENGINE/g_examine_go_info.f

@@ -58,6 +58,7 @@
       integer*4 jiand,jishft,jieor
       logical*4 found_thresholds,found_prescale
       character*80 prescale_string
+      character*80 file
       character*4 tmpstring
       integer*4 ilo,prescale_len,ilo2
       integer*4 nped
@@ -135,6 +136,16 @@ c        write(6,*) '  NOT THRESHOLDS,NOT PS FACTORS.  WHO CARES.'
         endif
       enddo
 *
+      write(*,*) 'PRESCALE STRING'
+      write(*,*) prescale_string
+c WHIT's InSANE HACK
+      file='InSANEOUT/coda_PS_%d.txt'
+      call g_sub_run_number(file,gen_run_number)
+c 215=philadelphia area code
+      open(unit=216,file=file,status='REPLACE')
+      write(216,*)prescale_string 
+c END WHIT's InSANE HACK
+
       if (found_prescale .and. prescale_len.ne.0) then
         prescale_len = g_important_length(prescale_string(1:prescale_len))
         ilo=index(prescale_string(1:prescale_len),'nped=')+5

etc/Makefile.variables

@@ -47,7 +47,7 @@ ifeq ($(gccversion),4)
     endef
     $(warning $(message))
     FC = g77
-    FFLAGS += $(g77flags)
+    FFLAGS += $(g77flags) -static
   endif
 else
   FC = gfortran