倍精度実数のJ方向格子エッジごとに値を持つ計算結果を出力する。
call cg_iric_write_sol_jface_real_f(label, val, ier)
ier = cg_iRIC_Write_Sol_JFace_Real(label, val);
cg_iRIC_Write_Sol_JFace_Real(label, val)