(************************************************************
   only_printf.ml	Created      : Thu Aug  1 13:32:56 2002
  			Last modified: Thu Aug 01 13:46:58 2002
  Compile: ocamlopt.opt only_printf.ml -o only_printf #
  Location: http://www002.upp.so-net.ne.jp/mamewo/only_printf.ml #
************************************************************)

let _ =
  if (Array.length Sys.argv) != 3 then
    exit 1
  else
    let format = Sys.argv.(1) in
    let v = Sys.argv.(2) in
   (* format·¿ <> string·¿ *)
    Printf.printf format v