diff --git a/example/Makefile b/example/Makefile
index 2b8aa7f..4f5be72 100644
--- a/example/Makefile
+++ b/example/Makefile
@@ -1,5 +1,5 @@
 IRPF90 = python ../src/irpf90.py -I input -a -d
-FC     = gfortran
+FC     = ifort -profile-functions
 FCFLAGS= -O2
 
 SRC=
diff --git a/src/create_man.py b/src/create_man.py
index 9bb8bdf..6a6edf2 100644
--- a/src/create_man.py
+++ b/src/create_man.py
@@ -36,8 +36,8 @@ from util import *
 def do_print_short(file,var):
   assert type(var) == Variable
   print >>file, "%s : %s :: %s %s"%( \
-   var.line.filename[0].ljust(25),
-   var.type.ljust(25),
+   var.line.filename[0].ljust(35),
+   var.type.ljust(30),
    var.name.ljust(25),
    build_dim(var.dim) )
 
diff --git a/src/subroutine.py b/src/subroutine.py
index 9b47da3..0eb4acf 100644
--- a/src/subroutine.py
+++ b/src/subroutine.py
@@ -125,6 +125,7 @@ class Sub(object):
 ######################################################################
 if __name__ == '__main__':
   from preprocessed_text import preprocessed_text
+  from variables import variables
   from subroutines import subroutines
-  print subroutines['run'].needs
-  print subroutines['run'].to_provide
+  print map(lambda x: variables[x].needs, subroutines['full_ci'].needs)
+  print subroutines['full_ci'].calls