long も　ダブルもチャレンジしてみましたが
プロシージャの呼出が不正ですのエラーがでちゃいます