ã¾ãã¾ãã¿ã¤ãã³ã°é ããªããã§å¤§æ¹ã®è¨èªã¯åºå°½ãããæããã£ããã ãã©ãã¾ã 誰ããã£ã¦ãªãè¨èªããã£ãã®ã§ããã£ã¦ã¿ãã ãã® in language ! ! X / _ / X < :æ¥é±ãè¦ã¦ãã ããã! ! module yuno logical :: X = .true. interface operator(/) module procedure f1, f2 end interface interface operator(<) module procedure f3 end interface contains logical function f1(a, b) logical, intent(in) :: a, b f1 = .true. end function logical function f2(a, b) logical, intent(in) :: a char
{{#tags}}- {{label}}
{{/tags}}